Imprimante par défault

Astro8899 Messages postés 77 Date d'inscription mardi 18 octobre 2005 Statut Membre Dernière intervention 1 février 2007 - 15 févr. 2006 à 16:56
gallyhc Messages postés 386 Date d'inscription samedi 4 octobre 2008 Statut Membre Dernière intervention 19 février 2018 - 15 févr. 2006 à 20:17
Bonjour tous le monde,

Je voudrais savoir si quelqu'un sait comment faire pour changer l'imprimante par défault.
merci et bonne journée.

p.s. Je suis en VB.net

1 réponse

gallyhc Messages postés 386 Date d'inscription samedi 4 octobre 2008 Statut Membre Dernière intervention 19 février 2018 2
15 févr. 2006 à 20:17
Bonjour,

Sa, sa devrait te donné un petit coup de main.

' Déclaration des variables.
Dim wshnetwork As Object


' Installation de l'imprimante.
Set wshnetwork = CreateObject("wscript.network")
wshnetwork.addwindowsPrinterConnection "\" & txtServer & "" & UCase(txtPrinter.Text)
wshnetwork.setdefaultprinter "\" & txtServer & "" & UCase(txtPrinter.Text)

Bonne programmation,
[Gally Home Corp]
0