关于编号的问题
我做的一个Access数据库中,需要将其中的几个表格的“编号”字段变为自动编号,但是并不是按照默认定义的1、2、3、4......形式,而是想要自定义,编号规则是:表格中输入该字段时的日期,再然后是001这样的自动编号。比如说如果今天是06年2月25日,在输入某张表格时,由于是输入当天的第一条记录,所以编号即自动产生为:20060225-001,在输入第二条记录时,自动产生编号为:20060225-002。我需要怎么做呢 问题点数:20、回复次数:1Top
1 楼sparks345(sparks345)回复于 2006-07-03 18:20:42 得分 0
ACCESS中,用程序控制吧,
id = conn.execute("SELECT max(id) from [table]")(0)
sid = spilt(id,"-")
ndate = year(now())&month(now())&day(now())
if ndate = sid(0) then
id = cstr(clng(sid(1)) + 1)
else
id = 1
end if
encode(id) '把id变成三位数,自己写个吧
newid = cstr(ndate&"-"&id)
-----------------------------------------
代码没有测试,希望能帮上你。Top




