UC知道求高手帮忙编写一个简单的VBS脚本。
来源：百度知道 编辑：UC知道 时间：2024/07/02 14:24:41
1、此VBS脚本开机自启动，这个放编好之后放一个lnk到自启动就可以了吧？
2、脚本自动检查任务管理器里面有没有shutdown进程，如果有，不执行任何命令。
3、要每分钟检测一次（请把此处的注释标识一下，我要改的时候知道在哪改），检测不到的话编写脚本自动运行“D:\program files\shutdown\shutdown.exe”这个程序。
貌似挺简单的，但俺是菜鸟，一点都不懂的，还忘高手帮帮忙。成功的话追加50分。
呃，是不是有那儿错误，系统找不到指定程序？
进程名是shutdown.exe，要不要把后辍加上去？
这个vbs不能运行。
2、脚本自动检查任务管理器里面有没有shutdown进程，如果有，不执行任何命令。
3、要每分钟检测一次（请把此处的注释标识一下，我要改的时候知道在哪改），检测不到的话编写脚本自动运行“D:\program files\shutdown\shutdown.exe”这个程序。
貌似挺简单的，但俺是菜鸟，一点都不懂的，还忘高手帮帮忙。成功的话追加50分。
呃，是不是有那儿错误，系统找不到指定程序？
进程名是shutdown.exe，要不要把后辍加上去？
这个vbs不能运行。
我测试可以运行的啊 是不是你D:\program files\shutdown\shutdown.exe 这个路径有问题 你本机这个目录并没有这个文件~你可以改下其他程序 你最好是进入到那个文件夹 然后复制地址栏上的地址~D:\Program Files\shutdown\shutdown.exe
dim ws
dim objWMIService,colProcessList
dim objProcessB
dim b,bExit
a="D:\program files\shutdown\shutdown.exe"
b="shutdown"
set ws=createobject("wscript.shell")
do
bExit=false
Set objWMIService =GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colProcessList=objWMIService.ExecQuery _
("Select * from Win32_Process Where Name='" & b & "'")
For Each objProcessB in colProcessList
bExit=true
exit for
Next
if bExit=false then ws.run a
wscript.sleep 60000 '延迟60秒
loop
'把VBS脚本的快捷方式放到自启动文件夹
Set ws = CreateObject("WScript.Shell")
Set Environ