Foxtable(狐表)用户栏目专家坐堂 → [求助]代码报错及移动行的代码求助


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

主题:[求助]代码报错及移动行的代码求助

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/18 10:19:00 [显示全部帖子]

代码放到startedit事件

If e.Table.Cols.Contains("审核") AndAlso e.Table.IsRelation =False Then
    If e.Row("审核") = True AndAlso e.Col.Name <> "审核"  Then '本条记录审核后禁止编辑除审核外的所有列
        e.Cancel = True
    ElseIf e.Row("审核") = False Then '未审核的记录在编辑前检查是否在后台已经被审核
        Dim cmd As New SQLCommand
        cmd.C
        cmd.C ommandText = "S elect [审核] F rom {生产计划辅表} Where [_Identify] = " & e.Row("_Identify") '这里必须使用数据库的表名,不能使用窗口表名称
        Dim sh As  Boolean = cmd.ExecuteScalar() '后台读取的审核列值赋值给sh变量
        If sh = True  Then
            e.Row.load(false) 'http://www.foxtable.com/webhelp/topics/2895.htm
            MessageBox.Show("本条记录已经在后台被审核,现已重新加载!" , "提示" , MessageBoxButtons.OK ,MessageBoxIcon.Information)
        End If
    End If
End If

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/18 11:34:00 [显示全部帖子]

判断名称中有下划线的就是窗口表。可以考虑把窗口表控件名称改为和表名一致,比如table1改为生产计划辅表,然后根据下划线拆分字符串即可

 回到顶部