以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 表属性代码如何窗口上的代码? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196124) |
|
-- 作者:lgz518 -- 发布时间:2025/3/31 11:00:00 -- 表属性代码如何窗口上的代码? Dim dr As DataRow = e.DataRow Dim pr As DataRow If dr.IsNull("品名") OrElse dr.IsNull("型号") OrElse dr.IsNull("规格") Then dr("单价") = Nothing Else Dim filter As String filter = "品名 = \'" & dr("品名") & "\' And 型号 = \'" & dr("型号") & "\' And 规格 = \'" & dr("规格") & "\'" pr = DataTables("产品").Find(filter) If pr IsNot Nothing Then dr("单价") = pr("单价") End If End If 上面表属性代码如何窗口打开后的代码? |
|
-- 作者:有点蓝 -- 发布时间:2025/3/31 11:12:00 -- Dim dr As DataRow = tables("xx表").current.datarow |
|
-- 作者:lgz518 -- 发布时间:2025/3/31 14:51:00 -- Dim db = HySqGGl.DataBaseFactory.CreateDatabase("db") \' Dim dr As DataRow = Tables("窗口_Table1").current.DataRow If dr("用户ID") = _用户ID Then 代码一 Else 代码二 End If 注: ("用户ID")是表A的字段 _用户ID 是全局变量 执行上面代码:报错提示("用户ID")不属于"窗口_Table1",如何改?
|
|
-- 作者:有点蓝 -- 发布时间:2025/3/31 14:54:00 -- 这个表没有这个列名,换个其它名称 |
|
-- 作者:lgz518 -- 发布时间:2025/3/31 15:17:00 -- If dr("用户ID") = _用户ID Then 改为下面,还是报错,提示("编辑人")不属于"窗口_Table1", 后台表A 的有“用户ID、编辑人”这二个字段,不知道为什么提示找不到,如何改?
|
|
-- 作者:有点蓝 -- 发布时间:2025/3/31 15:33:00 -- 前台没有加载这2个列 |
|
-- 作者:lgz518 -- 发布时间:2025/3/31 15:52:00 -- Dim SqGl = "selecGt * from 表A where ([用户ID] = @用户ID ) 这个加载是全部的字段,不知为什么上面条件不行?
|
|
-- 作者:有点蓝 -- 发布时间:2025/3/31 16:20:00 -- 错误提示不会骗人的,说没有肯定就没有。窗口表能看到这2个列名吗 |
|
-- 作者:lgz518 -- 发布时间:2025/3/31 17:09:00 -- |
|
-- 作者:有点蓝 -- 发布时间:2025/3/31 17:23:00 -- 后台表绑定表控件后,窗口表能看到这2个列名吗? |