易表在线答疑技术与交流应用技巧 → [分享]自动导出所有表数据为*.mdb格式方法


  共有22720人关注过本帖平板打印复制链接

主题:[分享]自动导出所有表数据为*.mdb格式方法

美女呀,离线,留言给我吧!
dongd1
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:1329 积分:40 威望:0 精华:0 注册:2003/12/30 16:34:00
[分享]自动导出所有表数据为*.mdb格式方法  发帖心情 Post By:2007/3/4 12:09:00 [只看该作者]

自动导出所有表为Access:
SendKeys(docdir+"Boot.mdb")andSendKeys("{tab}{down}{up 10}~{tab}~{tab}~")  And Do(5) andMsgBox("数据导出成功",0)

自动导出单表为excel:
方法1:
SendKeys(docdir+"Boot.xls")andSendKeys("{tab}~{tab}{tab}{tab}~")  And Do(5)And SendKeys("+{tab}~")andrun(docdir+"Boot.xls")
方法2:
ExportDBFile(docdir+"Boot.xls",6,gridname)and Run(docdir+"Boot.xls")


 回到顶部
总数 14 1 2 下一页