以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  菜单代码问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=66510)

--  作者:爱相随
--  发布时间: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
--  发布时间:2015/4/8 15:58:00
--  
CurrentTable.current.IsNull("sjsb")

当前表没有这个列

--  作者:狐狸爸爸
--  发布时间:2015/4/8 16:01:00
--  

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