Foxtable(狐表)用户栏目专家坐堂 → ACCESS的自动编号代码


  共有20544人关注过本帖树形打印复制链接

主题:ACCESS的自动编号代码

帅哥哟,离线,有人找我吗?
月缺月圆
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:19 积分:255 威望:0 精华:0 注册:2008/8/31 20:38:00
ACCESS的自动编号代码  发帖心情 Post By:2008/9/19 8:45:00 [只看该作者]

在access中把自定义自动编号的控件的默认值设置为 =Left(Format(Format(Date(),'yyyymmdd'))+Format(DCount("ID","表1","时间 = date()")+1),8) & Choose(12-Len(Format(Format(Date(),'yyyymmdd'))+Format(DCount("ID","表1","时间 = date()")+1)),"0","00","000") & Right(Format(Format(Date(),'yyyymmdd'))+Format(DCount("ID","表1","时间 = date()")+1),(Len(Format(Format(Date(),'yyyymmdd'))+Format(DCount("ID","表1","时间 = date()")+1))-8)) 呵呵,代码是长了些,有没有高手简化一下
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自己设计的自动编号.rar


 回到顶部
帅哥哟,离线,有人找我吗?
lxl
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2008/9/19 16:08:00 [只看该作者]

你的那个太麻烦了。直接用
Format(Date(),'yyyymmdd')+Format(DCount("ID","表1","时间 = date()")+1,"0000")
就行了


 回到顶部
帅哥哟,离线,有人找我吗?
月缺月圆
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:19 积分:255 威望:0 精华:0 注册:2008/8/31 20:38:00
  发帖心情 Post By:2008/9/19 16:21:00 [只看该作者]

好啊,又学了一手。FORMAT(,"0000")

 回到顶部