[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 437
  • Last Modified:

Configure standard windows 2003 terminal services desktop and startmenu

We want to configure same desktop and start menu for all the windows 2003 terminal services users.
We are using the romaing profiles.
Can any one suggest how this is normally implemented.
I don't want to use folder redirection
0
Malli Boppe
Asked:
Malli Boppe
  • 3
  • 2
2 Solutions
 
Lester_ClaytonCommented:
Without using a management system like SCOM to deploy the icons, the way it can be done is as follows:

Option 1: Set the Default User to have these settings.

On each terminal server, configure one user to have the settings one desires - including shortcuts, icons, screensaver, IE favorites, whatever you like.  Then, log in as an administrator, and copy the configured user's profile over the default profile.  Any NEW profiles created will inherit all these configurations.  This would mean you would have to start with new profiles for everybody.

This is not a good option, because it means if there are changes to be made, you cannot make them without resettting everybody's profile.  This makes people really really angry.

Option 2 : Scripts.

Create VBScripts to run at user login to create the shortcuts in the desired areas.  This is better because you can always modify the script at a later stage.  Here is an example of a shortcut copying script.

Place icons in your \\domain.name\NETLOGON\Shortcuts and let this program copy it to the desktop location.

 
Option Explicit
On Error Resume Next

Dim objShell, objEnvironment, objFSO
Dim TargetPath,ServerPath

'Initialise Objects
Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")
Set objShell = WScript.CreateObject("WScript.Shell")
Set objEnvironment = objShell.Environment("Process")

ServerPath = "\\your.domain\NETLOGON\Shortcuts\"

If (objEnvironment("CLIENTNAME") = "") Then								' This is a Desktop
	TargetPath = objEnvironment("USERPROFILE") & "\Desktop\"
	CopyItem "Desktop.lnk"
Else																	' This is a Terminal Server Session
	TargetPath = objEnvironment("USERPROFILE") & "\Desktop\"
	CopyItem "Microsoft Office Excel 2010.lnk"
	CopyItem "Microsoft Office Outlook 2010.lnk"
	CopyItem "Microsoft Office Powerpoint 2010.lnk"
	CopyItem "Microsoft Office Word 2010.lnk"
End IF

Sub DeleteDesktopItem(FileName)
	If objFSO.FileExists(TargetPath & FileName) Then
		objFSO.DeleteFile(TargetPath & FileName)
	End If
End Sub

Sub CopyDesktopItem(FileName)
	if objFSO.FileExists(ServerPath & FileName) Then
		objFSO.CopyFile ServerPath & FileName, TargetPath + FileName, true 
	End If
End Sub

Open in new window

0
 
Lester_ClaytonCommented:
Sorry I meant SCCM - not SCOM.  System Center Configuration Manager (Also known as MOM (Microsoft Office Manager)).
0
 
Malli BoppeAuthor Commented:
Thanks Laster

What about the startmenu. Is it possible to include in the script.
0
 
Lester_ClaytonCommented:
Absolutely, you just need to specify a different path for the target location.

The start menu would be a minor addition/modification

TargetPath = objEnvironment("USERPROFILE") & "\AppData\Roaming\Microsoft\Windows\Start Menu\"

:)
0
 
Malli BoppeAuthor Commented:
Thanks
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

  • 3
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now