comment envoyer des données par le port parallele sous visual basic (pour imprim

Question

bonjour,
je veux faire une application pour imprimer des etiquettes.
Je dois donc envoyer des données a l imprimante.
pour cela je peux passer soit par (IP,port série,port parallele)
il n'y a pa des pb pour IP et port série mais le port parallele m'ennui.
Je dois envoyer des informations a l imprimante sous le format :
^XA
^MCY
^XZ
^XA
^FWN^CFD,24^PW1182^LH0,0
^CI0^PR4^MNY^MD0^PON^PMN^LRN
^XZ..........

merci de me dire si cela est réalisable ou non
apres de longue recherche sur internet je n'ai trouvé que l utilisation de la dll inpout32 mais tous les exemples se font pour l allumage de led. ou moi je veux faire de l impression.

merci

pcpunch · Answer

??? pk le port parralléle  ?????

Utilise l'objet printer de vb!!!! qui envoie du texte , image vers l'imprimante....

Si tu veu des exemples voici mes src déposé sur vbfrance a ce sujet (A l'avenir utilise mieux le moteur de recherche):

Tuto pour l'impression (objet printer)

Module pour facilité l'impression (objet printer)

voila ++

cs_trabice · Answer

comment faire si l'imprimante n'est pas installé?

cs_trabice · Answer

merci kan meme sinon..
dsl ;-)

pcpunch · Answer

Il suffit de tester si une imprimante est installé avant l'impression :

If Printer.DeviceName = vbNullString Then
MsgBox "Acune imprimante d'installée..."
Else
MsgBox "L'imprimante est une : " & Printer.DeviceName
End If

voila ++

cs_trabice · Answer

tu n'en vera surement pas l interet mé je ve pouvoir sans que l imprimante soit installé
ca marche tres bien avec l IP par ex

cs_trabice · Answer

en fait je crois que je vé arreter de me prendre la tete et faire une impression avec l imprimante installé...

Flachy Joe · Answer

Salut !
Pas de prob pour envoyer des info même sans installation : tu fais comme si c'etait un fichier !

open "LPT1:" for output as #1
write #1, "plein de trucs"
close #1

par contre je crois que c'a n'imprime que quand tu ferme ton processus, donc quand ton programme quitte.

 ;)  Flachy Joe  ;)

pcpunch · Answer

Trabice je ne comprend vraiment pas !!!

Que veu tu faire imprimer sur du papier sans imprimante ???? (a moin d'etre coperfield::::)

Flachy c koi ce code ?
open "LPT1:" for output as #1
write #1, "plein de trucs"
close #1

chez moi il plante , il est censé faire koi????

cs_trabice · Answer

Je ve juste pouvoir imprimer sans les drivers windows,
juste en selectionnant le port,et a la rigueur en le configurant.
ca marche vraiment ton truc ?
open "LPT1:" for output as #1
write #1, "plein de trucs"
close #1
???
Je test ca tt a lheure
thx

Flachy Joe · Answer

Le code que j'ai posté fonctionne réelement, je viens de faire :

open "LPT1:" for output as #1
write #1,"Salut"
close #1

et je me retrouve avec "Salut" (avec les guillemets) sur une page, il n'y a pas, comme je le croyait à fermer le prog, ça se fait directement et même sans imprimente installé.

Il ne faut pas essayer input #1,var , sinon le prog plante, c'est sans doute possible de gérrer comme ça un echange de donnés avec un autre PC...

PS : Ca fonctionne aussi avec les ports série : Open "COM1:" etc.

 ;)  Flachy Joe  ;)

sajidjamalieea · Answer

je veux programmer une carte parallele via le vb
cette carte contient des capteures et des actionneurs 
je veux acqu&#233;rire les donn&#233;es de ces capteurs et agir sur les actionneurs bien
 sur via le port parallele du PC
et merci

musitien14 · Answer

commander port parallele par visual basic 6.0

richarddaf · Answer

salut,
je viens d'arriver sur ce forum, (plutot sympa), je traite le meme sujet que toi concernant les nouvelles etiquettes que je fait egalement sur des zebras en code zpl. Pour l'instant mon petit programme marche, mais merci pour l'info du port lpt1, ca va me servir.

Comment envoyer des données par le port parallele sous visual basic (pour imprim

13 réponses

Discussions similaires