Is there a way to change the default printer with VB6 code? Thanks in advance.

donrafeal

    Dim prt As printer
    For Each prt In Printers
        If prt.DeviceName = "myPrinter" Then
            Set printer = prt
            Exit For
        End If
    Next

Marco

Marco's code will not change the system default printer, it will only change the printer that VB will use to print to (and sometimes it won't even do that). If you want to change the systems default printer permanently (as in programmatically going to control panel and setting a different printer as the default printer) then take a look at the Microsoft Knowledge Base Article 266767 'HOWTO: Set Which Printer Is the System Default Printer' available at http://support.microsoft.com/default...b;EN-US;266767.

Regards
Owain Williams

Thanks for the help everyone. I will give it a try today.

yep, you are right Owain. In the original post it was not mentioned the "system" printer, so I just presumed that the question was how to change the default VB printer object. Sorry for that.
Marco