网络用户自动编号代码错误 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 网络用户自动编号代码错误

共有4402人关注过本帖树形打印复制链接主题：网络用户自动编号代码错误

有点甜

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/3/28 16:08:00 [显示全部帖子]

登陆密码是多少？

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/3/28 17:03:00 [显示全部帖子]

看了一下，两个问题。

1、DataRowAdded代码

e.DataRow("下单日期") = Date.Today
e.DataRow("编辑者") = User.Name
e.DataRow.Save

2、DoubleClick

cmd.CommandText = "Select 编辑者 From {订单} Where 编号 = '" & e.Row("编号") & "'"

有点甜

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/3/28 17:24:00 [显示全部帖子]

以下是引用刘星在2014-3-28 17:17:00的发言：

谢谢，但这样是不是DataRowAdding下的这段代码是没什么作用的吗？

Static Index As Integer = 99999
e.DataRow("编号") = Format(Date.Today(),"yyMM") & "-" & Index
Index = Index - 1

这个看你想怎样了，两种方法，上面是方法一。

方法二：把 e.DataRow.Save 去掉，修改doublClick的代码

If e.Row.DataRow.RowState <> DataRowState.Added Then

    Dim cmd As New SQLCommand
    cmd.C
    。。。。。。

End I

主题：网络用户自动编号代码错误