用vbs实现的简单的服务器文件备份办法压缩文件名自动按日期命名

时间：2022-06-01 21:18:52

简单的服务器文件备份办法压缩文件名自动按日期命名

  1. dim FileName,WshShell,fs,MyCommandFileName=cstr(now)+".RAR" 
  2. MyCommand="rar a "+FileName+" 要压缩的文件名或目录名" 
  3. Set WshShell = WScript.CreateObject("WScript.Shell") 
  4. Set fs=CreateObject("Scripting.FileSystemObject") 
  5. if fs.fileExists(FileName) then 
  6. fs.DeleteFile FileName,true 
  7. end 
  8. if WshShell.run MyCommand 

将以上文件另存为一个.VBS添加计划任务按你说需要的时间运行.vbs如每个礼拜一次

或每个月一次等计划任务会自动压缩你指定的目录.生成一个日期文件名.rar

标签：

相关文章