| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 文本报表疑问 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93814) |
|
| -- 作者：ming8604 -- 发布时间：2016/12/7 18:01:00 -- 文本报表疑问 看了报表帮助。改了几次，都没成功。 导出订单里的订单明细部分列，并且不要列头部分。生成TXT文档，并保存指定位置。 求按钮代码。谢谢···
|
|
| -- 作者：有点蓝 -- 发布时间：2016/12/7 18:08:00 -- 贴出你的代码 |
|
| -- 作者：有点色 -- 发布时间：2016/12/7 18:33:00 -- 参考帮助文档
http://www.foxtable.com/webhelp/scr/0683.htm
|
|
| -- 作者：ming8604 -- 发布时间：2016/12/8 15:55:00 -- 是这么改吗？ Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog dlg.Filter= "txt文件|*.txt" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 Dim ex As New Exporter ex.SourceTableName = "订单.明细" \'指定导出表 ex.Format = "Fixed" \'导出格式为固定宽度的文本文件 ex.Fields = "日期,客户,数量,单价" \'指定导出字段 ex.filepath = dlg.FileName \'指定目标文件 ex.Export() \'开始导出 End If 并想设置成勇TAB符号分隔列，不含标题行。 求指导。 |
|
| -- 作者：有点蓝 -- 发布时间：2016/12/8 16:21:00 -- Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog dlg.Filter= "txt文件|*.txt" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 Dim ex As New Exporter ex.SourceTableName = "表A" \'指定导出表 ex.Format = "Fixed" \'导出格式为固定宽度的文本文件 ex.Fields = "编码,品名,数量,单价,金额" \'指定导出字段 ex.filepath = dlg.FileName.Replace(FileSys.GetName(dlg.FileName),"") \'指定目标文件 ex.NewTableName = FileSys.GetName(dlg.FileName).Split(".")(0) ex.Header = False ex.Export() \'开始导出 End If |
|
| -- 作者：ming8604 -- 发布时间：2016/12/8 17:47:00 -- ex.SourceTableName = "表A" \'指定导出表 这个，我要选A表的明细表，（A表关联表）。怎么写? |
|
| -- 作者：有点蓝 -- 发布时间：2016/12/8 20:11:00 -- 不要那么死板，替换为自己需要的 |
|
| -- 作者：ming8604 -- 发布时间：2016/12/9 9:34:00 -- 就是这么改的啊。。 然后提示错误： 不存在名称为 “订单.明细” 的datetable
|
|
| -- 作者：有点蓝 -- 发布时间：2016/12/9 9:47:00 -- ex.SourceTableName = "明细" \'不能用关联表 |
|
| -- 作者：ming8604 -- 发布时间：2016/12/9 12:11:00 -- 如果我只用
可我想导出的，是该订单的明细啊·~~
[此贴子已经被作者于2016/12/9 13:56:50编辑过]
|