繁體中文当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > 用vbs实现的简单的服务器文件备份办法压缩文件名自动按日期命名
- VBScript
- VBS教程：函数-转换函数
- VBS教程：函数-CLng 函数
- VBS教程：函数-CInt 函数
- VBS教程：函数-Chr 函数
- VBS教程：函数-CDbl 函数
- VBS教程：函数-CDate 函数
- VBS教程：函数-CCur 函数
- VBS教程：函数-CByte 函数
- VBS教程：函数-CBool 函数
- VBS教程：函数-Atn 函数
- VBS教程：函数-Asc 函数
- VBS教程：函数-Array 函数
- VBS教程：函数-Abs 函数
- VBS教程：在 VBScript 中使用对象
- VBS教程：VBScript 与窗体
- VBS教程：VBScript 页面的简单样例
- VBS教程：VBScript 基础-VBScript编码约定
- VBS教程：VBScript 基础-VBScript 过程
- VBS教程：VBScript 基础-使用循环语句
- VBS教程：VBScript 基础-使用条件语句
VBScript 中的 用vbs实现的简单的服务器文件备份办法压缩文件名自动按日期命名
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-11 浏览: 184 ::
收藏到网摘: n/a
简单的服务器文件备份办法压缩文件名自动按日期命名
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
评论 (0) All
