Foxtable(狐表)用户栏目专家坐堂 → 用户登录窗退出时报错


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

主题:用户登录窗退出时报错

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


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
用户登录窗退出时报错  发帖心情 Post By:2015/12/25 20:20:00 [只看该作者]

大红袍老师,我做了自定义用户登录窗口界面,其中取消登录的BUTTON按下后,         其他都正常!
提示:
.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2015.11.11.1
错误所在事件:项目,BeforeCloseProject
详细错误信息:
未将对象引用设置到对象的实例。

BUTTON的控件代码很简单就是Forms("用户登录“).Close()    帮助里的是e.Form.Close()


BeforeCloseProject里面只有如下代码,是否对此有影响


Dim dt As DataTable = DataTables("登录操作日志")
Dim dr As DataRow = dt.find(("用户 = '" & _UserName & "' and 退出时间 is null"))
dr("用户") = _UserName
dr("退出时间")= Date.Now()
dt.save()

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/26 8:46:00 [只看该作者]

Dim dt As DataTable = DataTables("登录操作日志")
Dim dr As DataRow = dt.find(("用户 = '" & _UserName & "' and 退出时间 is null"))
if dr innot nothing then
   dr("用户") = _UserName
   dr("退出时间")= Date.Now()
   dt.save()
end if

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


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
  发帖心情 Post By:2015/12/26 9:56:00 [只看该作者]

if dr innot nothing then 放在BeforeCloseProject里面就报错了,DataRow不能转换为Boolean

好像把if dr innot nothing then改成if dr isnot nothing then可用,不知这样改可以吗?

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/26 10:16:00 [只看该作者]

if dr innot nothing
if dr isnot nothing,手打错误

 回到顶部