繁體中文当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > 用vbs实现的简单的服务器文件备份办法压缩文件名自动按日期命名
- VBScript
- 一个最简单的vbs类实例代码
- 实用vbs提醒小程序
- 使用vbs下载文件的代码加强版
- vbs病毒制作之一复制自身的vbs脚本
- 用vbs实现的exe2swf工具脚本代码
- vbs更改3389远程桌面端口的脚本
- 用vbs实现的强制杀进程的脚本
- 用VBS脚本实现更换Windows Xp序列号的代码
- vbs实现右键菜单中添加CMD HERE
- 用VBS脚本删除指定以外的文件或文件夹
- 用VBS记录客户机操作的代码
- 用vbs删除某些类型文件和磁盘空间报告的脚本
- 两个批量挂马vbs脚本代码
- 关于vbs WebBrowser导航问题
- LCL.VBS 病毒源代码
- 用vbs实现向任何电子邮件发送邮件
- 用VBS检测Guest状态的脚本
- 用vbs实现的输入助手附使用方法
- vbs base64 解密脚本代码
- 用vbs实现修改dns的网关脚本
VBScript 中的 用vbs实现的简单的服务器文件备份办法压缩文件名自动按日期命名
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-11 浏览: 170 ::
收藏到网摘: 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
