EPSON M129C

GOLVEIAR 31/05/2012 19:52:19
#403308
Olá galera blz! Fiz um sistema de pizaria usando uma impressora daruma ate ai blz só que meu novo cliente tem uma epson m129c termica. Onde arrumo um exemplo de impressão em vb6 para eu fazer um teste não to encontrado nenhum codigo vb6 com epson. Se algum puder me ajudar agradeço.
MARCELO.TREZE 31/05/2012 20:39:05
#403309 Resposta escolhida
testa isso

Open [Ô]COM1[Ô] For Output As #1

Print #1, Chr$(&H1B); [Ô]@[Ô]; [ô]Initializes the printer (ESC @)
Print #1, Chr$(&H1B); [Ô]a[Ô]; Chr$(1); [ô]Specifies a centered printing position (ESC a)
Print #1, Chr$(&H1B); [Ô]![Ô]; Chr$(0); [ô]Specifies font A (ESC !)
Print #1, [Ô]January 14, 2002 15:00[Ô];
Print #1, Chr$(&H1B); [Ô]d[Ô]; Chr$(3); [ô]Prints and 3 line feeding (ESC d)
Print #1, Chr$(&H1B); [Ô]a[Ô]; Chr$(0); [ô]Selects the left print position (ESC a)
Print #1, Chr$(&H1B); [Ô]![Ô]; Chr$(1); [ô]Selects font B
Print #1, [Ô]TM-U210B $20.00[Ô]; Chr$(&HA);
Print #1, [Ô]TM-U210D $21.00[Ô]; Chr$(&HA);
Print #1, [Ô]PS-170 $17.00[Ô]; Chr$(&HA);
Print #1, Chr$(&HA); [ô]Line feeding (LF)
Print #1, Chr$(&H1B); [Ô]![Ô]; Chr$(17); [ô]Selects double-height mode
Print #1, [Ô]TOTAL $58.00[Ô]; Chr$(&HA);
Print #1, Chr$(&H1B); [Ô]![Ô]; Chr$(0); [ô]Cancels double-height mode
Print #1, [Ô]------------------------------[Ô]; Chr$(&HA);
Print #1, [Ô]PAID $60.00[Ô]; Chr$(&HA);
Print #1, [Ô]CHANGE $ 2.00[Ô]; Chr$(&HA);
Print #1, Chr$(&H1D); [Ô]V[Ô]; Chr$(66); Chr$(0); [ô]Feeds paper & cut

Close #1

ps: se não me engano a impressora é é uma tm-88III
AJSO 31/05/2012 20:45:28
#403310
Caro


é o mesmo método da Epson térmica TM-T81+ só muda as funciolaidades é preciso ter acesso aos objetos da dll

este anexo tem todas a funções para execução ele está em vb.Net mas tambem pode ser executado igualmente em VB6.0.


Boa sorte
Tópico encerrado , respostas não são mais permitidas
Voltar