vbs脚本实现window环境下的mysql数据库的备份及删除早期备份

最新推荐文章于 2022-10-08 22:58:19 发布

转载最新推荐文章于 2022-10-08 22:58:19 发布 · 207 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/gsl/archive/2006/10/24/538196.html

文章标签：

#数据库 #shell

本文介绍了一个使用VBScript编写的脚本，该脚本可以自动备份MySQL数据库，并清理超过五天的旧备份文件。备份文件按日期格式命名并保存到指定目录。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

On error resume next
Dim oShell,admin,pass,user,db,path,name
admin="root"
pass="gsl"

''''''''删除5天前的备份
ddir="d:\mysqlbak"
set Fso=CreateObject("Scripting.FileSystemObject")
set dFol=fso.getfolder(ddir)
set dfs=dfol.files
for each f1 in dfs
temp = f1.name
temp =split(split(temp,".")(0),"@")(1)
if DateDiff("d",temp,date())>5 then
f1.delete
end if
next
''''''
Call db_backup("gsl")

Sub db_backup(db)
path="d:\mysqlbak\"
name=db&"@"&Year(date)&"-"&month(date)&"-"&day(date)&".sql"
Set oShell = WScript.CreateObject ("WSCript.shell")
oShell.run "cmd /C mysqldump.exe -u"& admin &" -p"& pass & space(1) & db &">"&path&name,,true
Set oShell = Nothing
End Sub

转载于:https://www.cnblogs.com/gsl/archive/2006/10/24/538196.html