| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何导出临时表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=142769) |
| -- 作者：hbhb -- 发布时间：2019/11/5 17:50:00 -- 如何导出临时表 大师：请问如何把SQL语句生成的临时表导出为文本文件？ |
| -- 作者：有点蓝 -- 发布时间：2019/11/5 20:31:00 -- 方法1、绑定到窗口表，然后按正常方式导出：http://www.foxtable.com/webhelp/topics/0683.htm 2、手工写入txt文件：http://www.foxtable.com/webhelp/topics/0345.htm 用法和这里一样反过来就可以了：http://www.foxtable.com/webhelp/topics/2629.htm
|
| -- 作者：hbhb -- 发布时间：2019/11/5 22:37:00 -- 方法一可以吗？例子 |
| -- 作者：有点蓝 -- 发布时间：2019/11/5 22:46:00 -- http://www.foxtable.com/webhelp/topics/1778.htm |
| -- 作者：hbhb -- 发布时间：2019/11/5 22:56:00 -- 我说的是SQL命令直接生成的数据集表 |
| -- 作者：有点蓝 -- 发布时间：2019/11/5 23:02:00 -- 一样 |
| -- 作者：hbhb -- 发布时间：2019/11/6 9:02:00 -- Dim c_m——d As New S——QLCommand Dim dt As DataTable c_md.C c_md.CommandText = "S__ELECT * From {GLVch}" dt = c_md.ExecuteReader() Dim tb As WinForm.Table = e.Form.Controls("Table1") tb.Table.DataSource = dt MessageBox.Show(tb.Table.name) MessageBox.Show(tb.Table.DataTable.name) Dim ex As New Exporter MessageBox.Show(0) ex.SourceTableName = tb.Table.name \'指定导出表 MessageBox.Show(1) ex.FilePath = "d:\\测试\\" \'指定目标文件路径 MessageBox.Show(2) ex.Format = "Fixed" \'导出格式为固定宽度的文本文件 MessageBox.Show(3) ex.NewTableName = "导出文本1" \'指定文件名,注意无须扩展名 MessageBox.Show(4) ex.Export() \'开始导出 MessageBox.Show(5)
|
| -- 作者：hbhb -- 发布时间：2019/11/6 9:03:00 -- 这样写为什么不行？ |
| -- 作者：有点蓝 -- 发布时间：2019/11/6 9:15:00 -- 我测试没有问题 |
| -- 作者：hbhb -- 发布时间：2019/11/6 9:26:00 -- 运行没有问题，但文件为空，没有数据。 |