首先是 main.bat 文件代码
注意里面的路径
@echo off set path=%path% set d=%date:~8,2% set h=%time:~0,2% set d``if /i %d% LSS 10 (`` ``set d=0%d:~1,1%``)``set d set h``if /i %h% LSS 10 (`` ``set h=0%h:~1,1%``)``set h ::设置日期为文件名 -------------------------------------``set cdate=%d%_%h% if not exist d:\db_backup (`` ``md d:\db_backup``) D: cd D:\ZkeysSoft\MySql\MySQL Server 5.1\bin ::bakup mysql data -------------------------------------``mysqldump -uroot -pwindzjp2000 --all-databases > d:\db_backup\mysql_bak.sql ::ping /n 10 127.1 >null ::to cab file -------------------------------------``makecab d:\db_backup\mysql_bak.sql d:\db_backup\mysql_bak.cab ::ping /n 10 127.1 >null ::delete sql file -------------------------------------``del /F /Q d:\db_backup\mysql_bak.sql ::send file by Email -------------------------------------``D:\software\db-mysql-bak\sendmail.vbs ::rename file``cd d:\db_backup``ren mysql_bak.cab mysql_bak%cdate%.cab ::send file by ftp -------------------------------------``ftp -s:D:\software\db-mysql-bak\ftp-info.txt if not exist d:\db_backup2 (`` ``md d:\db_backup2``) move /Y D:\db_backup*.* D:\db_backup2 @ping /n 10 127.1 >null exit |
|---|
ftp信息代码. 保存文件名为ftp-info.txt
代码行依次为
打开FTP地址
FTP用户名
FTP密码
进入文件夹 db_backup
上传文件
open 180.86.108.5``webmaster@lastidea.net``password cd db_backup``mput d:\db_backup*.cab /db_backup/ bye |
|---|
发送邮件代码, 请把里面对应的发送和接收邮件的账号改成自己的! 文件名为sendmail.vbs
NameSpace = ``"http://schemas.microsoft.com/cdo/configuration/"``Set Email = CreateObject(``"CDO.Message"``)`` Email.From = ``"feedback@lastidea.net"``Email.``To = ``"feedback@lastidea.net"`` Email.Subject = NOw & ``"CMS数据库备份"`` Email.Textbody = ``"数据库备份文件在附件中。系统自动发送请勿直接恢复。技术支持 zjp@lastidea.net"`` Email.AddAttachment ``"d:\db_backup\mysql_bak.cab"``With Email.Configuration.Fields`` ``.Item(NameSpace&``"sendusing"``) = 2`` ``.Item(NameSpace&``"smtpserver"`` ) = ``"smtp.exmail.qq.com"`` ``.Item(NameSpace&``"smtpserverport"``) = 25`` ``.Item(NameSpace&``"smtpauthenticate"``) = 1`` ``.Item(NameSpace&``"sendusername"`` ) = ``"feedback@lastidea.net"`` ``.Item(NameSpace&``"sendpassword"`` ) = ``"123456"`` ``.Update``End With``Email.Send |
|---|
上面三个文件都放在D:\software\db-mysql-bak中. 然后建个任务计划, 定时执行这个程序就可以了