bat 备份mysql数据库, 并把备份后的文件发送到指定的FTP和邮箱(windows2003)

首先是  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") = "admin12#$" 
	.Update 
End With 
Email.Send

上面三个文件都放在D:\software\db-mysql-bak中. 然后建个任务计划, 定时执行这个程序就可以了

山东艾思软件科技有限公司, APP、小程序、公众号、网站、OA、ERP等系统软件高端定制开发