Solved

Read Windows default printer (not Application.printer) in VBA

Posted on 2012-12-20
2
675 Views
Last Modified: 2012-12-20
It appears Access' Printer.DeviceName returns ACCESS' default printer.

I'm looking for a way to read the WINDOWS default printer.

I found THIS which allows me to SET the Windows default printer.

Private Declare Function SetDefaultPrinter Lib "winspool.drv" _
Alias "SetDefaultPrinterA" (ByVal pszPrinter As String) As Long

Open in new window


But, I can't find one that READS it.
0
Comment
Question by:Kaprice
2 Comments
 
LVL 26

Accepted Solution

by:
jerryb30 earned 500 total points
ID: 38711561
0
 

Author Closing Comment

by:Kaprice
ID: 38711619
Perfect! Thanks much.
0

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

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

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction The Visual Basic for Applications (VBA) language is at the heart of every application that you write. It is your key to taking Access beyond the world of wizards into a world where anything is possible. This article introduces you to…
It’s the first day of March, the weather is starting to warm up and the excitement of the upcoming St. Patrick’s Day holiday can be felt throughout the world.
Familiarize people with the process of utilizing SQL Server views from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Access…
Familiarize people with the process of utilizing SQL Server stored procedures from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Micr…

840 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question