用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
您可能感兴趣的文章
- 01-10下载文件到本地运行的vbs
- 01-10VBS中的正则表达式的用法大全 <font color=red>原创&
- 01-10VBS中SendKeys的基本应用
- 01-10VBScript教程 第十一课深入VBScript
- 01-10用VBSCRIPT控制ONSUBMIT
- 01-10VBScript语法速查及实例说明
- 01-10VBS中Select CASE的其它用法
- 01-10VBScript教程 第七课使用条件语句
- 01-10vbscript 可以按引用传递参数吗?
- 01-10VBScript教程 第二课在HTML页面中添加VBscript代码