|
| Imprimer cheque ou ticket |
| Débuté par Stuck, 21 fév. 2007 12:43 - 4 réponses |
| |
| | | |
|
| |
Posté le 21 février 2007 - 12:43 |
Bonjour à tous,
Avec une imprimante du type Espon TM-H6000, comment lui dire de passer l'impression sur le cheque (car c'est le ticket par defaut) ?
J'ai une doc en pdf mais pas moyen de trouver une instructions pour dire à l'imprimante de basculer sur les cheques ...
Sachant que j'utilise les commandes sEcrit() et non le diver windows qui est tres tres lent pour le ticket.
Et ca fait une semaine que je me bat avec cette ;%@# d'imprimante ... alors si quelqu'un pouvais m'aider...
Sebastien_nospam@artigeste.com (bien sur sans _nospam ...) |
| |
| |
| | | |
|
| | |
| |
Posté le 21 février 2007 - 12:50 |
Ou peut on recuperer la doc complete de l'imprimante?
"Stuck" <sebastien@artigeste.com> a écrit dans le message de news:
45dc1e61$1@news.pcsoft.fr...
Bonjour à tous,
Avec une imprimante du type Espon TM-H6000, comment lui dire de passer
l'impression sur le cheque (car c'est le ticket par defaut) ?
J'ai une doc en pdf mais pas moyen de trouver une instructions pour dire à
l'imprimante de basculer sur les cheques ...
Sachant que j'utilise les commandes sEcrit() et non le diver windows qui
est tres tres lent pour le ticket.
Et ca fait une semaine que je me bat avec cette ;%@# d'imprimante ...
alors si quelqu'un pouvais m'aider...
Sebastien_nospam@artigeste.com (bien sur sans _nospam ...)
|
| |
| |
| | | |
|
| | |
| |
Posté le 21 février 2007 - 13:25 |
| |
| |
| | | |
|
| | |
| |
Posté le 21 février 2007 - 16:24 |
Ce code fonctionne avec une Epson TMJ -7000 , il peut surement s'appliquer à d'autres modèle.
Vivement un langage moins "Chinois" pour programmer une impression.
Salutations
PROCEDURE Imprime_Cheque()
sOuvre(NoPort,5000,5000,5000)
sFixeParamètre(NoPort,19200,0,8, 0,Faux , Faux ,Faux)
Euro est une chaîne=" "+Caract(27)+Caract(116)+Caract(19)+Caract(213)
sEcrit(NoPort,Caract(27)+("@"))
sEcrit(NoPort,Caract(27)+"c0"+Caract(4)) //4 Envoi sur cheque
sEcrit(NoPort,Caract(27)+"!"+Caract( )// Ecrit simple
sEcrit(NoPort,Caract(27)+"L")//Mode Page
sEcrit(NoPort,Caract(29)+"(P"+Caract(+Caract(0)+Caract(48))
sEcrit(NoPort,Caract(96)+Caract(0))
sEcrit(NoPort,Caract(96)+Caract(0))
sEcrit(NoPort,Caract(128)+Caract(0))
sEcrit(NoPort,Caract(0))
sEcrit(NoPort,Caract(27)+"W"+Caract(155)+Caract(0)+Caract(0)+Caract(0)+Caract(128)+Caract(128)+Caract(112)+Caract(112))
sEcrit(NoPort,Caract(27)+"T"+Caract(1))
sEcrit(NoPort,Lib_Somme_en_lettres+Caract(0xA))
sEcrit(NoPort,Caract(27)+"!"+Caract(0x0))
sEcrit(NoPort,Caract(3)+Caract(1))
sEcrit(NoPort," "+Caract(0xA))
sEcrit(NoPort,"Ordre ") // Etabli à l'Ordre de :
sEcrit(NoPort,Caract(27)+"!"+Caract(32))
Total est chaîne=NumériqueVersChaîne(Montant,"10.2f")
sEcrit(NoPort,TAB+TAB+Total+Euro+Caract(0xA))
sEcrit(NoPort,Caract(27)+"!"+Caract(0x1))
sEcrit(NoPort," "+Caract(0xA))
sEcrit(NoPort," "+Caract(0xA))
Date est chaîne=DateVersChaîne(Date_du_jours,"JJ MM AAAA")
sEcrit(NoPort,Caract(27)+"!"+Caract(0x0))
sEcrit(NoPort,+TAB+TAB+TAB+TAB+" Commune "+TAB+Date+Caract(0xA)) // Commune
sEcrit(NoPort,Caract(27)+"T"+Caract(2))
sEcrit(NoPort," "+Caract(0xC))
sEcrit(NoPort,Caract(27)+("@"))
sFerme(NoPort)
------------------------------------------------------------------------------------------------------
PROCEDURE Imprime_Ticket()
sEcrit(NoPort,Caract(27)+Caract(61)+Caract(1))// Envoi sur imprimante
sEcrit(NoPort,Caract(27)+("@"))
sEcrit(NoPort,Caract(27)+"a"+Caract(1)) //"a"+caract(0) Ecrit à Gauche (1)Ecrit au centre (2)Ecrit a droite
sEcrit(NoPort,Caract(27)+"!")
sEcrit(NoPort," ######### "+Caract(0xA)) // Caract(0xA) Passe à la ligne // Raison Sociale
sEcrit(NoPort,Caract(27)+"!"+Caract(0x30)+Caract(0x16))
sEcrit(NoPort," ######### "+Caract(0xA)) // Raison Sociale 2
sEcrit(NoPort,Caract(27)+"!"+Caract(0x6)+Caract(0x6))
sEcrit(NoPort,"#########"+Caract(0xA)) // Adresse
sEcrit(NoPort,"----------------------------")
sEcrit(NoPort,Caract(0xA)) // Caract(0xA)) Saute 1 ligne
sEcrit(NoPort,Caract(27)+"!"+Caract(1))
sEcrit(NoPort," ############ "+Caract(0xA)) // N° Siret
sEcrit(NoPort,"Ticket No : "+NoTicket+Caract(0xA))
Etc ....
sEcrit(NoPort,Caract(27)+("@"))
sFerme(NoPort)
------------------------------------------------------------------------------------------------------
PROCEDURE Ouvre_Tiroir()
// -----------ouvre Tiroir
sEcrit(NoPort,ESC+("@"))
sEcrit(NoPort,Caract(27)+"p"+Caract(48)+Caract(10)+Caract(30))
sFerme(NoPort)
-------------------------------------------------------------------------------------------------------
PROCEDURE Coupe_Papier()
sOuvre(NoPort,5000,5000,5000)
// Initialise les paramètres du port série
sFixeParamètre(NoPort,19200,0,8, 0,Faux , Faux ,Faux)
// ----------- Coupe Papier
sEcrit(NoPort,Caract(0x1D)+"V"+Caract(0x1)+Caract(0x49)) |
| |
| |
| | | |
|
| | |
| |
Posté le 21 février 2007 - 16:46 |
MERCI !!!!
fantastique, ca marche...me reste plus qu'a comprendre pourquoi ca imprime à 12 cm du debut de la feuille cheque ...
en attendant, merci encore ! |
| |
| |
| | | |
|
| | | | |
| | |
|