以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样才能实现自动编号?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2344)

--  作者:floor2
--  发布时间:2009/4/7 23:28:00
--  怎样才能实现自动编号?
 需要根据 日期列和产品名,生成一个产品编号? 该如何实现,同时在狐表的哪部分内容可以看到以上的帮助,谢谢

--  作者:狐狸爸爸
--  发布时间:2009/4/7 23:32:00
--  
在论坛搜索一下“编号”看看。
--  作者: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

该怎么改才不会出错啊,产品编号的位数不一定的,怎样才能实现?
[此贴子已经被作者于2009-4-8 0:07:00编辑过]

--  作者:floor2
--  发布时间:2009/4/8 0:30:00
--  
版主帮忙看下,在线等

--  作者:程兴刚
--  发布时间:2009/4/8 0:35:00
--  

给您解决完的都没有回音,还等啥呀!


--  作者:狐狸爸爸
--  发布时间:2009/4/8 0:39:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.table


--  作者:floor2
--  发布时间:2009/4/8 0:41:00
--  
???

前面几个问题 我都找到答案,不劳你们了,不是说了吗?晕

实在没办法,才麻烦你们。。。。

--  作者:狐狸爸爸
--  发布时间:2009/4/8 0:42:00
--  
看六楼
--  作者:程兴刚
--  发布时间:2009/4/8 0:45:00
--  
哦,这个不要了?我没注意!

http://www.foxtable.com/dispbbs.asp?boardid=2&Id=2343
[此贴子已经被作者于2009-4-8 7:59:14编辑过]

--  作者:floor2
--  发布时间:2009/4/8 0:50:00
--  
晕 刚才刷不出来

版主提供的刚才在论坛上看过,不过没看懂 呵呵

我想实现的编号是  生产日期+产品编号  就可以了,不用另外加序号,同时产品编号的位数是不确定的,有时多有时少