Foxtable(狐表)用户栏目专家坐堂 → [求助]如何定期备份数据库中的几个表,存成 Excel 表格


  共有1701人关注过本帖树形打印复制链接

主题:[求助]如何定期备份数据库中的几个表,存成 Excel 表格

帅哥哟,离线,有人找我吗?
sjx71
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:469 积分:4545 威望:0 精华:0 注册:2013/5/22 15:32:00
[求助]如何定期备份数据库中的几个表,存成 Excel 表格  发帖心情 Post By:2016/5/19 19:48:00 [只看该作者]

如何定期备份数据库中的几个表,存成 Excel 表格

比如每周一中午12:00 备份数据库中的表A,表B。

谢谢老师

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/5/19 19:59:00 [只看该作者]

参考代码

 

static d As Date = Date.today.AddDays(-1)
If d <> Date.today AndAlso Date.Today.DayOfWeek = 1 AndAlso Date.Now.Hour = 12 Then
    d = Date.today
   
    Tables("表A").SaveExcel("d:\test" & format(d, "yyyMMdd") & ".xls", "表A")
    Tables("表B").SaveExcel("d:\test" & format(d, "yyyMMdd") & ".xls", "表B")
End If

 

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

 

[此贴子已经被作者于2016/5/19 20:09:31编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
sjx71
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:469 积分:4545 威望:0 精华:0 注册:2013/5/22 15:32:00
  发帖心情 Post By:2016/5/19 20:09:00 [只看该作者]

谢谢大红袍老师

 回到顶部