Foxtable(狐表)用户栏目专家坐堂 → 关于增加审核内容的代码


  共有3046人关注过本帖平板打印复制链接

主题:关于增加审核内容的代码

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


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
关于增加审核内容的代码  发帖心情 Post By:2014/4/21 16:44:00 [只看该作者]

If User.Group = "主管" Then
    Tables(
"表A").Current("审核") = UserName
    Tables(
"表A").Current("审核日期") = Date.Today()
    Tables(
"表A").Current.Save()
Else

    MessageBox.show(
"你无审核权限!")
End
 If

我想在以上代码上,增加“审核内容”项目,制定列是“审核内容”,对应控件是textbox1,代码应该如何写??

If User.Group = "主管" Then
    Tables(
"表A").Current("审核") = UserName
    Tables(
"表A").Current("审核日期") = Date.Today()
    Tables("表A").Current("审核内容") = textbox1
    Tables(
"表A").Current.Save()
Else

    MessageBox.show(
"你无审核权限!")
End
 If

这样写,代码不行额,请老师给意见

 回到顶部