请教个非常简单的VBS脚本，怎么后台延时启动一个程序，启动后延时在关闭

思路：

1. 用RegWrite将vbs文件名写入开机启动注册表项：

"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run"

Set WshShell = WScript.CreateObject("WScript.Shell")

WshShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run", "ThunderSpy.vbs", "REG_SZ" 'vbs文件名请自己修改

不过写注册表 *** 作可能会被杀软拦截。

2. 等待10分钟

WScript.Sleep 10*60*1000

3. 启动迅雷并隐藏

Set oShell = WScript.CreateObject ("WSCript.shell")

oShell.run "cmd /c start C:\Program Files\Thunder", 汪冲0 '自己修改迅雷路径

/c 选项表示执行指定的命令后关闭命令提示窗口（黑窗口）。

第二个参数0表示隐藏应用。

4. 关闭迅雷（杀进程）

两种方法。

DOS命令TASKKILL方法：

Set wshShell = WScript.CreateObject("WScript.Shell") 

wshShell.run "TASKKILL /IM Thunder.exe", 0 '自己确认迅雷的进程名

WMI方法档老：

strComputer="." 

Set objWMIService = GetObject("winmgmts:\\"困蠢歼 & strComputer & "\root\cimv2")

Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='Thunder.exe'") '自己确认迅雷的进程名

For Each objProcess in colProcessList 

    objProcess.Terminate()

Next

'用sleep命令吧！

'将下面两条语句加到你的VBS文件开头袜衫即返尺可

set WshShell = WScript.CreateObject("WScript.Shell")

WScript.Sleep 3000

' 你的VBS源程告世腔序代码

---