以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于外部数据批量导出的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=25890)

--  作者:云淡风轻
--  发布时间:2012/11/19 15:27:00
--  关于外部数据批量导出的问题

连接外部数据源,如何一次性的批量导出所有加载进项目的表?

基本菜单的导出功能是一张表一张表的导出,我现在想批量导出所有的表,代码如何写呢?


--  作者:lin_hailun
--  发布时间:2012/11/19 15:30:00
--  
 导出成Excel表格,还是导出成Access数据库?
--  作者:云淡风轻
--  发布时间:2012/11/19 15:39:00
--  

两种代码都要的,一般使用excel,但单表数据超过7万,就用导出成access


--  作者:lin_hailun
--  发布时间:2012/11/19 15:55:00
--  
 如果导出的是Access,就不需要导出了,直接用菜单里的ToAccess就可以把所有的表保存到数据库里了。

 如果是Excel,可以通过编写代码的方式循环导出。

 dim tnames() as string = {"表D", "表C", "表A"}
 for each tname as string in tnames
     Tables(tname).SaveExcel("d:\\aaa.xls", tname)
 next

http://www.foxtable.com/help/topics/0559.htm