Printers of the system in autocad 2000

Since it might obtain the list of printers of the system using VBA and
knowing which is predetermined on Windows?

It is possible that printers are in remote computers, can they appear also?

Thanks.

 

Yes, but you will have to deal with issues regarding cross-boundaries, security, and Printer/file sharing.

Good luck,

Bob Coward
CADS, Inc

800-366-0946

 

You may need the EnumPrinters, GetDefaultPrinter, SetDefaultPrinter API's.
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/prntspol_7mgj.asp
Regards - Nathan

 

I have looked through all the posts on this matter and the above is the
closest I have gotten to solving it. How do I get access to the mentioned
API's? Thanks for your help.

 

check out the api guide - it's fantastic
for all api info
'KPD-Team 1999

'URL: http://www.allapi.net/

 

That is the site I use the most but it is missing GetDefaultPrinter & SetDefaultPrinter. It does have EnumPrinters though including an example. Here is a snippet of my code using GetDefaultPrinter & SetDefaultPrinter to temporarily change the default printer:

Code:

Option Explicit
Private Declare Function GetDefaultPrinter Lib "winspool.drv" Alias "GetDefaultPrinterA" (ByVal pszBuffer As String, pcchBuffer As Long) As Long
Private Declare Function SetDefaultPrinter Lib "winspool.drv" Alias "SetDefaultPrinterA" (ByVal pszPrinter As String) As Long

Private Sub PrinterExample()
Dim pszBuffer As String
pszBuffer = Space(100)
Call GetDefaultPrinter(pszBuffer, 100)
Call SetDefaultPrinter("\\IRIS\Mapping RICOH Aficio CL7000 PS")

Call SetDefaultPrinter(pszBuffer)
End Sub

Regards - Nathan

 

Thanks Nathan,
I copied your code to the "Notes" section of my copy of apiGuide under
EnumPrinters
I also noticed under File menu there is a Submit Example item should you
wish to become famous!

Mark

 

Thanks. Have that site bookmarked now.

 

Thanks. This helps a LOT.

SetDefaultPrinter. It does have EnumPrinters though including an example.
Here is a snippet of my code using GetDefaultPrinter & SetDefaultPrinter to
temporarily change the default printer: