有时,创建一个临时表后,发现需要一个同样结构的内部表, 这时就需要一步一步去建立内部表了, 要是能
复制这个临时表不是很方便嘛?
[此贴子已经被作者于2009-9-29 13:16:51编辑过]
可以将临时表导出为文本文件后再导入
[此贴子已经被作者于2009-9-29 13:30:19编辑过]
可以将导出与导入放在一个按钮中,试试这代码,首先要先建一个临时表名为:统计
Dim ex as New Exporter
ex.SourceTableName = "统计" '指定导出表
ex.FilePath = "c:\" '指定目标文件路径
ex.Format = "Delimited" '导出格式为符号分割的文本文件
ex.NewTableName = "统计" '指定文件名,注意无须扩展名
ex.Export() '开始导出
Dim ip as New Importer
ip.SourcePath = "c:-:special:1:- '指定目录
ip.SourceTableName = "统计" '指定要导入的文件"订单.txt"
ip.NewTableName ="统计2" '导入后的表名
ip.Format = "Delimited" '指定导入格式
ip.Import()
呵呵～ 这个懂了。 主要是想让系统的复制表功能，对临时表也有效，而不用每次都去设计一个按钮（因为事先你不知道哪个项目的哪个临时表，是你想让它成为内部表）。