Hello, i am trying to run a .vbs script as a post install task in a winxp scripted installation, our company like to remove windows messenger and also the in built games, i have found the following scripts to do this:

remove games.vbs:
Dim Fso : Set Fso = CreateObject("Scripting.FileSystemObject")
Set WshShell = WScript.CreateObject("WScript.Shell")
sPrograms = WshShell.SpecialFolders("AllUsersPrograms")
If (Fso.FolderExists(sPrograms & "\Games")) Then
' Create file for uninstalling games
Set f = Fso.CreateTextFile("c:\windows\inf\wmdtocm.txt", True)
WshShell.Run "sysocmgr.exe /i:c:\windows\inf\sysoc.inf /u:""c:\windows\inf\wmdtocm.txt"" /q", 1, True
Fso.DeleteFolder(sPrograms & "\Games"), True
End If


Remove messenger.vbs:
'xp_messsenger_remove.vbs - Removes Windows Messenger from Windows XP
'© Doug Knox - 3/30/02
'Downloaded from www.dougknox.com

Option Explicit
On Error Resume Next

'Dimension variables
Dim WSHShell, MyBox, p1, q1, rcmd
Dim jobfunc

'Set the Windows Script Host Shell and assign values to variables
Set WSHShell = WScript.CreateObject("WScript.Shell")
p1 = "HKEY_LOCAL_MACHINE\Software\Microsoft\Outlook Express\Hide Messenger"
q1 = 2
rcmd = "RunDll32 advpack.dll,LaunchINFSection %windir%\inf\msmsgs.inf,BLC.Remove"

'Create or change the Hide Messenger value
WSHShell.RegWrite p1, q1

'Run the uninstall command


both run fine from a command prompt on a clean machine and also when double clicked, but when uploaded to the kbox with the command line: remove messenger.vbs / remove games.vbs respectively they do not run. i have tried this uploading the single files and also as a zip of the files.

would anyone be able to shed any light on this?

also is there a log of post installation failures? if so where would it be as this would help greatly.
0 Comments   [ - ] Hide Comments


Please log in to comment

Rating comments in this legacy AppDeploy message board thread won't reorder them,
so that the conversation will remain readable.
Answer this question or Comment on this question for clarity


figured it out, i needed to put the command line in quotation marks to install, all working ok now.
Answered 09/20/2010 by: trentderby
Blue Belt

Please log in to comment

In your setup configuration under [Components] you can add:
Msmsgs = "Off"
Minesweeper = "Off"
Hearts = "Off"


Here is my list:

AccessOpt = "Off"
Appsrv_console = "Off"
Aspnet = "Off"
BitsServerExtensionsISAPI = "Off"
BitsServerExtensionsManager = "Off"
Calc = "On"
Certsrv = "Off"
Certsrv_client = "Off"
Certsrv_server = "Off"
Charmap = "On"
Chat = "Off"
Clipbook = "On"
Cluster = "Off"
Complusnetwork = "Off"
Deskpaper = "On"
Dialer = "Off"
DriverSigningPolicy = "Ignore"
Dtcnetwork = "Off"
Fax = "Off"
Fp_extensions = "Off"
Fp_vdir_deploy = "Off"
Freecell = "Off"
Hearts = "Off"
Hypertrm = "Off"
IEAccess = "On"
IEHardenAdmin = "Off"
IEHardenUser = "On"
Iis_asp = "Off"
Iis_common = "Off"
Iis_ftp = "Off"
Iis_inetmgr = "Off"
Iis_internetdataconnector = "Off"
Iis_nntp = "Off"
Iis_serversideincludes = "Off"
Iis_smtp = "Off"
Iis_webdav = "Off"
Iis_www = "Off"
Indexsrv_system = "Off"
Inetprint = "Off"
Licenseserver = "Off"
Media_clips = "Off"
Media_utopia = "On"
Minesweeper = "Off"
Mousepoint = "Off"
Msmq_ADIntegrated = "Off"
Msmq_Core = "Off"
Msmq_HTTPSupport = "Off"
Msmq_LocalStorage = "Off"
Msmq_MQDSService = "Off"
Msmq_RoutingSupport = "Off"
Msmq_TriggersService = "Off"
Msmsgs = "Off"
Msnexplr = "Off"
Mswordpad = "On"
Netcis = "Off"
Netoc = "Off"
Objectpkg = "On"
OEAccess = "Off"
Paint = "On"
Pinball = "Off"
Pop3Admin = "Off"
Pop3Service = "Off"
Pop3Srv = "Off"
Rec = "Off"
Reminst = "Off"
Rootautoupdate = "On"
Rstorage = "On"
Sakit_web = "Off"
Solitaire = "Off"
Spider = "Off"
Templates = "Off"
TerminalServer = "On"
TSWebClient = "Off"
Vol = "On"
WbemCrrl = "On"
WbemFwrd = "On"
WbemMSI = "On"
WMAccess = "Off"
Wms = "Off"
Wms_admin_asp = "Off"
Wms_admin_mmc = "Off"
Wms_isapi = "Off"
Wms_server = "Off"
Zonegames = "Off"
Answered 09/20/2010 by: cserrins
Red Belt

Please log in to comment