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 TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

local IP printer through Terminal Services session 2

Status
Not open for further replies.

Achmed

Technical User
Jun 4, 2001
64
CA
Hi everyone,
Here's my problem:

Windows XP workstation.
Printer installed on local network (192.168.1.100)
Remote desktop connection to the Terminal Server (Windows 2000 Server).
Printing works great through the Terminal Server session when the local machine is connected to the printer via the IP address. It doesn't work when I connect by creating a TCP/IP port (which I'd prefer because it is much faster). When using the TCP/IP port, the Terminal Server doesn't pick it up.

The reason I'm having the trouble is because the printer is also a fax machine, and in order to fax to it I have to install a separate driver. Only problem is I can't connect this driver via the IP address because I already have the print driver using that IP address and I can't add another. If I use the TCP/IP port, it works fine locally but the Terminal Server does not recognize it!

That's my problem... thanks for your time. Argh.

-Alan
 
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
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top