Gestion des imprimantes
Le newbie
Messages postés
200
Date d'inscription
mardi 17 octobre 2006
Statut
Membre
Dernière intervention
24 mars 2012
-
2 oct. 2008 à 13:58
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 - 2 oct. 2008 à 14:25
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 - 2 oct. 2008 à 14:25
3 réponses
gillardg
Messages postés
3275
Date d'inscription
jeudi 3 avril 2008
Statut
Membre
Dernière intervention
14 septembre 2014
2
2 oct. 2008 à 14:11
2 oct. 2008 à 14:11
Private
Sub
Form1_Load(
ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
MyBase
.LoadMessageBox.Show(printerlist)
End
End
Sub
Function
printerlist()
As
String
Dim
printers
As
System.Drawing.Printing.PrinterSettings.StringCollection
Dim
str
As
String
=
String
.Emptyprinters = System.Drawing.Printing.PrinterSettings.InstalledPrinters()
For
x = 0
To
printers.Count - 1str = str & printers.Item(x) & vbCrLf
Next
Return
str
End
Function
Bonjour chez vous !
Sub
Form1_Load(
ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
MyBase
.LoadMessageBox.Show(printerlist)
End
End
Sub
Function
printerlist()
As
String
Dim
printers
As
System.Drawing.Printing.PrinterSettings.StringCollection
Dim
str
As
String
=
String
.Emptyprinters = System.Drawing.Printing.PrinterSettings.InstalledPrinters()
For
x = 0
To
printers.Count - 1str = str & printers.Item(x) & vbCrLf
Next
Return
str
End
Function
Bonjour chez vous !
Le newbie
Messages postés
200
Date d'inscription
mardi 17 octobre 2006
Statut
Membre
Dernière intervention
24 mars 2012
2
2 oct. 2008 à 14:23
2 oct. 2008 à 14:23
Salut, merci pour ton aide mais cela fournit toutes les imprimantes installées mais celle par défaut.
Mon Code :
For
Each
nomimp
As
String
In
System.Drawing.Printing.PrinterSettings.InstalledPrintersListBox1.Items.Add(nomimp)
Next
Mon Code :
For
Each
nomimp
As
String
In
System.Drawing.Printing.PrinterSettings.InstalledPrintersListBox1.Items.Add(nomimp)
Next
cs_Willi
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
22
2 oct. 2008 à 14:25
2 oct. 2008 à 14:25
Bonjour,
Pour la gestion des impressions et imprimantes c'est dans l'espace de noms System.Drawing.Printing que tout ce trouve.
Tu as des exemples de dispos.
Pour partager un imprimante il me semble tu devras passer par les fonctions sur les imprimantes de l'ai windows.
++
Si besoin d'aide demande
Pour la gestion des impressions et imprimantes c'est dans l'espace de noms System.Drawing.Printing que tout ce trouve.
Tu as des exemples de dispos.
Pour partager un imprimante il me semble tu devras passer par les fonctions sur les imprimantes de l'ai windows.
++
Si besoin d'aide demande
