以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  全局表报错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62015)

--  作者:xjc620
--  发布时间:2014/12/24 9:45:00
--  全局表报错
全局表click事件如下代码,但是其它中有一个表的内容没有车号列,报错.怎么触决
If e.Table.Current Is Nothing Then
    Return
Else
    Dim dr As DataRow= DataTables("日新车队").Find("标记 = true and 车号 = \'" & e.Table.Current("车号") & "\'")
    If dr IsNot Nothing Then
        msgbox(dr("备注"))
    End If
End If

.NET Framework 版本:2.0.50727.6421
Foxtable 版本:2014.11.11.1
错误所在事件:全局表事件,Click
详细错误信息:
列“车号”不属于表 发送内容。


--  作者:有点甜
--  发布时间:2014/12/24 9:47:00
--  
 If e.Table.Cols.Contains("车号") Then
    If e.Table.Current Is Nothing Then
        Return
    Else
        Dim dr As DataRow= DataTables("日新车队").Find("标记 = true and 车号 = \'" & e.Table.Current("车号") & "\'")
        If dr IsNot Nothing Then
            msgbox(dr("备注"))
        End If
    End If
End If