How can I set default printer in VB.NET

Question

1.00/5 (1 vote)

See more:

I try to switch default printer but I dont known what is wrong. Can you help me?

What I have tried:

My code:

Private Function DefaultPrinterName1(sender As Object, e As EventArgs)

        Dim oPS As New System.Drawing.Printing.PrinterSettings
        Try
            DefaultPrinterName1 = oPS.PrinterName = "Vario III 107/12 (kopie 1)"
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Capturing Default Printer", MessageBoxButtons.OK)
        Finally
            oPS = Nothing
        End Try
    End Function

Posted 24-Jul-18 2:45am

Fiínek Cahů

Updated 28-May-19 17:18pm

Add a Solution

Comments

dan!sh 24-Jul-18 9:00am

Can you add error message you are getting?

[no name] 24-Jul-18 9:05am

no error, nothing will happen

[no name] 24-Jul-18 9:06am

I have a button where I call this function

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
DefaultPrinterName1(sender, e)
End Sub

2 solutions

Solution 2

Shell(String.Format("rundll32 printui.dll,PrintUIEntry /y /n ""{0}""", nameprinter1))

Posted 28-May-19 17:19pm

‫عبدالله حسن محمد المغربى‬‎

Add a Solution

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

*dan!sh* · Accepted Answer · 2018-07-24T03:18:00

Solution 1

Your code will not change the default printer outside your application. If you want to change the default printer, you will need to make use of interop. Following method in particular:

C#

C#

[DllImport("winspool.drv", CharSet = CharSet.Auto, SetLastError = true)]
public static extern bool SetDefaultPrinter(string Name);

VB.Net

VB

<DllImport("winspool.drv", CharSet:=CharSet.Auto, SetLastError:=True)>
Public Shared Function SetDefaultPrinter(Name As String) As Boolean
End Function

You can then call this function with the name of printer. Note that the printer you are specifying should already be installed on the computer.

Posted 24-Jul-18 3:18am

dan!sh

Comments

[no name] 24-Jul-18 9:23am

and where I can write this part of code? <DllImport("winspool.drv", CharSet:=CharSet.Auto, SetLastError:=True)>

dan!sh 24-Jul-18 9:28am

This needs to be in the form class of yours. Similar to other methods that you would have created

[no name] 26-Jul-18 0:15am

after I put this to my code that show many errors: dllimport is not defined, charset not defined

dan!sh 26-Jul-18 0:38am

You will need to add import statements for System.Runtime.InteropServices.

[no name] 26-Jul-18 2:45am

thank you :)

dan!sh 26-Jul-18 3:18am

No problem.

How can I set default printer in VB.NET

2 solutions

Solution 1

Solution 2

Add your solution here

Preview 0

How can I set default printer in VB.NET

2 solutions

Solution 1

Solution 2

Add your solution here

Preview 0

Existing Members

...or Join us