I'm new to making VB scripts and I'm coming across a little problem with one of my Custom Def's
I have a zipped file that unzips to the root of C, then its supposed to create a short cut on the desktop, well I have no issue with the unzipping part but the Run Script command in the Custom Def just wont work for me, I can create a .vbs file and click it and it works just fine. But when I put the same commands into the Run Script install commands it fails.
Here is what I have in regards to the script
Set WshShell = CreateObject("WScript.Shell")
Desktop = WshShell.SpecialFolders("Desktop")
ShortcutName = "GiftRap.Client"
ShortcutPath = "C:\RehabOptima\GiftRAP.Client.exe"
Set objShortcut = WshShell.CreateShortcut(Desktop & "\" + ShortcutName & ".lnk")
and this is what I;m getting in my vulscan.og file
Command Interpreter running
Unzip C:\Program Files\LANDesk\LDClient\sdmcache\RehabOptima.zip to directory C:\
Message returned from repair script was
ERROR(RunVbScript) Failed to run command - 80004005
DownloadPatch ERROR: Failed to run commands (80004005).
Last status: Failed
In SendRequest: Action = SOAPAction: "http://tempuri.org/SetPatchInstallStatus"
Any help would be greatly appreciated