LECTURE/MODIFICATION DE LA CONFIGURATION DES IMPRIMANTES

cs_asimengo Messages postés 280 Date d'inscription jeudi 24 mars 2005 Statut Membre Dernière intervention 18 mars 2009 - 14 févr. 2006 à 08:28
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 - 4 août 2006 à 22:18
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/36020-lecture-modification-de-la-configuration-des-imprimantes

cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 22
4 août 2006 à 22:18
Pies -> Je ne crains que cela ne soit pas possible car tu visus tes imprimantes dans un dossier spécial donc afficher par l'explorer et lui doit ajouter "sur xxx" sur les imprimantes réseaux/partagées?
pies Messages postés 1 Date d'inscription mercredi 2 août 2006 Statut Membre Dernière intervention 2 août 2006
2 août 2006 à 16:52
Bonjour,

Meme question que "asimengo" :
"comment faire pour renommer une imprimante réseau nommée "hpfact sur pctoto" en "hpfact"?. Il n'y avait pas ce problème avec win95/98 mais sur XP il ajoute systématiquement à la fin le nom pc."

Cordialement.
cirdan telemnar Messages postés 6 Date d'inscription lundi 27 mars 2006 Statut Membre Dernière intervention 23 mai 2006
23 mai 2006 à 11:50
merci moi ca marche mais pas avec le UBound utilise un for tous simple

"For i = 0 To lPrintersNumber - 1" dans ta form1 en recuperant la variable lPrintersNumber
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 22
23 mai 2006 à 11:43
Regarde ici si tu n'arrive pas à récupérer ta liste d'imprimante.
http://support.microsoft.com/default.aspx?scid=kb%3Bfr%3B466749
cirdan telemnar Messages postés 6 Date d'inscription lundi 27 mars 2006 Statut Membre Dernière intervention 23 mai 2006
23 mai 2006 à 11:42
PRINTER_ENUM_CONNECTIONS = &H4

sinon j'ai la mm erreur et ne sais pas pourquoi
cs_deuss33 Messages postés 9 Date d'inscription samedi 29 mars 2003 Statut Membre Dernière intervention 23 mai 2006
23 mai 2006 à 11:32
Merci mais que déclares tu pour la constante PRINTER_ENUM_CONNECTIONS?
j'ai du mal renseigner, j'ai aussi une erreur sur le UBound!
cirdan telemnar Messages postés 6 Date d'inscription lundi 27 mars 2006 Statut Membre Dernière intervention 23 mai 2006
23 mai 2006 à 10:16
cirdan telemnar Messages postés 6 Date d'inscription lundi 27 mars 2006 Statut Membre Dernière intervention 23 mai 2006
23 mai 2006 à 10:11
dans "If EnumPrinters(PRINTER_ENUM_LOCAL, vbNullString, 1, Buffer(0), 1024, lBytesUsed, lPrintersNumber) Then"

il faut ajouter PRINTER_ENUM_CONNECTIONS comme ceux-ci :
"If EnumPrinters(PRINTER_ENUM_LOCAL Or PRINTER_ENUM_CONNECTIONS, vbNullString, 1, Buffer(0), 1024, lBytesUsed, lPrintersNumber) Then"
cs_deuss33 Messages postés 9 Date d'inscription samedi 29 mars 2003 Statut Membre Dernière intervention 23 mai 2006
23 mai 2006 à 10:06
Ton code est bien mais si tu pouvais voir les imprimantes réseau, ce serai parfait. Je recherche à imprimer sur une imprimante réseau qui n'est pas l'imprimante par défaut. Si tu as une idée, je n'ai rien trouvé sur le site
cirdan telemnar Messages postés 6 Date d'inscription lundi 27 mars 2006 Statut Membre Dernière intervention 23 mai 2006
22 mai 2006 à 09:00
dans ton module EnumPrinters je ne rentre pas dans le test

"If EnumPrinters(PRINTER_ENUM_LOCAL, vbNullString, 1, Buffer(0), 1024, lBytesUsed, lPrintersNumber) Then"

ce fait que je retourne quelque chose de non affecté, ce qui me provoque une erraur sue le UBound
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 22
19 mai 2006 à 18:23
Peux-tu me dire ou est-ce que tu as l'erreur ?
cirdan telemnar Messages postés 6 Date d'inscription lundi 27 mars 2006 Statut Membre Dernière intervention 23 mai 2006
19 mai 2006 à 15:47
ton soft ne veux ce lancer

il me sort une erreur sur UBound mais je ne c pas pourquoi
y'a t'il des options particulières a modifier sous VB6 pour le faire marcher?

sinon c exactement ce qu'il me falais ;-)
diabolobx Messages postés 5 Date d'inscription samedi 18 octobre 2003 Statut Membre Dernière intervention 11 mai 2015
15 févr. 2006 à 16:48
Bonjour,
Trés bien pour ce code, il correspond exactement à ma requete.
Cordialement
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 22
14 févr. 2006 à 10:38
Bonjour,
Asimengo -> Je vais ragarder pour les imprimantes réseaux

Patrice99 je ne suis pas certain mais il me semble avoir vu quelques choses sur PostScript avec VB. Je vais voir dans mon historique si je retrouve des infos.
cs_Patrice99 Messages postés 1221 Date d'inscription jeudi 23 août 2001 Statut Membre Dernière intervention 9 septembre 2018
14 févr. 2006 à 08:52
Tu crois que ce serait possible de changer les options PostScript d'une imprimante ? j'en aurai besoin pour faire une installation automatique de mes logiciels Doc2Pdf et Snap2Pdf.
cs_asimengo Messages postés 280 Date d'inscription jeudi 24 mars 2005 Statut Membre Dernière intervention 18 mars 2009
14 févr. 2006 à 08:28
chez moi il lit toutes les imprimantes sauf les imprimantes réseaux.

Divers : comment faire pour renommer une imprimante réseau nommée "hpfact sur pctoto" en "hpfact"?. Il n'y avait pas ce problème avec win95/98 mais sur XP il ajoute systématiquement à la fin le nom pc.