Definir l'impimeante par defaut

Omega15 Messages postés 55 Date d'inscription vendredi 27 août 2004 Statut Membre Dernière intervention 7 septembre 2009 - 1 août 2005 à 12:06
cs_toto1980 Messages postés 81 Date d'inscription lundi 13 janvier 2003 Statut Membre Dernière intervention 15 février 2008 - 1 août 2005 à 13:39

Bonjour,
J'aimerais savoir si il est possible de definir, en ligne de code, l'imprimante pas defaut d'un poste avec uniquement le nom de l'imprimante.

exemple avec PHOTOCOPIEUR.

A voir également:

Definir l'impimeante par defaut
Impossible de définir la propriété visible de la classe worksheet ✓ - Forum Visual Basic 6
Liste de défaut ✓ - Forum PHP
Valeur par défaut sql ✓ - Forum SQL
Type défini par l'utilisateur non défini - Forum Visual Basic 6
Défaut en c - Forum C++ & C++ .NET

1 réponse

Réponse 1 / 1

cs_toto1980 Messages postés 81 Date d'inscription lundi 13 janvier 2003 Statut Membre Dernière intervention 15 février 2008 1
1 août 2005 à 13:39

Voila:
For Each x In Printers
If x.DeviceName = "PHOTOCOPIEUR" Then
' Définit l'imprimante comme imprimante par
' défaut du système.
Set Printer = x
' Cesse la recherche d'imprimante.
Exit For
End If
Next

Discussions similaires

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

parametre par defaut

Excel VBA - Proprièté "Visible" pour "Worksheet"

Comment changer une valeur par defaut en sql ? idem pour null/not null

erreur 1004 impossible de définir la propriété weight de la classe border