400
社区成员
发帖
与我相关
我的任务
分享Null object reference怎么解决？
我的代码是：
integer li_dyh
li_Dyh=integer(em_1.text)
update his.wl_dyhs set dyhs = :li_dyh where dyhs=dyhs USING SQLHIS;
if sqlhis.SQLCode = 0 then
messagebox('提示','设置成功!')
else
messagebox('提示','设置失败!')
end if
close(w_wl_kfgl_dyhs)
报错是
请问大神怎么解决
integer li_dyh
li_Dyh=integer(em_1.text)
update his.wl_dyhs set dyhs = :li_dyh where dyhs=dyhs USING SQLHIS;
if sqlhis.SQLCode = 0 then
messagebox('提示','设置成功!')
else
messagebox('提示','设置失败!')
end if
close(w_wl_kfgl_dyhs)
报错是
请问大神怎么解决
...全文
请发表友善的回复…
发表回复
划]破 2018-01-11
- 打赏
- 举报
看你两处的代码，报错原因：要么sqlhis没创建，要么w_wl_kfgl_dyhs这个窗口没实例化； 调试的时候可以注释掉某行代码试试看
qq_39776397 2018-01-11
- 打赏
- 举报
创建了的，我试了下面这段代码也会报错
string ls_dy
select dyhs into:ls_dy from wl_dyhs using sqlhis;
w_wl_kfgl_dyhs.sle_1.text=ls_dy
debug了一下发现值已经取到ls_dy里了 然后在最后一句赋值的时候也同样报了空引用对象的错
划]破 2018-01-11
- 打赏
- 举报
事务没创建吧，看下你的sqlhis是否实例化
