I need help on creating some package or a script which i can deploy to client machines prefereably using Altiris which can add shortcuts to IE Favorites. any suggestions...
0 Comments   [ + ] Show Comments

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.

Answers

0
any further clarification???
Your question too broad...
Answered 02/22/2007 by: dinozilla
Orange Senior Belt

Please log in to comment
0
I wish to add few links to favorites to all profiles on enterprise wide systems. I though there could be some package which can be installed for all users.

then finally i worked on a vbscript script... attaching the same in case some can suggest better...

' Add a Web Site to the Favorites Menu

' Windows Server 2003 : Yes
' Windows XP : Yes
' Windows 2000 : Yes
' Windows NT 4.0 : Yes
' Windows 98 : No

Const ADMINISTRATIVE_TOOLS = 6
Const FAVORITES = &H6&

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(ADMINISTRATIVE_TOOLS)'dooo


Set objFolderItem = objFolder.Self
'WScript.Echo objFolderItem.Path
objFolder.NewFolder ("Navigate Extreme")


'objFavoriteItem.NewFolder("Navigate Extreme")
Set fav = objFolder.ParseName("Navigate Extreme")
'WScript.Echo fav.Path


Set objshell = CreateObject("Shell.Application")
Set objfav = objshell.NameSpace(favorites)
Set objfav1 = objfav.ParseName("Navigate Extreme").GetFolder
objfav1.NewFolder ("Sales")
objfav1.NewFolder ("General")
objfav1.NewFolder ("Connectivity and Applications")

Set objfav2 = objFav1.ParseName ("Sales")
'WScript.Echo objfav2.Path
pathsales = objfav2.Path'assign path to variable for sales
'WScript.Echo pathsales'printing variable value for testing
Set objfav2 = objFav1.ParseName ("General")
'WScript.Echo objfav2.Path
pathgeneral = objfav2.Path'assign path to variable for general
'WScript.Echo pathgeneral'printing variable value for testing
Set objfav2 = objFav1.ParseName ("Connectivity and Applications")
'WScript.Echo objfav2.Path
pathconnect = objfav2.Path'assign path to variable for connectivity and applications
'WScript.Echo pathconnect'printing variable value for testing

'Set objFolderItem = objFolder.ParseName("Navigate Extreme")
'objFolderItem.Path

'WScript.Echo objFolderItem.Path
Set objShell = WScript.CreateObject("WScript.Shell")
strDesktopFld = objFolderItem.Path
'Set objURLShortcut = objShell.CreateShortcut(strDesktopFld & "\MSDN.url")
'objURLShortcut.TargetPath = "http://msdn.microsoft.com"
'objURLShortcut.Save

'******************************** Connectivity and Apps
Set objURLShortcut = objShell.CreateShortcut(pathconnect & "\Webmail.url")
objURLShortcut.TargetPath = "https://mail.extremenetworks.com/exchange/logon.asp"
objURLShortcut.Save

'******************************** Connectivity and Apps
Set objURLShortcut = objShell.CreateShortcut(pathconnect & "\Connect to Extreme Networks.url")
objURLShortcut.TargetPath = "http://www.extremenetworks.com/connect/index.html"
objURLShortcut.Save
'******************************** General
Set objURLShortcut = objShell.CreateShortcut(pathgeneral & "\Facilities.url")
objURLShortcut.TargetPath = "http://intranet.extremenetworks.com/DMS/home/content/Facilities"
objURLShortcut.Save


this will only add to logged in user's profile...also it's in a raw state ..need refinement
Answered 02/22/2007 by: karanmalhotra
Senior Yellow Belt

Please log in to comment
0
my script not working on Windows 2000...anyone any clue??
Answered 02/28/2007 by: karanmalhotra
Senior Yellow Belt

Please log in to comment
0
On win 200 machine is the script engine up to 5.6? and if you uncomment this line on win2k machine 'WScript.Echo fav.Path does this give the correct answer?
Answered 04/04/2007 by: Byoung4now
Senior Yellow Belt

Please log in to comment
Answer this question or Comment on this question for clarity