Zebra Tlp2844 (Resolvido)

[atnsoft]

Eita que to apanhando desta impressora.

Ela tá instalada via Usb

- Se faço a impressão via dos com o edit, enviando por comando, funciona,

- os mesmos comandos via tdosprn+net use..., não funciona,

- Bloco de notas funciona,

- Wordpad não funciona,

- Word 2003 tb não,

- Zebra designer funciona que é uma blz

Preciso imprimir o seguinte:

Codigo + data: C12345678 + 27/09/2011

Nome: JOSE DA SILVA SAURO

Exames : 1234, 1234, 1234,etc

Exames: 1234, 1234, etc

Tipo: branco, azul, etc

codigo de barra: C12345678

Que fazer ?

Alguma idéia ?

PS: Já repassei o forum procurando por Zebra e continuo na mesma.

AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce

Editado por - atnsoft on 27/09/2011 10:01:12

Editado por - atnsoft on 27/09/2011 18:46:30

[atnsoft]

Eita que to apanhando desta impressora.

Ela tá instalada via Usb

- Se faço a impressão via dos com o edit, enviando por comando, funciona,

- os mesmos comandos via tdosprn+net use..., não funciona,

- Bloco de notas funciona,

- Wordpad não funciona,

- Word 2003 tb não,

- Zebra designer funciona que é uma blz

Preciso imprimir o seguinte:

Codigo + data: C12345678 + 27/09/2011

Nome: JOSE DA SILVA SAURO

Exames : 1234, 1234, 1234,etc

Exames: 1234, 1234, etc

Tipo: branco, azul, etc

codigo de barra: C12345678

Que fazer ?

Alguma idéia ?

PS: Já repassei o forum procurando por Zebra e continuo na mesma.

AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce

Editado por - atnsoft on 27/09/2011 10:01:12

Editado por - atnsoft on 27/09/2011 18:46:30

[edutraini]

vn_vez = 1

do while vn_vez <= nroetiq

VN_MAT = forma+" "+tipo

VN_OS = alltrim(pedite)

IF DIMENSAO3 = 0

VN_DIM = STR(DIMENSAO1,7,2)+" X "+STR(DIMENSAO2,7,2)

ELSE

VN_DIM = STR(DIMENSAO1,7,2)+" X "+STR(DIMENSAO2,7,2)+" X "+STR(DIMENSAO3,7,2)

ENDIF

vn_PI = str(vn_ped,7)+" - "+str(pedi->itemcota,2)+"/"+str(vn_itped,2)

VN_OBS = "OBS PROD"

_nvias := 1

_Buffer := ""

_Buffer += "^XA"

_Buffer += "^PR6"

_Buffer += "^LH40,10^FS"

_Buffer += "^FO0,65^A0N,25,30^FR^FDCl.:^FS"

_Buffer += "^FO70,65^A0N,30,30^FR^FD"+vn_cliente+"^FS"

_Buffer += "^FO0,130^A0N,25,30^FR^FDPI: ^FS"

_Buffer += "^FO70,125^A0N,30,30^FR^FD"+VN_PI+"^FS"

_Buffer += "^FO0,178^A0N,25,30^FR^FDMat.:^FS"

_Buffer += "^FO75,166^A0N,35,35^FR^FD"+VN_MAT+"^FS"

_Buffer += "^FO75,196^A0N,25,25^FR^FD"+VN_DIM+"^FS"

_Buffer += "^FO0,235^A0N,25,35^FR^FDOS: ^FS"

_Buffer += "^FO70,235^FB270,2,0,L,0^A0N,30,30^FR^FD"+vn_OS+"^FS"

*BOX's*

_Buffer += "^FO60,50^GB240,62,3^FS"

_Buffer += "^FO60,115^GB280,38,3^FS"

_Buffer += "^FO60,155^GB280,64,3^FS"

_Buffer += "^FO60,223^GB280,66,3^FS"

*LOGO*

_Buffer += "^FO55,310^A0N,55,55^FR^FDSerraMetal^FS"

_Buffer += "^FO10,270^FR^XGA!PPDlog,1,1^FSs"

_Buffer += "^FO90,350^A0N,20,20^FR^FISO 9001:2008^FS"

_Buffer += "^XZs"

_Buffer += "^PQ"+str(_nvias)+",,,N^XZ"

cArq:=FCreate("LPT1")

FWrite(cArq,_buffer)

FClose(cArq)

vn_vez = vn_vez + 1

Enddo

eu uso isso ve se serve

FW24 + xharbour

email :edutraini@uol.com.br

[eevaldo]

Ola

procure por zebra na pesquisa q tambem sofri com ela mas resolvi tudo, tem ate codigo postado.

Obrigado.

Evaldo Wagner

FiveWin9.07 xHarbour 1.21,BCC55, Pelles C xDev,xHarbour for Linux(console)

evaldowl@hotmail.com

[eevaldo]

completando so fia impressao via USB

Obrigado.

Evaldo Wagner

FiveWin9.07 xHarbour 1.21,BCC55, Pelles C xDev,xHarbour for Linux(console)

evaldowl@hotmail.com

[atnsoft]

Afe, resolvido:

Use o ZebraDesigner para pegar as coordenadas, colocando as entradas como introdução por teclado e faça os ajustes até ficar ok. Vá pra tela de impressão e selecione imprimir para ficheiro. Pronto tem-se um arquivo texto editável.

Compartilhe a impressora, depois net use lpt1:.....

e boa sorte.

oPrn := TdosPrn():New("LPT1")

oPrn:SetCoors(00,00)

oprn:say(oprn:nrow+1,00,"I8,A,001"+lPula)

oprn:say(oprn:nrow+1,00,"Q406,023"+lPula)

oprn:say(oprn:nrow+1,00,"Q831"+lPula)

oprn:say(oprn:nrow+1,00,"rN"+lPula)

oprn:say(oprn:nrow+1,00,"S4"+lPula)

oprn:say(oprn:nrow+1,00,"D7"+lPula)

oprn:say(oprn:nrow+1,00,"ZT"+lPula)

oprn:say(oprn:nrow+1,00,"JF"+lPula)

oprn:say(oprn:nrow+1,00,"O"+lPula)

oprn:say(oprn:nrow+1,00,"R111,0"+lPula)

oprn:say(oprn:nrow+1,00,"F100"+lPula)

oprn:say(oprn:nrow+1,00,"N"+lPula)

oPrn:Say(oPrn:nRow+01,00,'A207,391,3,1,3,2,N,"C12345678"'+lPula)

oPrn:Say(oPrn:nRow+01,00,'A209,141,3,1,2,1,N,"26/09/2001"'+lPula)

oPrn:Say(oPrn:nRow+01,00,'A324,390,3,1,2,1,N,"examexxx"'+lPula)

oPrn:Say(oPrn:nRow+01,00,'A355,389,3,1,2,1,N,"TAMPA BRANCA DA SILVA"'+lPula)

oPrn:Say(oPrn:nRow+01,00,'A297,389,3,1,2,1,N,"exame3"'+lPula)

oPrn:Say(oPrn:nRow+01,00,'A271,390,3,1,2,1,N,"exame4"'+lPula)

oPrn:Say(oPrn:nRow+01,00,'A246,388,3,1,2,1,N,"teste"'+lPula)

oPrn:Say(oPrn:nRow+01,00,'B383,324,3,1,6,80,36,N,"123456789"'+lPula)

oprn:say(oprn:nrow+1,00,"P1"+lPula)

oPrn:End(.F., .F.)

id=code>id=code>

AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce

Editado por - atnsoft on 27/09/2011 18:51:00

[Theotokos]

Boa Tarde!!!

Pessoal estou imprimindo etiqueta na ZEBRA TLP 2844 com zdesign, porta USB. Qdo configuro, imprimo tudo certinho, derepente uns dias depois, perde a configuração, tenho que entra na preferencia impressora zdesign e mudar alguma coisa e OK. ai volta funcionar... O QUE PODE SER ESTE PROBLEMA ?

resumindo: a impressora perde a configuração...