BP
Option Explicit
Dim JScript, CString '定义线程级变量 '每个线程不同
Dim Window, File
Dim HttpProgress
Const IsDebug = 0
Const Version = "0.0.0.4"
Sub Main()
If Globals("App").PrevInstance Then
Dim ws, WMI, Process
Set ws = CreateObject("wscript.shell")
ws.SendKeys "...