以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  不同用户登录出错问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=126850)

--  作者:Engineer1
--  发布时间:2018/10/30 11:46:00
--  不同用户登录出错问题
.NET Framework 版本:2.0.50727.8798
Foxtable 版本:2018.10.9.1
错误所在事件:lhjc,CurrentChanged
详细错误信息:
未将对象引用设置到对象的实例。
还请老师看下,不同用户打开窗口的时候,有的出现上面的错误,有的没有,是不是和表有关,我该怎么做

--  作者:有点甜
--  发布时间:2018/10/30 11:47:00
--  

1、贴出你currentChanged事件代码。

 

2、在第一句加入,如

 

If e.table.current Is Nothing Then return

 

 


--  作者:Engineer1
--  发布时间:2018/10/30 12:14:00
--  
是加在窗口事件afterload里吗,我试了一下还是不行
--  作者:有点甜
--  发布时间:2018/10/30 12:25:00
--  
以下是引用Engineer1在2018/10/30 12:14:00的发言:
是加在窗口事件afterload里吗,我试了一下还是不行

 

1、贴出你currentChanged事件代码。

 

2、在currentChanged第一句加入,如

 

If e.table.current Is Nothing Then return


--  作者:Engineer1
--  发布时间:2018/10/30 12:30:00
--  
If e.form.controls("table3").Table.rows.count > 0 Then
    Dim r As Row = Tables("理化检测_table3").current
    If r("报告编号") <> "" Then
        If user.isrole("录入")
            e.Form.controls("button10").enabled = True
        End If
    Else
        e.Form.controls("button10").enabled = False
    End If
End If
我已经在几个当前事件里都加上了,还是报错

--  作者:Engineer1
--  发布时间:2018/10/30 12:35:00
--  
按你说的加上可以了