Foxtable(狐表) → 用户栏目 → 专家坐堂 → 用SQL语句生成临时表“窗口_table2”为SQLTable，为什么表内容没有加载进来？


  共有2282人关注过本帖树形打印复制链接

主题：用SQL语句生成临时表“窗口_table2”为SQLTable，为什么表内容没有加载进来？
帅哥哟，离线，有人找我吗？
yetle
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		用SQL语句生成临时表“窗口_table2”为SQLTable，为什么表内容没有加载进来？  发帖心情 Post By：2018/7/16 13:57:00 [只看该作者]

Dim tbl As Table = Tables("选择款_Table1")
Dim pd As WinForm.ComboBox = Forms("窗口").Controls("ComboBox1")
If tbl.Current IsNot Nothing Then
    pd.text = tbl.Current("款号")
End If

'用SQL语句生成临时表
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "Select * F ROM {款号登记} left JOIN {款式颜色} ON {款号登记}.款号 = {款式颜色}.款号 left join {款式尺码} on {款号登记}.{款号}= {款式尺码}.{款号} "

‘’这句改成：
cmd.CommandText = "Select * F ROM {款号登记} A left JOIN {款式颜色} B ON A.款号 = B.款号 left join {款式尺码} C on A.{款号}= B.{款号} "

dt = cmd.ExecuteReader()
'对临时进行分组统计
Dim b As New CrossTableBuilder("大货用量颜色尺码",dt)
b.HGroups.AddDef("物料基本信息_序号")
b.HGroups.AddDef("物料基本信息_物料大类")
b.HGroups.AddDef("物料基本信息_客供")
b.HGroups.AddDef("物料基本信息_物料名称")
b.HGroups.AddDef("物料基本信息_物料辅助说明")
b.HGroups.AddDef("物料基本信息_部位及用途")
b.HGroups.AddDef("物料基本信息_布封")
b.HGroups.AddDef("物料基本信息_克重")
b.HGroups.AddDef("物料基本信息_单位")
b.HGroups.AddDef("物料基本信息_版规格配色要求")
b.HGroups.AddDef("物料基本信息_不分色")
b.HGroups.AddDef("物料基本信息_适用颜色")
b.HGroups.AddDef("物料基本信息_同色")
b.HGroups.AddDef("物料基本信息_同量")
b.HGroups.AddDef("物料基本信息_分码")
b.HGroups.AddDef("物料基本信息_适用尺码")
b.HGroups.AddDef("物料基本信息_物料编码")
b.HGroups.AddDef("用量信息_待定")
b.HGroups.AddDef("用量信息_上级")
b.HGroups.AddDef("用量信息_领料部门")
b.HGroups.AddDef("用量信息_变更日期")
b.HGroups.AddDef("用量信息_下级")
b.HGroups.AddDef("供应商属性_供应商名称")
b.HGroups.AddDef("供应商属性_转换率")
b.HGroups.AddDef("供应商属性_采购单位")
b.HGroups.AddDef("供应商属性_成份")


b.VGroups.AddDef("颜色","颜色_{0}")
b.VGroups.AddDef("尺码","尺码_{0}")

'b.VGroups.AddDef("B.颜色","B.颜色_{0}")
'b.VGroups.AddDef("C.尺码","C.尺码_{0}")



b.HorizontalTotal = True
b.VerticalTotal = True
b.Build()
' MainTable = Tables("横向出货计划1")
Tables("窗口_Table2").DataSource = b.Build()

DataTables("窗口_Table2").load()





Forms("选择款").Close()
[此贴子已经被作者于2018/7/26 16:47:51编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
y2287958
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：4628 积分：33778 威望：0 精华：0 注册：2008/8/31 22:44:00 		  发帖心情 Post By：2018/7/16 14:16:00 [只看该作者]

Tables("窗口_Table2").DataSource = b.BuildDataSource()

 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2018/7/16 14:20:00 [只看该作者]

b.Build() 都删除，改成

 

Tables("窗口_Table2").DataSource = b.BuildDataSource()

 
 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		VGroups加载没有显示颜色尺码  发帖心情 Post By：2018/7/26 16:43:00 [只看该作者]

Dim tbl As Table = Tables("选择款_Table1")
Dim pd As WinForm.ComboBox = Forms("窗口").Controls("ComboBox1")
If tbl.Current IsNot Nothing Then
    pd.text = tbl.Current("款号")
End If

'用SQL语句生成临时表
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "Select * F ROM {款号登记} left JOIN {款式颜色} ON {款号登记}.款号 = {款式颜色}.款号 left join {款式尺码} on {款号登记}.{款号}= {款式尺码}.{款号} "

‘’这句改成：
cmd.CommandText = "Select * F ROM {款号登记} A left JOIN {款式颜色} B ON A.款号 = B.款号 left join {款式尺码} C on A.{款号}= B.{款号} "
也没有加载显示颜色尺码

dt = cmd.ExecuteReader()
'对临时进行分组统计
Dim b As New CrossTableBuilder("大货用量颜色尺码",dt)
b.HGroups.AddDef("物料基本信息_序号")
b.HGroups.AddDef("物料基本信息_物料大类")
b.HGroups.AddDef("物料基本信息_客供")
b.HGroups.AddDef("物料基本信息_物料名称")
b.HGroups.AddDef("物料基本信息_物料辅助说明")
b.HGroups.AddDef("物料基本信息_部位及用途")
b.HGroups.AddDef("物料基本信息_布封")
b.HGroups.AddDef("物料基本信息_克重")
b.HGroups.AddDef("物料基本信息_单位")
b.HGroups.AddDef("物料基本信息_版规格配色要求")
b.HGroups.AddDef("物料基本信息_不分色")
b.HGroups.AddDef("物料基本信息_适用颜色")
b.HGroups.AddDef("物料基本信息_同色")
b.HGroups.AddDef("物料基本信息_同量")
b.HGroups.AddDef("物料基本信息_分码")
b.HGroups.AddDef("物料基本信息_适用尺码")
b.HGroups.AddDef("物料基本信息_物料编码")
b.HGroups.AddDef("用量信息_待定")
b.HGroups.AddDef("用量信息_上级")
b.HGroups.AddDef("用量信息_领料部门")
b.HGroups.AddDef("用量信息_变更日期")
b.HGroups.AddDef("用量信息_下级")
b.HGroups.AddDef("供应商属性_供应商名称")
b.HGroups.AddDef("供应商属性_转换率")
b.HGroups.AddDef("供应商属性_采购单位")
b.HGroups.AddDef("供应商属性_成份")


b.VGroups.AddDef("颜色","颜色_{0}")
b.VGroups.AddDef("尺码","尺码_{0}")

'b.VGroups.AddDef("B.颜色","B.颜色_{0}")
'b.VGroups.AddDef("C.尺码","C.尺码_{0}")



b.HorizontalTotal = True
b.VerticalTotal = True
b.Build()
' MainTable = Tables("横向出货计划1")
Tables("窗口_Table2").DataSource = b.Build()

DataTables("窗口_Table2").load()





Forms("选择款").Close()

此主题相关图片如下：111.png
按此在新窗口浏览图片


[此贴子已经被作者于2018/7/26 16:50:16编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		  发帖心情 Post By：2018/7/26 16:48:00 [只看该作者]

111111111111111
[此贴子已经被作者于2018/7/26 16:48:45编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2018/7/26 16:51:00 [只看该作者]

在sql窗口执行这个语句得到的表格是怎样的？截图发出来看看。

 

Select * F ROM {大货用料表} left JOIN {款式颜色}  ON {大货用料表}.款号 = {款式颜色}.款号 left join {款式尺码}  on {大货用料表}.{款号}= {款式尺码}.{款号}

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		  发帖心情 Post By：2018/7/26 17:05:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：111.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2018/7/26 17:08:00 [只看该作者]

在sql窗口执行这个语句得到的表格是怎样的？截图发出来看看。

 

http://www.foxtable.com/webhelp/scr/1484.htm

 

 

Select * F ROM {大货用料表} left JOIN {款式颜色}  ON {大货用料表}.款号 = {款式颜色}.款号 left join {款式尺码}  on {大货用料表}.{款号}= {款式尺码}.{款号}

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		  发帖心情 Post By：2018/7/26 17:19:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：111.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2018/7/26 17:26:00 [只看该作者]

1、在这里测试，得到的列名是什么？

 

http://www.foxtable.com/webhelp/scr/1484.htm

 

2、把列名改成红色代码

 

b.VGroups.AddDef("颜色","颜色_{0}")

 

3、加上统计代码

 

b.Totals.AddDef("某列") '添加数量列用于统计
 回到顶部
总数 13 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询