| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求助－加载的SQLtable中数据读取 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=190892) |
| -- 作者：lovetoday -- 发布时间：2024/3/12 11:31:00 -- 求助－加载的SQLtable中数据读取 老师，在都是内部表时，我在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 End If |
| -- 作者：cd_tdh -- 发布时间：2024/3/12 11:38:00 -- Dim fdr As DataRow = DataTables("白塔销售档案").sqlfind("销售档案_客户名称=\'" & e.DataRow("砼销明细_销售名称") & "\'") |
| -- 作者：有点蓝 -- 发布时间：2024/3/12 11:40:00 -- 使用sqlfind：http://www.foxtable.com/webhelp/topics/2911.htm |
| -- 作者：有点蓝 -- 发布时间：2024/3/12 11:41:00 -- 或者SQLcommand：http://www.foxtable.com/webhelp/topics/0696.htm |
| -- 作者：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 End If Next 提示：不存在名称为“白塔销售档案”的DataTables 老师，请问如何处理？
|
| -- 作者：有点蓝 -- 发布时间：2024/3/12 14:25:00 -- 如果没有添加到外部表中，使用4楼的用法 |
| -- 作者：lovetoday -- 发布时间：2024/3/12 16:53:00 -- 老师，我查看帮助以及在论坛里找了相关的帖子，都没有解决这个问题，能否请你帮我改下代码，我是编程小白，还请老师辛苦下 |
| -- 作者：有点蓝 -- 发布时间：2024/3/12 16:55:00 -- 把这个表添加到外部表管理中：http://www.foxtable.com/webhelp/topics/1812.htm |