时间:2021-05-22
复制代码 代码如下:
dowhiletrue
setWshShell=WScript.CreateObject("WScript.Shell")
IFWshShell.AppActivate("D:\")Then
MsgBox"ok"
wscript.quit
EndIf
loop
试都不要试,就知道这段代码是错误的。因为WshShell.AppActivate考虑的是窗体的Caption中包含的字符或字符串,你用WshShell.AppActivate("D:\")这个,就是说窗体Caption里要包含"D:\"这个字符串。可你打开D盘看看,是这样的吗?都是“本地磁盘(D:)”。如果有卷标,那更说不准。所以应该写成WshShell.AppActivate("(D:)"),考虑到内存节约的问题,应该这样写:
setWshShell=WScript.CreateObject("WScript.Shell")
do
IFWshShell.AppActivate("(D:)")Then
MsgBox"ok"
wscript.quit
EndIf
loop
声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。
复制代码代码如下:'执行方法:直接双击vbs文件或者通过cmd.exe下cscript.exe"指定脚本的路径"'利用Vbs脚本实现显示系统服务里表'Creat
1、双击运行tel.xls.vbs即可消灭Trojan.Win32.Patched.v病毒。2、本专杀使用VBS脚本编写,执行效率高,不过缺乏智能性,我也不愿去
前不久,隔壁朋友说他的光驱读盘能力明显下降,放好光盘后,双击光驱盘符总是弹出“设备未准备好”的提示。我想这问题应该不大,随即便去他家看个究竟。来到他家,开机后,
Install.vbs发布者MicrosoftCorporation脚本专家此脚本由scenario1.vbs在一台网络主机上启动。Install.vbs可以在
VBS脚本和BAT批处理自身删除的方法(自杀)删除自身之:VBS把下面的脚本保存为selfkill.vbs或selfkill.vbe:复制代码代码如下:Setf