Foxtable(狐表)用户栏目专家坐堂 → 后台锁定行操作


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

主题:后台锁定行操作

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


加好友 发短信
等级:超级版主 帖子:113609 积分:578570 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/8 11:48:00 [显示全部帖子]

有多余空格:Where 申请单号 = '" & dh & " '"

直接是SQL更新不就行了

Dim cmd As new  SQL Command
cmd.C
Dim dt1 As DataTable
cmd.CommandText =  "update {入库单} set [_locked]=1 Where 申请单号 = '" & dh & "'"
cmd.ExecuteNonQuery()

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


加好友 发短信
等级:超级版主 帖子:113609 积分:578570 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/8 13:42:00 [显示全部帖子]

Dim dh As String = Forms("申请单录入").Controls("tb申请单号").text


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


加好友 发短信
等级:超级版主 帖子:113609 积分:578570 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/8 14:11:00 [显示全部帖子]

access改为:cmd.CommandText = "u pdate {入库单} set [_locked]=true Where 申请单号 = '" & dh & "'"

如果MessageBox弹不出来,说明这个事件根本就没有执行到。代码是放在哪里的?

 回到顶部