POS komande i VB6

poruka: 12
|
čitano: 5.136
|
moderatori: Lazarus Long, XXX-Man, vincimus
1
+/- sve poruke
ravni prikaz
starije poruke gore
14 godina
neaktivan
offline
POS komande i VB6

Pozdrav

 

Molim nekog za pomoć prije neko poludim.

 

Imam POS printer OCPP-582 Termal Recipient Printer; neki kinez. Radi normalno.

 

Muči me da ne mogu poslati ESC kod na njega da mu promijenom veličinu fonta i print alignment ( lijevo, centar desno). Ocito me muči ESC kod kojed printer ne pozna.

 

Printer je USB. 

 

Dakle kod:

 

Printer.Print Chr$(27) & Chr$(97) & "2"
Printer.Print "DESNO"
Printer.EndDoc

 

Ovo bi trebalo raditi na EPSONU normalno (valjda), na web stranici printera pise da koristi standarne EPSON POS komande. Pomozite. Evo slika kaj isprinta.

 

 

 

 
0 0 hvala 0
14 godina
neaktivan
offline
Re: POS komande i VB6
Poruka je uređivana zadnji put pet 19.1.2018 16:37 (DankoH).
14 godina
neaktivan
offline
Re: POS komande i VB6

Ne radi niti Chr$(&H1B) kao ESC kod.

16 godina
offline
Re: POS komande i VB6

-zašto misliš da podržava epsonov esc? postoje dva standarda, epson i ibm (proprinter), ako ne radi jedan možda drugi.. ili ni jedan, jer su to sve emulacije koje ugl podržavaju svi printeri ali ne moraju pa zato pitanje, imaš teh.specifikacije i znaš da podržava neku emulaciju ili nagađaš? .. treći standarad je hp-laserjet ali je manja šansa da takav tip printera podržava.. esc ili ibm ili neki treći, pa do nekih npr fujicu i sl. koji se korsite na kopirkama i sl.

C64/TurboModul-OpenSourceProject.org.cn.部分作品为网上收集整理,供开源爱好者学习使用
14 godina
neaktivan
offline
Re: POS komande i VB6
ihush kaže...

-zašto misliš da podržava epsonov esc? postoje dva standarda, epson i ibm (proprinter), ako ne radi jedan možda drugi.. ili ni jedan, jer su to sve emulacije koje ugl podržavaju svi printeri ali ne moraju pa zato pitanje, imaš teh.specifikacije i znaš da podržava neku emulaciju ili nagađaš? .. treći standarad je hp-laserjet ali je manja šansa da takav tip printera podržava.. esc ili ibm ili neki treći, pa do nekih npr fujicu i sl. koji se korsite na kopirkama i sl.

 

 

Ovo pise na stranici proizvođača printera pod tim modelom

 

 

Printing command: compatible with EPSON ESC/POS

 

http://www.ocominc.com/products/58mm-Thermal-Receipt-Printer-OCPP-582.html#.WmITdq6nHcs

 

16 godina
offline
Re: POS komande i VB6

ok, podržava esc.. probaj ovaj primjer (4.-sample...).

C64/TurboModul-OpenSourceProject.org.cn.部分作品为网上收集整理,供开源爱好者学习使用
14 godina
neaktivan
offline
Re: POS komande i VB6

Hvala na trudu ali ne radi

 


Dim str As String
str = ""
str = Chr$(&H1B) & "@" 'Initializes the printer (ESC @)
str = str & Chr$(&H1B) & "a" & Chr$(1) 'Specifies a centered printing position (ESC a)
str = str & Chr$(&H1B) & "!" & Chr$(0) 'Specifies font A (ESC !)
str = str & "January 14, 2002 15:00"
str = str & Chr$(&H1B) & "d" & Chr$(3) 'Prints and 3 line feeding (ESC d)
str = str & Chr$(&H1B) & "a" & Chr$(0) 'Selects the left print position (ESC a)
str = str & Chr$(&H1B) & "!" & Chr$(1) 'Selects font B
str = str & "TM-U210B $20.00" & Chr$(&HA)
str = str & "TM-U210D $21.00" & Chr$(&HA)
str = str & "PS-170 $17.00" & Chr$(&HA)
str = str & Chr$(&HA) 'Line feeding (LF)
str = str & Chr$(&H1B) & "!" & Chr$(17) 'Selects double-height mode
str = str & "TOTAL $58.00" & Chr$(&HA)
str = str & Chr$(&H1B) & "!" & Chr$(0) 'Cancels double-height mode
str = str & "------------------------------" & Chr$(&HA)
str = str & "PAID $60.00" & Chr$(&HA)
str = str & "CHANGE $ 2.00" & Chr$(&HA)
str = str & Chr$(&H1D) & "V" & Chr$(66) & Chr$(0)
'Drawer Kick (ESC p)
str = str & Chr$(&H1B) & Chr$(&H70) & Chr$(&H0) & Chr$(60) & Chr$(120)

Printer.Print str

Printer.EndDoc

 

 

 

 

Očito Chr$(&H1B) nije ESC kod. Ili je printer u nekom modu koji ne podrzava kodove !? 

 

14 godina
neaktivan
offline
Re: POS komande i VB6

Ako šaljem liniju po liniju na print onda izgleda drugačije ali isto ne valja:

 

Printer.Print Chr$(&H1B) & "@" 'Initializes the printer (ESC @)
Printer.Print Chr$(&H1B) & "a" & Chr$(1) 'Specifies a centered printing position (ESC a)
Printer.Print Chr$(&H1B) & "!" & Chr$(0) 'Specifies font A (ESC !)
Printer.Print "January 14, 2002 15:00"
Printer.Print Chr$(&H1B) & "d" & Chr$(3) 'Prints and 3 line feeding (ESC d)
Printer.Print Chr$(&H1B) & "a" & Chr$(0) 'Selects the left print position (ESC a)
Printer.Print Chr$(&H1B) & "!" & Chr$(1) 'Selects font B
Printer.Print "TM-U210B $20.00" & Chr$(&HA)
Printer.Print "TM-U210D $21.00" & Chr$(&HA)
Printer.Print "PS-170 $17.00" & Chr$(&HA)
Printer.Print Chr$(&HA) 'Line feeding (LF)
Printer.Print Chr$(&H1B) & "!" & Chr$(17) 'Selects double-height mode
Printer.Print "TOTAL $58.00" & Chr$(&HA)
Printer.Print Chr$(&H1B) & "!" & Chr$(0) 'Cancels double-height mode
Printer.Print "------------------------------" & Chr$(&HA)
Printer.Print "PAID $60.00" & Chr$(&HA)
Printer.Print "CHANGE $ 2.00" & Chr$(&HA)
Printer.Print Chr$(&H1D) & "V" & Chr$(66) & Chr$(0)
'Drawer Kick (ESC p)
Printer.Print Chr$(&H1B) & Chr$(&H70) & Chr$(&H0) & Chr$(60) & Chr$(120)

13 godina
neaktivan
offline
POS komande i VB6

1. Pronađi test aplikaciju za taj printer. Sigurno postoji. Na njoj pogledaj ima li primjere različitih tipova ispisa.

 

2. "Alignment" parametar postoji samo u rasponu od 0-2 ili postoji i alternativni raspon 48-50?

 

3. Printeri su spore naprave i ne vole da ih se zbomba s velikom količinom naredbi. Pokušaj slati s pauzama između komandi.

Znam barem nekoliko modela termalnih printera na kojima slanje s lošim tajmingom zezne ispis grafike.

 

4. Ako imaš verziju printera sa serijskim portom, skopčaj se direktno s nekakvim terminal-softwareom koji može slati hex brojeve i ručno potestiraj što to on zapravo podržava.

 

 

 
0 0 hvala 0
14 godina
neaktivan
offline
Re: POS komande i VB6

Ostali printeri rade normalno od sp200 pa do epsona termalnih. Ali nisam nikad radio sa USB printerom i sa driver printanjem, samo raw. 

Ne znam, ovo jednostavno ne radi. Ne kontam, on isprinta sve sto trazim bez problema, ali komande ne idu nikako.

 

Ima neki test prog, pokusaval sam mijenjat postavke ali bezuspjesno.

13 godina
neaktivan
offline
Re: POS komande i VB6
DankoH kaže...

Ostali printeri rade normalno od sp200 pa do epsona termalnih. Ali nisam nikad radio sa USB printerom i sa driver printanjem, samo raw. 

Ne znam, ovo jednostavno ne radi. Ne kontam, on isprinta sve sto trazim bez problema, ali komande ne idu nikako.

 

Ima neki test prog, pokusaval sam mijenjat postavke ali bezuspjesno.

 

Zar ne možeš natjerati "raw" mod rada i na tome?

14 godina
neaktivan
offline
Re: POS komande i VB6
Djuro von Prekoplotovich kaže...
DankoH kaže...

Ostali printeri rade normalno od sp200 pa do epsona termalnih. Ali nisam nikad radio sa USB printerom i sa driver printanjem, samo raw. 

Ne znam, ovo jednostavno ne radi. Ne kontam, on isprinta sve sto trazim bez problema, ali komande ne idu nikako.

 

Ima neki test prog, pokusaval sam mijenjat postavke ali bezuspjesno.

 

Zar ne možeš natjerati "raw" mod rada i na tome?

 

Da, mogu. I to radi. Tnx. Evo kod ako koga zanaima.

 

 

Open "\\Vb-PC\POS-58" For Output As #1

 

Print #1, Chr$(27); Chr$(97); "2";
Print #1, "DESNO"

 

Print #1, Chr$(27); Chr$(97); "1";
Print #1, "CENTAR"

 

Print #1, Chr$(27); Chr$(97); "0";
Print #1, "LIJEVO"

 

Close #1

 

 

Hvala svima na pomoći.

 

lp

Danijel

1
Nova poruka
E-mail:
Lozinka:
 
vrh stranice