以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- MYSQL使用提取不重复报错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=190478) |
-- 作者:lin98 -- 发布时间:2024/2/7 22:49:00 -- MYSQL使用提取不重复报错 MYSQL使用提取不重复,执行下面代码报错,提示找不到"单号,客户" ,"窗口_Table2"表是有"单号,客户",如何解决? Dim f As New Filler f.SourceTable = DataTables("窗口1_Table2") \' f.SourceCols = "单号,客户" f.DataTable = DataTables("窗口1_Table3") \' f.DataCols = "单号,客户" \' f.Fill() \'填充数据
[此贴子已经被作者于2024/2/8 12:37:42编辑过]
|
-- 作者:有点蓝 -- 发布时间:2024/2/8 8:39:00 -- Table2、Table3这2个表控件是怎么绑定后台表的?相关代码发上来看看 |
-- 作者:lin98 -- 发布时间:2024/2/8 12:46:00 -- Table2 、Table3是SQLTable, Table3是没绑定后台表,就是一个空表,想从Table2提取不重复数据 Table2加载数据 Dim s As String\'定义变量为S s = dr2("Xjry") Dim db = HySq-l.DataBaseFactory.CreateDatabase("myj") Dim Sq-l2 = "Selec-t * From 表A as a Inner Join 表B as b On (a.单号 = b.单号) where (b.制单人= \'" & _Username & "\' or b.UserID in (\'" & s.Replace(",", "\',\'") & "\')) And (a.审核= \'已审核\' And a.选中= False) " Dim dt2 As system.data.DataTable = db.ExecuteDataSet(Sql-2).Tables(0) Dim t2 As Table = e.Form.Controls("Table2").Table t2.datasource = dt2.Copy t2.AllowEdit = True |
-- 作者:有点蓝 -- 发布时间:2024/2/8 14:19:00 -- 窗口表如果不做任何绑定,默认都是第一列,第二列这种名称,不可能有单号,客户这些列 |
-- 作者:lin98 -- 发布时间:2024/2/8 15:31:00 -- 那是不是Table3创建列名称,如第一列为单号,第二列为客户? 先创建临时表,给临时表写名字段名后,再执行一楼的代码?
|
-- 作者:有点蓝 -- 发布时间:2024/2/8 15:37:00 -- 是得 |
-- 作者:lin98 -- 发布时间:2024/2/8 15:44:00 -- Table3的表类型SQLTable \'创建临时表 Dim dtb As New DataTableBuilder("窗口_Table3") Dim dtb As New DataTableBuilder("Table3") dtb.AddDef("订单登记单号", GetType(String), 32) dtb.AddDef("客户", GetType(String), 50) dtb.AddDef("客户代号", GetType(String), 32) 执行上面代码,没反应
|
-- 作者:有点蓝 -- 发布时间:2024/2/8 15:45:00 -- http://www.foxtable.com/webhelp/topics/1909.htm Tables("窗口1_Table1").DataSource = dtb.BuildDataSource() |