网站首页 > 资源文章 正文
VBScript 是微软公司出品的动态脚本语言,是Visual Basic 的轻量级的版本。
vbs的基本使用
msgbox() 弹出消息框
循环语句
For...Next 语句运行一段语句指定的次数
For Each...Next 语句针对集合中的每个项目或者数组中的每个元素来运行某段语句。
Do...Loop 语句运行循环,当条件为 true 或者直到条件为 true 时。
条件语句
if i=10 Then msgbox "Hello"
if i=10 Then
msgbox "Hello"
i = i+1
end If
if i=10 then
msgbox "Hello"
else
msgbox "Goodbye"
end If
select case payment
case "Cash"
msgbox "You are going to pay cash"
case "Visa"
msgbox "You are going to pay with visa"
end select
VBS运行外部命令:
1、
Scripting.FileSystemObject —> 提供一整套文件系统操作函数
2、Scripting.Dictionary —> 用来返回存放键值对的字典对象
3、Wscript.Shell —> 提供一套读取系统信息的函数,如读写注册表、查找指定文件的路径、读取DOS环境变量,读取链接中的设置
4、Wscript.NetWork —> 提供网络连接和远程打印机管理的函数。(其中,所有Scripting对象都存放在SCRRUN.DLL文件中,所有的Wscript对象都存放在WSHOM.ocx文件中。)
' 创建FileSystemObject对象
Set objfso = createobject("scripting.FileSystemObject")
' 将D:/test下所有的内容复制到c:/123
objfso.CopyFolder "D:/test","c:/123"
'创建文件夹
set fso =CreateObject("Scripting.FileSystemObject")
fso.CreateFolder("C:\test") '目标文件夹的父文件夹必须存在
set fso = nothing
'判断文件夹是否存在
set fso =CreateObject("Scripting.FileSystemObject")
if fso.FolderExists("C:\Windows") then
msgbox("目标文件夹存在")
else
msgbox("目标文件夹不存在")
end if
set fso = nothing
' 创建FileSystemObject对象
Set objfso = createobject("scripting.FileSystemObject")
‘ 在c:/创建new folder文件夹,如果文件夹存在,则会出现错误提示
objfso.CreateFolder("c:/new folder")
‘ 删除c:/new folder文件夹
objfso.DeleteFolder("c:/new folder")
'删除指定文件夹中,修改日期距离当前日期相差10天的文件
'给对象赋值
set fso=CreateObject("Scripting.FileSystemObject")
set fs=fso.getfolder(".\source").files
for each f in fs
d=f.datelastmodified
aa=datediff("d",d,Now)
msgbox aa
'如果修改日期和现在日期间隔大于10天则删除
if aa>10 then
fso.deleteFile f
end if
next
set fso=wscript.createobject("scripting.filesystemobject")
'表示覆盖目标位置的文件
fso.copyfile ".\kk.txt", ".\kk3.txt",true
set fso=wscript.createobject("scripting.filesystemobject")
'复制文件夹,覆盖目标位置的文件夹
fso.CopyFolder "C:\abc","E:\image",true
'立即关机
set ws=createobject("wscript.shell")
ws.run"cmd.exe /c shutdown -s -f -t 0"
猜你喜欢
- 2025-06-04 VBMAN:基于VB6的快速服务器框架(vb搭建服务器)
- 2025-06-04 渗透过程中,你真的知道大黑客进入网站后要做什么嘛?
- 2025-06-04 天鬼指示器-WA字符串(天鬼指示器-wa字符串在哪里)
- 2025-06-04 Windows 系统内核的演变对系统编程有什么影响
- 2025-06-04 Win7/Win8.1卫士:微软EMET 5.2正式版下载
- 2025-06-04 windows错误代码0x80072EE2?win10系统更新错误问题的处理方法
- 2025-06-04 126A打印提示系统不支持请求的命令 解决方案3
- 2025-06-04 电脑搜索功能不能用怎么办?教你一招快速恢复
- 2025-06-04 CDR X6,X7安装出现1406英文对话框提示解决办法
- 2025-06-04 VBScript(VBS)正在走入历史的尘埃
你 发表评论:
欢迎- 最近发表
- 标签列表
-
- 电脑显示器花屏 (79)
- 403 forbidden (65)
- linux怎么查看系统版本 (54)
- 补码运算 (63)
- 缓存服务器 (61)
- 定时重启 (59)
- plsql developer (73)
- 对话框打开时命令无法执行 (61)
- excel数据透视表 (72)
- oracle认证 (56)
- 网页不能复制 (84)
- photoshop外挂滤镜 (58)
- 网页无法复制粘贴 (55)
- vmware workstation 7 1 3 (78)
- jdk 64位下载 (65)
- phpstudy 2013 (66)
- 卡通形象生成 (55)
- psd模板免费下载 (67)
- shift (58)
- localhost打不开 (58)
- 检测代理服务器设置 (55)
- frequency (66)
- indesign教程 (55)
- 运行命令大全 (61)
- ping exe (64)
本文暂时没有评论,来添加一个吧(●'◡'●)