用vbs实现的简单的服务器文件备份办法压缩文件名自动按日期命名
简单的服务器文件备份办法压缩文件名自动按日期命名
dim FileName,WshShell,fs,MyCommandFileName=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
您可能感兴趣的文章:- 用VBSrcipt判断是否是日期
- 用vbs实现按创建日期的顺序列出一个文件夹中的所有文件
- 用vbs判断一个日期是否在指定的时段内
- vbs下通过日期查找文件夹的代码
- VBS的字符串及日期操作相关函数
- 用VBS修改(设置)系统时间和日期的代码
- vbs获取当前时间日期的代码
- 使用VBS获取当前日期的前一天 并修正输出格式