Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共8 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:MYSQL使用提取不重复报错

1楼
lin98 发表于:2024/2/7 22:49:00
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编辑过]
2楼
有点蓝 发表于:2024/2/8 8:39:00
Table2、Table3这2个表控件是怎么绑定后台表的?相关代码发上来看看
3楼
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


4楼
有点蓝 发表于:2024/2/8 14:19:00
窗口表如果不做任何绑定,默认都是第一列,第二列这种名称,不可能有单号,客户这些列
5楼
lin98 发表于:2024/2/8 15:31:00
那是不是Table3创建列名称,如第一列为单号,第二列为客户?
先创建临时表,给临时表写名字段名后,再执行一楼的代码?
6楼
有点蓝 发表于:2024/2/8 15:37:00
是得
7楼
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)

执行上面代码,没反应
8楼
有点蓝 发表于:2024/2/8 15:45:00
http://www.foxtable.com/webhelp/topics/1909.htm

Tables("窗口1_Table1").DataSource = dtb.BuildDataSource()
共8 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.