阿七
级别: 未验证会员
精华:
0
发帖: 909
威望: 0 点
金钱: 2161 RMB
贡献值: 0 点
在线时间:512(小时)
注册时间:2006-03-29
最后登录:2008-08-07
|
简单的服务器文件备份办法
简单的服务器文件备份办法
压缩文件名自动按日期命名
dim FileName,WshShell,fs,MyCommand
FileName=cstr(now)+".RAR"
MyCommand="rar a "+FileName+" 要压缩的文件名或目录名"
Set WshShell = WScript.CreateObject("WScript.Shell")
Set fs=CreateObject("Scripting.FileSystemObject")
if fs.fileExists(FileName) then
fs.DeleteFile FileName,true
end if
WshShell.run MyCommand
将以上文件另存为一个 .VBS
添加计划任务按你说需要的时间运行.vbs 如每个礼拜一次 或每个月一次等
计划任务会自动压缩你指定的目录.生成一个日期文件名.rar
|
|
|
|
[楼 主]
|
Posted: 2006-04-04 13:14 |
| |
常州五颜六色网络技术有限公司 -> 技术文档 -> 简单的服务器文件备份办法
