getting and setting the default printer

[Geraldine Hobley]

Hello,
How would you get and set the current default printer by using the
system.drawing.printing class or any other class.

Regards
Geri

[Ken Tucker [MVP]]

Hi,
Use the wmi for that. The win32_printer class has the
setdefaultprinter method.
' Add a Reference to System.Management

Dim moReturn As Management.ManagementObjectCollection

Dim moSearch As Management.ManagementObjectSearcher

Dim mo As Management.ManagementObject

moSearch = New Management.ManagementObjectSearcher("Select * from
Win32_Printer")

moReturn = moSearch.Get

For Each mo In moReturn

Dim strOut As String

strOut = String.Format("Name {0} ", mo("Name"))

Trace.WriteLine(strOut)

mo.InvokeMethod("SetDefaultPrinter", Nothing)

Next

Ken

------------------------
"Geraldine Hobley" <Ge*************@discussions.microsoft.com> wrote in
message news:76**********************************@microsof t.com...
Hello,
How would you get and set the current default printer by using the
system.drawing.printing class or any other class.

Regards
Geri

[Herfried K. Wagner [MVP]]

"Geraldine Hobley" <Ge*************@discussions.microsoft.com> schrieb:

How would you get and set the current default printer by using the
system.drawing.printing class or any other class.

Either use WMI or take a look at this article:

HOWTO: Retrieve and Set the Default Printer in Windows
<URL:http://support.microsoft.com/?scid=kb;EN-US;246772>

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[Geraldine Hobley]

Hi ken,
Thanx for the help, that allows me to set the default printer
perfectly, however how do I retrieve the default printer, as I need to
display this.

Regards
Geri.

"Ken Tucker [MVP]" wrote:

Hi,
Use the wmi for that. The win32_printer class has the
setdefaultprinter method.
' Add a Reference to System.Management

Dim moReturn As Management.ManagementObjectCollection

Dim moSearch As Management.ManagementObjectSearcher

Dim mo As Management.ManagementObject

moSearch = New Management.ManagementObjectSearcher("Select * from
Win32_Printer")

moReturn = moSearch.Get

For Each mo In moReturn

Dim strOut As String

strOut = String.Format("Name {0} ", mo("Name"))

Trace.WriteLine(strOut)

mo.InvokeMethod("SetDefaultPrinter", Nothing)

Next

Ken

------------------------
"Geraldine Hobley" <Ge*************@discussions.microsoft.com> wrote in
message news:76**********************************@microsof t.com...
Hello,
How would you get and set the current default printer by using the
system.drawing.printing class or any other class.

Regards
Geri