您正在 access911.net -> 静态资料库

作者：cg1 摘自：access911.net 录入：cg1 时间：2006-12-12 浏览人次：425

简述：如何将整个 MDB 中所有的表全部导出到一个 XLS 中去？《ADO/DAO/ADO.NET》

新建一个模块，然后将下列代码复制进去，按 F5 运行即可

'===========================================================
' 过程及函数名：  ExportTableToOneXls
' 版本号      ：  1.0
' 说明        ：  本函数作用：将当前 MDB 中的所有用户表导出到
'                 某一个 Excel 的 XLS 中去
' 引用        ：  ADO 2.1 及以上版本
' 输入参数    ：  XlsPath 文本，目标 XLS 的绝对路径
' 输出值      ：  --
' 返回值      ：  --
' 调用演示    ：  ExportTableToOneXls "c:\tempExEg.xls"
'                 （或请直接看 test 过程。）
' 最后修改日期：  2006-12-12 16:22:00
' 示例地址    ：  http://access911.net/?kb.....................
...........