共8 条记录, 每页显示 10 条, 页签: [1]

标题：求助－加载的SQLtable中数据读取

1楼

lovetoday 发表于：2024/3/12 11:31:00

老师，在都是内部表时，我在datacolchanged里用下面代码，可以用当前表的[砼销明细_销售名称]列，从白塔销售档案表中，通过[销售档案_客户名称]列找到对应的销档及单价日期的数，但是在加载到SQLtable后，如何让当前表从未加载的SQL数据库中的表“白塔销售档案”中，让下面代码在按钮的事件中，实现相同功能，要整列处理，请老师帮忙修改下代码，谢谢！

If e.DataCol.name = "砼销明细_销售名称" Then

Dim fdr As DataRow = DataTables("白塔销售档案").find("销售档案_客户名称='" & e.DataRow("砼销明细_销售名称") & "'")

If fdr IsNot Nothing Then

e.DataRow("砼销明细_销档") = fdr("销售档案_销档")

e.DataRow("砼销明细_单价日期") = fdr("销售档案_单价日期")

Else

e.DataRow("砼销明细_销档") = Nothing

e.DataRow("砼销明细_单价日期") = Nothing

End If

2楼

cd_tdh 发表于：2024/3/12 11:38:00

Dim fdr As DataRow = DataTables("白塔销售档案").sqlfind("销售档案_客户名称='" & e.DataRow("砼销明细_销售名称") & "'")

3楼

有点蓝 发表于：2024/3/12 11:40:00

使用sqlfind：http://www.foxtable.com/webhelp/topics/2911.htm

4楼

有点蓝 发表于：2024/3/12 11:41:00

或者SQLcommand：http://www.foxtable.com/webhelp/topics/0696.htm

5楼

lovetoday 发表于：2024/3/12 13:00:00

For Each r As Row In Tables("工作总表_Table7").Rows

If r("砼销明细_销售名称0") = Nothing Then

r("砼销明细_销档") = Nothing

r("砼销明细_单价日期") = Nothing

Else

Dim fdr As DataRow = DataTables("白塔销售档案").SQLFind(" 销售档案_客户名称0 = '" & fdr("砼销明细_销售名称") & "' ")

If fdr IsNot Nothing Then

fdr("砼销明细_销档") = fdr("销售档案_销档")

fdr("砼销明细_单价日期") = fdr("销售档案_单价日期")

Else

fdr("砼销明细_销档") = Nothing

fdr("砼销明细_单价日期") = Nothing

End If

提示：不存在名称为“白塔销售档案”的DataTables

老师，请问如何处理？

6楼

有点蓝 发表于：2024/3/12 14:25:00

如果没有添加到外部表中，使用4楼的用法

7楼

lovetoday 发表于：2024/3/12 16:53:00

老师，我查看帮助以及在论坛里找了相关的帖子，都没有解决这个问题，能否请你帮我改下代码，我是编程小白，还请老师辛苦下

8楼

有点蓝 发表于：2024/3/12 16:55:00

把这个表添加到外部表管理中：http://www.foxtable.com/webhelp/topics/1812.htm

共8 条记录, 每页显示 10 条, 页签: [1]