关于自动编号的一个问题

紫禁城　发表于：2010-04-21 21:00:49 　

我想在自动编号的时候得到如下结果,"Y2010040001",但我用rst("ygId") = acchelp_autoid("Y" & Year(Date) & Month(Date), 4, "tblCodeyg", "ygId"),只能得到"Y201040001",也就是"04"变成了"4"

王樵民发表于：2010-04-22 09:00:50

可以使用iif函数，在月份小于10时前面加0，否则等于Month(Date)，例：

rst("ygId") = acchelp_autoid("Y" & Year(Date) & iif(Month(Date)<10 ,"0" & Month(Date), Month(Date),4, "tblCodeyg", "ygId"),

紫禁城发表于：2010-04-22 13:28:23

谢谢1楼,这样能达到我的目的,但现在只能新增一个记录了,再新增第二个的话,系统提示数据重复错误,不知又该怎么解决啊

紫禁城发表于：2010-04-22 13:33:18

也就是说,系统没有自动对编号进行增加

王樵民发表于：2010-04-22 14:03:56

acchelp_autoid应该是一个函数，这个函数就应该自动加1，因不知道你的函数的代码，所以也不好做原有基础上修改，可以使用变通的方法来解决

rst("ygId") ="Y" & Year(Date) & iif(Month(Date)<10 ,"0" & Month(Date)) & str(10001+Right(dmax("ygId","表名"),4),2)

即可，其中表名是你实际表的名称。

麥田发表于：2010-04-22 16:06:08

紫禁城同学请学习一下变速箱作业三里面的编号就是你要的这种功能以前学习的都还给老师了:)

dwb 发表于：2010-04-24 00:57:07

rst("ygId") = acchelp_autoid("Y" & Format(Year(Date), "0000") & Format(Month(Date), "00"),4, "tblCodeyg", "ygId"),

紫禁城发表于：2010-04-25 00:59:28

谢谢麦田老师,问题已解决,太不好意思了

总记录：7篇页次：1/1 9 1 :

Access交流中心