Foxtable(狐表)用户栏目专家坐堂 → 菜单代码问题


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

主题:菜单代码问题

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


加好友 发短信
等级:四尾狐 帖子:929 积分:6500 威望:0 精华:0 注册:2014/6/25 10:48:00
菜单代码问题  发帖心情 Post By:2015/4/8 15:57:00 [只看该作者]

老师,我的菜单代码有问题,在前些时间可以执行,今天再执行就提示有问题了,如下面的代码是菜单中审核的代码:

For Each r As Row In Tables("zjsqb").Rows
  If User.IsRole("总工办") Then
     If r("XZH") = True Then
        If CurrentTable.current.IsNull("sjsb") Then
            MessageBox.Show("数据未确定上报!.")
        Else
           If CurrentTable.current.IsNull("总工办") Then
                MessageBox.Show("审核意见为空,请检查!.")
         Else
            r("JTZGB3") = User.Name
            r("时间5") = Date.Today()
            r.Save()
           End If
        End If
      End If
    End If
 Next
 For Each r As Row In Tables("zjjhb").Rows
   If User.IsRole("总工办") Then
     If r("XZH") = True Then
        If CurrentTable.current.IsNull("shr") Then
            MessageBox.Show("部门负责人没有审核,不允许审核!.")
        Else
         If CurrentTable.current.IsNull("SHYJ") Then
                MessageBox.Show("你没有审定金额,请检查!.")
        Else
            r("SH") = User.Name
            r.Save()
         End If
      End If
     End If
   End If
Next

 

第二段代码中,并没有有关于“SJSB”列的代码,但执行后提示错误:

 

.NET Framework 版本:2.0.50727.3655
Foxtable 版本:2014.11.11.1
错误所在事件:菜单,审    核,Click
详细错误信息:
Column 'sjsb' does not belong to table ZJJHB.

 

请老师帮助分析一下是什么原因呢?谢谢!!



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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/8 15:58:00 [只看该作者]

CurrentTable.current.IsNull("sjsb")

当前表没有这个列

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/4/8 16:01:00 [只看该作者]

写代码,最好明确表名,少用CurrentTable


 回到顶部