Foxtable(狐表)用户栏目专家坐堂 → 关于数据入库问题


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

主题:关于数据入库问题

帅哥哟,离线,有人找我吗?
有点蓝
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/10/5 15:28:00 [显示全部帖子]

历史绑定商户ID like 'LLK%'"   -- 这个是干嘛用的?


代码放到datarowadding事件

Dim max  As  String
Dim idx  As  Integer
max = e.DataTable.Compute("Max(历史绑定商户ID)")
If max > ""  Then  '如果存在最大编号
    idx = CInt(max.SubString(6)) + 1  '获得最大编号的后三位顺序号,并加1
Else
    idx = 1  '否则顺序号等于1
End  If

e.DataRow("历史绑定商户ID") = "LSBDSH" & Format(idx,"000000")

 回到顶部
总数 12 上一页 1 2