以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  为什么不能像导出Access时选择表一样导出Excel呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49019)
--  作者：zyys2813
--  发布时间：2014/4/10 17:44:00
--  为什么不能像导出Access时选择表一样导出Excel呢?

Dim tbx As Table
For Each tbx In Tables
Dim ex As New Exporter
ex.SourceTableName = tbx.Name \'指定导出表
ex.FilePath = "c:\\Data\\tbx.xls" \'指定目标文件
ex.Format = "Excel" \'导出格式为Excel
ex.Export() \'开始导出
Next

 

不好用,好像是有关联表的情况下就卡住了
--  作者：Bin
--  发布时间：2014/4/10 17:45:00
--  
遍历DatatableS 不要遍历TableS