Comment imprimer un ticket caisse sur imprimante EPSON TM-T88 ?

Je dois developper une application caisse dans laquelle je dois imprimer un ticket.

Sur une imprimante normale (bureautique), j'utilise le code suivant :

    PrintDocument prtdoc = new PrintDocument();
    prtdoc.PrintPage += new PrintPageEventHandler(...);
    prtdoc.Print();

et ca marche normalement l'impression des données !

Je voudrais savoir comment dois-je faire sur une imprimante de type caisse (EPSON TM-T88III) ?
Aussi, qu'est qu'il faut coder pour faire couper automatiquement le ticket une fois que c'est imprime ?

Merci.

Merci de vos réponses. Il y avait donc 2 solutions pour faire couper le papier en fin d'impression :
- soit en configurant directement l'imprimante (via ses propriétés)
- soit utiliser l'interface OPOS (bibliothèque de fonctions)

saaalut ttvi ,
je suis en train de chercher une solution pour le meme pb ;
cette epson T88III ne peut pas imprimer des objets (cercle, trait ...) c pour ça qu'on peut pas utiliser ni Crystal reports ni PrintDocument .
elle n'accepte que du texte en code ASCII, alors tu dois passer par un fichier texte pour l'impression.
je suis en train de developper cette solution, si t'a encore besoin contacter moi sur nizaration2000@yahoo.fr ;
si t'as trouvé une solution meilleurs contacte moi aussi ;-)

Salut tout le monde, moi aussi j'ai a peu près la meme histoire. Je vien de telecharger Opos malheureuesement on dirais qu'il est fournit avec aucune doc, si qq'un pouvait m'indiquer la marche a suivre pour comprendre ses classes, ou pour réussir a configurer, mon programme pour qu'ill puisse imprimer sur une epson Tm merci d'avance.
mat.

Il faut telecharger sur le site Epson ( s'enregistrer ) opos adk version de base, celle qui fait environ 13 Mo et charger derriere les adk sp2 jusqu'a sp6. Des exemples sont livrés avec un ocx . l'impresion de ticket est facile mais je bloque encore sur celle des chèques
la doc sur
http://www.nrf-arts.org/download/upos_spec1.10_02102006.pdf#search=%22PTR_S_RECEIPT%22

Salut,

J'ai trouvé la solution pour ce problème mais ça c'est fait avec Windev (!!!) Si vous voulez que je vous donne le code complet pour pouvoir l'analyser et le transformer en VB !!??

ça imprime, coupe l'étiquette et ouvre la caisse automatiquement...

Excellent....! quoi...!

Bonjour,

Je suis actuellement en train de paramètrer une imprimante epson TM-T88 et je me prends la tête.

Vous serait-il possible de me faire parvenir votre code windev ?

merci par avance

 

Voici le code sur evenement clic sur bouton + la procedure bImprimeLigne()

Début du code:

// Impression du ticket de caisse

I est un entier

nTotalGeneral est un réel

SI

sOuvre(PortImprimante,256,256) ALORS // Ouverture du port parallèle

//Ouvre caisse

sEcrit(PortImprimante,ESC + "p" + Caract(0)+ Caract(10) + Caract(10))

// Impression de l'entete du ticket

SI PAS

bImprimeLigne(DebutGras+" BOUTIQUE"+FinGras) ALORS

Erreur( "Erreur d'écriture sur le port n°"+PortImprimante,...

"Vérifiez que l'imprimante est bien connectée et allumée.")

sFerme(PortImprimante)

RETOUR

FIN

//bImprimeLigne("----------------")

bImprimeLigne("")

bImprimeLigne(DebutCompresse+Répète("-",38)+FinCompresse)

bImprimeLigne(DebutCompresse+Complète("Désignation",20)+" !Qté! Prix!"+FinCompresse) // ! Total"+FinCompresse)

bImprimeLigne(DebutCompresse+Répète("-",38)+FinCompresse)

// Impression des lignes du ticket

POUR

I=1 A TableOccurrence("TABLE")

SI

COL_TOTAL[I]<>0 ALORS // Impression si ligne non vide

// Formatage de la ligne

bImprimeLigne( DebutCompresse+Complète(COL_DESIGNATION[I],18)+" !"+...

NumériqueVersChaine(COL_QTE[I],"%2d")+" ! "+...

NumériqueVersChaine(COL_TOTAL[I],"%6.2f")+"!"+FinCompresse)

//NumériqueVersChaine(COL_TOTAL[I],"%6.2f")+FinCompresse)

// Cumul pour total

nTotalGeneral+=COL_TOTAL[I]

FIN

FIN

bImprimeLigne(DebutCompresse+Répète("-",38)+FinCompresse)

// Ligne de total

bImprimeLigne( DebutCompresse+Complète("Total à régler: ",30)+...

//NumeriqueVersChaine(nTotalGeneral)+FinCompresse)

NumériqueVersChaine(nTotalGeneral,"%6.2f")+FinCompresse)

//bImprimeLigne("")

//bImprimeLigne("")

bImprimeLigne( DebutCompresse+"Réglé le :"+...

DateVersChaine(DateSys())+" "+...

Gauche(HeureVersChaine(HeureSys()),5)+FinCompresse)

// Impression du pied du ticket

bImprimeLigne(DebutCompresse+Répète("-",38)+FinCompresse)

bImprimeLigne( DebutCompresse+Complète("Espèces : ",30)+...

//NumeriqueVersChaine(nTotalGeneral)+FinCompresse)

NumériqueVersChaine(Saisie2,"%6.2f")+FinCompresse)

bImprimeLigne( DebutCompresse+Complète("Rendu : ",30)+...

//NumeriqueVersChaine(nTotalGeneral)+FinCompresse)

NumériqueVersChaine(Saisie3,"%6.2f")+FinCompresse)

bImprimeLigne(DebutCompresse+Répète("-",38)+FinCompresse)

bImprimeLigne(" MERCI DE VOTRE VISITE")

bImprimeLigne(" A BIENTOT")

bImprimeLigne(DebutCompresse+Répète("-",38)+FinCompresse)

bImprimeLigne("")

bImprimeLigne("")

bImprimeLigne("")

bImprimeLigne("")

bImprimeLigne("")

bImprimeLigne("")

bImprimeLigne("")

//Couper

sEcrit(PortImprimante,ESC + "c0" + Caract(02) + ESC + "i")

sFerme(PortImprimante) // Fermeture du port parallèle

SINON

Info("Erreur d'ouverture du port...!") // Erreur d'ouverture du port parallèle

FIN

Fin du code

Début procedure:

PROCEDURE

bImprimeLigne(sLigne)

// avec un retour automatique à la ligne

SI

sEcrit(PortImprimante,AnsiVersOem(Répète(" ",Marge)+sLigne+RC)) = 0 ALORS

RENVOYER

Faux

SINON

RENVOYER

Vrai

FIN

Fin procedure

Bon developpement!



Excellent....! quoi...!