/bundles/itninjaweb/img/Breadcrumb_cap_w.png
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   [ - ] Hide 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.
Answer this question or Comment on this question for clarity

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