以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]导出  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158160)
--  作者：hanlingli111999
--  发布时间：2020/11/10 9:11:00
--  [求助]导出
有点蓝老师好
帮助文件里导出Access文件代码为

Dim ex as New Exporter
ex.SourceTableName = "订单" \'指定导出表
ex.filepath = "c:\\Data\\订单.mdb" \'指定目标文件
ex.Export() \'开始导出

我想让”订单.mdb“设置为自动关联标题ApplicationTitle，怎么修改代码
--  作者：有点蓝
--  发布时间：2020/11/10 9:57:00
--  
ex.filepath = "c:\\Data\\" & ApplicationTitle & ".mdb" \'指定目标文件
--  作者：hanlingli111999
--  发布时间：2020/11/10 12:53:00
--  
OK