以文本方式查看主题

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

--  作者:江南小镇
--  发布时间:2021/3/10 14:39:00
--  [求助]
老师好,怎样获取数据库数据表的数据。
If e.DataCol.Name = "商品名称" Then
    If e.NewValue Is Nothing Then
        e.DataRow("商品编码") = Nothing
    Else
        \'Dim dr As DataRow
        dr = DataTables("设置").Find("[名称] = \'" & e.NewValue & "\'")
        If dr IsNot Nothing
            e.DataRow("商品编码") = dr("商品编码")

        End If
    End If
End If

--  作者:有点蓝
--  发布时间:2021/3/10 14:40:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50080


--  作者:江南小镇
--  发布时间:2021/3/10 14:52:00
--  
老师,不会搞,谢谢老师帮忙。
--  作者:有点蓝
--  发布时间:2021/3/10 14:57:00
--  
dr = DataTables("设置").SQLFind("[名称] = \'" & e.NewValue & "\'")
--  作者:江南小镇
--  发布时间:2021/3/10 15:28:00
--  
老师,我是把代码设置在窗口表中的。
Select * Fr om [商品信息]

--  作者:有点蓝
--  发布时间:2021/3/10 15:44:00
--  
没看懂,请截图详细说明一下
--  作者:江南小镇
--  发布时间:2021/3/10 16:20:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:image 1.png
图片点击可在新窗口打开查看
 
--  作者:有点蓝
--  发布时间:2021/3/10 16:26:00
--  
还是没看懂,代码执行有什么问题?
--  作者:江南小镇
--  发布时间:2021/3/10 17:37:00
--  
代码不执行
--  作者:有点蓝
--  发布时间:2021/3/11 8:28:00
--  
窗口表如果是使用fill绑定的,到全局表事件写代码