以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]查询,  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185874)

--  作者:bzqlyj
--  发布时间:2023/3/22 13:41:00
--  [求助]查询,
With wb.AddInputGroup("form1", "ipg2", "查询结果")
            If e.PostValues.ContainsKey("AA") Then
                flt = e.PostValues("AA")
                dr = DataTables("表A").SQLFind("[AA]= \'" & flt & "\'")
                    With .AddInput("AA", "AA", "Text")
                        .Value = dr("AA")
                        .Readonly = True
                    End With
在查询框中输入表A内AA列有的数据,显示正常,如输入表A内AA列没有的数据,显示
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:项目,HttpRequest
详细错误信息:
未将对象引用设置到对象的实例。

--  作者:有点蓝
--  发布时间:2023/3/22 13:43:00
--  
http://www.foxtable.com/webhelp/topics/2911.htm,理解一下示例三
--  作者:cd_tdh
--  发布时间:2023/3/22 13:44:00
--  
 dr = DataTables("表A").SQLFind("[AA]= \'" & flt & "\'")
If dr IsNot Nothing Then 
                    With .AddInput("AA", "AA", "Text")
                        .Value = dr("AA")
                        .Readonly = True
                    End With
end if
最好在加个提示,没找到就提示没有数据。
[此贴子已经被作者于2023/3/22 13:44:51编辑过]