Office中国论坛/Access中国论坛

标题: [下载][求助]关于产品自动编号的问题 [打印本页]

作者: duckdon 时间: 2005-2-28 01:41
标题: [下载][求助]关于产品自动编号的问题
有A、B、C三个类别的产品，产品编号规则是“类别+序号”，如A001、B002...

如果有新产品，在产品编号窗体输入类别，就能自动找到此类别中已有产品编号最大的ID并加上1（如A类产品编号已编到A003，那么新生成的编号就是A004），然后将值赋给产品编号

我的代码错在哪里？请教各位高手如何实现，谢谢！

[attach]9096[/attach]

作者: zyp 时间: 2005-2-28 03:05
给点思路：用Dcount("*","tbName","left([编号],1)='a'")取得编号为A开头的记录笔数，再加上1为新的编号，并在开头连上A，赋值给产品编号

作者: duckdon 时间: 2005-2-28 05:51
谢谢！原来我用Dmax不支持文本，用你的方法现在可以了：a = DCount("[ID]", "产品编号", "[类别]=Left([ID], 1)")b = a + 1[ID] = [类别] & b但还有个问题，如果我中间的几个产品删除后，新生成的编号就会出现重复了有什么办法可以让新编号优先采用删除的那几个（或未被使用的最小的）？

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)