Dim fso,oShell,Path1,Path Path = "e:/mu/0.94.txt" "这是用来判定本地计算机是不是最新版 Path1 = "//城市猎人/f/自动更新/MU/MUUP.exe" "个文件是用WINRAR做的自解压文件 Set oShell = WScript.CreateObject ("WSCript.shell") Set fso = CreateObject("Scripting.FileSystemObject") If (fso.FileExists(Path)) Then "判定本地是否有0.94.TXT oShell.run "e:/mu/mu.exe" "假如没有就运行游戏 Else oShell.run path1 "假如有就运行自解压文件.在自解压文件里面做好解压完成后运行游戏就OK了. End If