Dim fso,oShell,Path1,Path Path = "e:/mu/0.94.txt" "這是用來判定本地計算機是不是最新版 Path1 = "http://城市獵人/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