以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]能不能用sql调用表格数据到系统内(不是窗口表) (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158456) |
-- 作者:zto001 -- 发布时间:2020/11/20 15:23:00 -- [求助]能不能用sql调用表格数据到系统内(不是窗口表) [求助]能不能用sql调用表格数据到系统内(不是窗口表) |
-- 作者:有点蓝 -- 发布时间:2020/11/20 15:32:00 -- 参考:http://www.foxtable.com/webhelp/topics/0696.htm |
-- 作者:zto001 -- 发布时间:2020/11/20 18:57:00 -- Dim dtb As New DataTableBuilder("表B") dtb.AddDef("姓名", Gettype(String), 32) For Each v As String In DataTables("表A").GetValues("课程") dtb.AddDef(v, Gettype(Double)) Next dtb.Build() For Each v As String In DataTables("表A").GetValues("姓名") Dim dr1 As DataRow = DataTables("表B").AddNew() dr1("姓名") = v For Each dr2 As DataRow In DataTables("表A").DataRows If dr2("姓名") = v Then dr1(dr2("课程")) = dr2("分数") End If Next Next MainTable = Tables("表B") |
-- 作者:zto001 -- 发布时间:2020/11/20 18:58:00 -- 想达到楼上一个效果。暂时这样吧 |