[浏览完整版]
标题：怎样才能实现自动编号？
1楼
floor2 发表于：2009/4/7 23:28:00 需要根据 日期列和产品名，生成一个产品编号? 该如何实现，同时在狐表的哪部分内容可以看到以上的帮助，谢谢
2楼
狐狸爸爸 发表于：2009/4/7 23:32:00在论坛搜索一下“编号”看看。
3楼
floor2 发表于：2009/4/8 0:06:00 dim md as date=e.datarow("生产日期")
dim cb as string=e.datarow("产品编号")
Dim T1,T2 As String
T1 = Format(md,"MMdd")
T2 = format(cb,"0000000000")
Dim dr As DataRow = e.datarow("产品编号")
If dr isnot Nothing then
e.DataRow("生产编号") = T1 & T2
Else
e.DataRow("生产编号") = nothing
End If
该怎么改才不会出错啊，产品编号的位数不一定的，怎样才能实现？
dim cb as string=e.datarow("产品编号")
Dim T1,T2 As String
T1 = Format(md,"MMdd")
T2 = format(cb,"0000000000")
Dim dr As DataRow = e.datarow("产品编号")
If dr isnot Nothing then
e.DataRow("生产编号") = T1 & T2
Else
e.DataRow("生产编号") = nothing
End If
该怎么改才不会出错啊，产品编号的位数不一定的，怎样才能实现？
[此贴子已经被作者于2009-4-8 0:07:00编辑过]
4楼
floor2 发表于：2009/4/8 0:30:00版主帮忙看下，在线等
5楼
程兴刚 发表于：2009/4/8 0:35:00给您解决完的都没有回音，还等啥呀！
6楼
狐狸爸爸 发表于：2009/4/8 0:39:00| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目6.table |
7楼
floor2 发表于：2009/4/8 0:41:00？？？
前面几个问题 我都找到答案，不劳你们了，不是说了吗？晕
实在没办法，才麻烦你们。。。。
前面几个问题 我都找到答案，不劳你们了，不是说了吗？晕
实在没办法，才麻烦你们。。。。
8楼
狐狸爸爸 发表于：2009/4/8 0:42:00看六楼
9楼
程兴刚 发表于：2009/4/8 0:45:0010楼
floor2 发表于：2009/4/8 0:50:00晕 刚才刷不出来
版主提供的刚才在论坛上看过，不过没看懂 呵呵
我想实现的编号是 生产日期+产品编号 就可以了，不用另外加序号，同时产品编号的位数是不确定的，有时多有时少
版主提供的刚才在论坛上看过，不过没看懂 呵呵
我想实现的编号是 生产日期+产品编号 就可以了，不用另外加序号，同时产品编号的位数是不确定的，有时多有时少