WScript.Sleep 500 Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "Intranet_Virus\uninstaller_msg.vbs"