Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

how to copy shortcut to Quick Launch bar for all TS users?

Status
Not open for further replies.

PPettit

IS-IT--Management
Sep 13, 2003
511
US
Is there an easy way to modify the Quick Launch bar for all of my Terminal Services users?

I have some shortcuts that I want to put in there for all of my users but I can't find an easy way to do it. You can't go to "...\All Users\Application Data\Microsoft\Internet Explorer\Quick Launch" and paste the shortcut there. The folder doesn't exist and nothing happened when I tried to manually create the folder and shortcut.

Surely, there must be an easy way to do this. Any ideas?
 
Try going to '%systemdrive%\Documents and Settings\Default User\Application Data\Microsoft\Internet Explorer\Quick Launch' This is probably where you want to put them.

Default User is a hidden folder so you will have to show hidden folders from your folder options.
 
Unless I'm wrong, this will only add the shortcut when creating new users. It won't add the shortcut for existing users,.
 
In case anyone is interested, I wrote a script that would copy the shortcut to all of my users.
Code:
Option Explicit
Dim fso
Dim oGroup 
Dim oUser 
Dim strUserName
Dim strSource, strDestination

Set fso = CreateObject("Scripting.FileSystemObject")

Set oGroup = GetObject("WinNT://" & "Accounting" & "/" & "V2 Users" & ",group")

For Each strUserName in oGroup.Members
  Set oUser = GetObject("WinNT://" & "Accounting" & "/" & strUserName.Name & ",user")
  strUserName = oUser.Name

  strSource = "C:\Download\v2.lnk"[red] (I had to add ".lnk" in order for the script to work properly since the icon is titled just "v2")[/red]
  strDestination = "c:\documents and settings\" & strUserName & "\Application Data\Microsoft\Internet Explorer\Quick Launch\"

If fso.FolderExists(strDestination) Then
  fso.CopyFile strSource, strDestination
Else
End If

Next

I'd still like to know if there is way to accomplish this through Windows Explorer or maybe even with a policy of some sort.
 
'%systemdrive%\Documents and Settings\All Users\Application Data\Microsoft\Internet Explorer\Quick Launch'

Is likely where you want it.

Pat Richard, MCSE MCSA:Messaging CNA
Microsoft Exchange MVP
Want to know how email works? Read for yourself -
 
Well what I am getting at is if users TS into the machine it would recreate the account if not already there. Just have to rename the existing profiles and have them login again to recreate the profile.
 
The '%systemdrive%Documents and Settings\All Users\Application Data\Microsoft\Internet Explorer\Quick Launch' does not exist, like PPettit was stating. I am unsure if creating the folder will work or not.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top