Sujet Précédent Sujet Suivant

Declarer une imprimante par defaut

cs_220948 Messages postés 2 Date d'inscription dimanche 24 octobre 2004 Statut Membre Dernière intervention 17 janvier 2005 - 12 déc. 2004 à 16:51
ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 - 13 déc. 2004 à 18:26

Comment dans une liste d'imprimantes, déclarer telle ou telle
en tant que imprimante par défaut.
Je n'ai pas pu retrouver l'API correspondante
Merci de me dépanner.

A voir également:

Declarer une imprimante par defaut
Imprimante virtuelle txt - Forum Delphi / Pascal
Code défaut inconnu delphi ✓ - Forum Delphi / Pascal
Script imprimante par défaut - Forum Javascript / DHTML
Imprimante "virtuelle" - Forum Visual Basic 6
Valeur par défaut sql - Forum SQL

2 réponses

Réponse 1 / 2

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 20
13 déc. 2004 à 13:33

Petit code tout simple :

Dim p As Printer 
        For Each p In Printers 
          If p.DeviceName = NomDeTonImprimante Then 
            Set Printer = p
            Exit For 
          End If 
        Next

Attention, NomDeTonImprimante représente le nom déclaré de l'imprimante. En gros, le nom inscrit sous l'cône de l'imprimante dans le gestionnaire d'imprimantes.

Cordialement, CanisLupus

Réponse 2 / 2

ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 26
13 déc. 2004 à 18:26

salut

regarde :
http://www.vbfrance.com/code.aspx?id=28161

ShareVB

Discussions similaires

Se connecter à mysql sur un port 3306 et/ou 3307

Imprimante Virtuelle: Impression dans un fichier

Impression de fichier .txt

IMPRIMANTE VIRTUELLE

choix imprimante sous QR