- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求助，自动编号问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=145098)
-- 发布时间：2020/1/8 11:40:00
-- 求助，自动编号问题
老师，我在数据表page表的datarowadding事件中添加如下代码，想实现按日产生一个编号fentryid，设置为整数类型，但是运行后，所有行的编号都是0，没有自动加一，麻烦帮忙看下问题在哪。
If Forms("凭证生成").opened
Dim dtp As WinForm.DateTimePicker = Forms("凭证生成").Controls("Date1")
Dim FEID As Integer = DataTables("page").compute("max(FEntryID)","Fdate = \'" & dtp.value & "\'")
messagebox.show(feid)
If FEID = Nothing Then
e.DataRow("FEntryID") = 0
Else e.DataRow("FEntryID") = FEID+1
End If
e.DataRow("FGroupID") = "记"
End If
-- 发布时间：2020/1/8 11:51:00
--
If Forms("凭证生成").opened messagebox.show(dtp.value) \'这里显示什么 |
-- 发布时间：2020/1/8 12:01:00
--
messagebox.show(feid) \'这里显示什么
每次都显示0
-- 发布时间：2020/1/8 12:03:00
--
messagebox.show(dtp.value) \'这里显示什么
-- 发布时间：2020/1/8 12:04:00
--
messagebox.show(dtp.value) \'这里显示什么
2020-01-04
-- 发布时间：2020/1/8 12:05:00
--
请上传实例测试
-- 发布时间：2020/1/8 12:13:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:k3.rar |
-- 发布时间：2020/1/8 12:27:00
--
不好意思，老师，刚才测试的时候吧fdate的赋值给删除了，加上后测试数字正常从1开始编号
-- 发布时间：2020/1/8 12:28:00
--
但是这样的话不能从0开始编号
-- 发布时间：2020/1/8 13:24:00
--
好了，搞定了，beforsavedatarow事件里加一条整个id编号减一