主题：关于外部数据批量导出的问题

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

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

 导出成Excel表格，还是导出成Access数据库？

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

 如果导出的是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