mysql数据自动备份

在网上查了好久，才找到的这个windows环境下的自动备份代码，很好用，


代码:

Dim fName,tNow,CMD
tNow = Now()
fName = Year(tNow) & FormatNumber(Month(tNow)/100,2,false) & FormatNumber(Day(tNow)/100,2,false) & FormatDateTime(tNow,3)
fName = Replace(Replace(fName,".",""),":","")
CMD = ""
CMD = CMD & "c:" & vbCrLf
CMD = CMD & "cd C:\Program Files\MySQL\MySQL Server 5.0\bin" & vbCrLf
CMD = CMD & "mysqldump -u username -p""password"" deal>d:\db_backup\" & fName & ".sql"
Dim FileObject,BatFile,BatPath
Set FileObject = CreateObject("Scripting.FileSystemObject")
BatPath = "c:\backup.bat"
Set BatFile = FileObject.CreateTextFile(BatPath, True)
BatFile.WriteLine(CMD)
BatFile.Close
Set BatFile = Nothing
Set FileObject = Nothing
Set WshShell = CreateObject("Wscript.Shell") 
WshShell.Run BatPath,1,true
Set WshShell = Nothing

新建文本文档，拷贝以上代码 修改其中
1. C:\Program Files\MySQL\MySQL Server 5.0\bin为MySQL安装目录\bin
2. -u username -p"" password "" username为数据库用户名，password为密码
3. d:\db_backup 为备份文件输出文件夹

修改以上内容后存为backup.vbs

然后开始设置订时任务
1.单击“开始”按钮，然后依次选择“程序”→“附件”→“系统工具”→“任务计划”（或者是“设置”→“控制面板”→“任务计划”），启动Windows的任务计划管理程序。

2.在“任务计划”窗口中双击“添加任务计划”图标，启动系统的“任务计划向导”，然后单击“下一步”按钮，在给出的程序列表中选择保存过的backup.vbs，然后单击“下一步”按钮。
设置适当的任务计划名称并选择自动执行这个任务的时间频率(如每天、每星期、每月、一次性、每次启动计算机时、每次登录时等)，然后单击“下一步”按钮。
此时系统将会要求用户对程序运行的具体时间进行设置，如几号、几点钟、哪几个时间段才能运行等，我们只需根据自己的需要加以设置即可。

4.接下来系统将会要求用户设置适当的用户名及密码，以便系统今后能自动加以运行。

5.最后，我们只需单击“完成”按钮即可将相应任务添加到Windows的任务计划程序中，此后它就会自动“记住”这个任务，一旦系统时间及相关条件与用户设置的计划相符，它就会自动调用用户所指定的应用程序，


因为是要写给客户用的文档，所以详细了些，也方便自已以后使用

评论

2 楼 Robin1320 2007-12-11  

o

1 楼 Robin1320 2007-12-11  

请教一下：我运行出现了个错误
脚本：D：\backup.vbs
行：12
字符：1
错误：没有权限
代码：800A0046
源：Vbscript运行时错误

就是Set BatFile = FileObject.CreateTextFile(BatPath, True) 执行没有权限