Don't know if this will work on all programs,,,
But I hope this helps others.............
In some programs that you silent install there is no switch for this...
So here goes....
When I went to install adshield the first time it pops up that bloody \Start Menu\Programs\Adshield shortcut folder while it is installing .. well while I was playing I noticed it didn't poup when I removed it and reinstalled it.. When I looked the folder was still there with nothing in it,,, so what I did was remove the folder and tried it again bingo there it was,,,
So what I do is create the folder with the shortcuts in it right before I do the fresh install bingo it is gone....
Here is the vbs script I used for this one
CODE
On Error Resume Next
'Declare var's and objects
Dim WshS, fso, sysr, sysd, home, aup, cpf, pf, up, XPCD
Set WshS = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
'Expand Environment
'Create const's to spare time and place
sysr = WshS.ExpandEnvironmentStrings("%SystemRoot%")
sysd = WshS.ExpandEnvironmentStrings("%Systemdrive%")
home = WshS.ExpandEnvironmentStrings("%Homepath%")
aup = WshS.ExpandEnvironmentStrings("%AllUsersProfile%")
cpf = WshS.ExpandEnvironmentStrings("%CommonProgramfiles%")
pf = WshS.ExpandEnvironmentStrings("%Programfiles%")
up = WshS.ExpandEnvironmentStrings("%UserProfile%")
XPCD = WshS.ExpandEnvironmentStrings("%XPCD%")
fso.CopyFolder XPCD & "\Adshield\Programs\AdShield", aup & "\Start Menu\Programs\AdShield" , true
'Declare var's and objects
Dim WshS, fso, sysr, sysd, home, aup, cpf, pf, up, XPCD
Set WshS = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
'Expand Environment
'Create const's to spare time and place
sysr = WshS.ExpandEnvironmentStrings("%SystemRoot%")
sysd = WshS.ExpandEnvironmentStrings("%Systemdrive%")
home = WshS.ExpandEnvironmentStrings("%Homepath%")
aup = WshS.ExpandEnvironmentStrings("%AllUsersProfile%")
cpf = WshS.ExpandEnvironmentStrings("%CommonProgramfiles%")
pf = WshS.ExpandEnvironmentStrings("%Programfiles%")
up = WshS.ExpandEnvironmentStrings("%UserProfile%")
XPCD = WshS.ExpandEnvironmentStrings("%XPCD%")
fso.CopyFolder XPCD & "\Adshield\Programs\AdShield", aup & "\Start Menu\Programs\AdShield" , true
This folder has the shortcuts in it
XPCD & "\Adshield\Programs\AdShield"
Enjoy Mac!
