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!

Remote Printing 2

Status
Not open for further replies.

scottew

IS-IT--Management
Mar 6, 2003
492
US
I have a terminal server in the office which our sales people log into remotely from their home office. I would like for them to be able to print to their local printer from the terminal server.

Is this possible?

Any tips are greatly appreciated.

Thanks in advance
 
Make sure you have the drivers for each remote printer installed on the terminal server.

A+, N+, MCSA:Messaging, MCSE
 
Yup, you just have to have their printer's drivers loaded on the terminal server and once they are on the server they can map their local printer. I have several like this.
 
Run this script on the local machine before they connect via Terminal Services. This fixes a problem of printing to DOT4 printers (network or USB). Note that if their home printer is an "all-in-one" you will most likely never get it to work because this requires software and not just drivers to be installed.

Code:
'==========================================================================
'
' NAME: TSPrintFix.vbs
'
' AUTHOR: Mark D. MacLachlan , The Spider's Parlor
' URL: [URL unfurl="true"]http://www.thespidersparlor.com[/URL]
' (c) 2003 All Rights Reserved
' DATE  : 12/22/2003
'
' COMMENT: Fixes printing via terminal services to allow DOT4 printers
'
'==========================================================================
myPrompt = MsgBox("This script will set up your printers for use with Terminal Services",vbOKCancel,"Setup Printers for Terminal Services?")
If myPrompt = 1 Then 
	Set WshShell=WScript.CreateObject("WScript.Shell")
	keypath ="HKCU\Software\Microsoft\Terminal Server Client\Default\AddIns\RDPDR\FilterQueueType"
	WshShell.RegWrite keypath, -1, "REG_DWORD"
	If WshShell.RegRead(keypath) = "-1" Then
		MsgBox "Setup was successful",,"Success"
	Else
		MsgBox "Sorry A Problem Was Encountered" & vbCrLf & "Make sure you have permission to write to the registry.",,"Something went wrong"
	End If	
End If
WScript.Quit

I hope you find this post helpful.

Regards,

Mark
 
Thanks for everyones help. I got it working great.

 
I take it the script resolved the issue right?

I hope you find this post helpful.

Regards,

Mark
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top