CODIGO DE BARRAS

DAVIDNUNES 16/10/2009 14:42:56
#325485
Boa tarde estou com problemas para criar código de barras na zebra s500 pois ontem eu criei o código e estava perfeito
Hoje quando fui imprimir novamente o código que era ’’’’’’’’’’’’’’’’’ (ex do tamanho do código) hoje fui imprimir e estava ‘’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’ não fiz alteração nenhuma no código só desliguei o PC e liguei novamente! Segue código
Open [Ô]com7:[Ô] For Output As #1
Print #1, [Ô]^XA[Ô]
Print #1, [Ô]^LL82[Ô]
Print #1, [Ô]^PQ1,0,0,0[Ô]
Print #1, [Ô]^MUM,400,400^LH0,0[Ô]
Print #1, [Ô]^PON[Ô]
Print #1, [Ô]^A0,12,14[Ô] [ô]FONTE
Print #1, [Ô]^FO230,25[Ô] [ô]ESPAÇAMENTO
Print #1, [Ô]^FDTestando^FS[Ô] [ô]TEXTO
Print #1, [Ô]^A0,26,18[Ô] [ô]FONTE
Print #1, [Ô]^FO435,40[Ô] [ô]ESPAÇAMENTO
Print #1, [Ô]^FDR$ [Ô] & 00[Ô]) & [Ô]^FS[Ô] [ô]TEXTO
Print #1, [Ô]^FO260,40^BCN,25,Y,N,N^FD[Ô]123456FS[Ô]
Print #1, [Ô]^XZ[Ô]
Close #1

Espero que vocês consiga me ajudar dês de já agradeço
TECLA 16/10/2009 20:12:36
#325513
Qual é o número referente ao código de barras?
DAVIDNUNES 16/10/2009 21:24:54
#325519
Print #1, [Ô]^FO260,40^BCN,25,Y,N,N^FD[Ô]123456FS[Ô]
FGSANTOS 16/10/2009 23:48:51
#325527
David,

Eu utilizo o componente mscomm para conectar com a porta COM e mando este codigo para imprimir codigo de barras:

mscomm.Output = [Ô]^FO48,144^BEN,48,Y,N^FD[Ô] & Left(Format(GrdProd.TextMatrix(nI, 1), [Ô]0000000000000[Ô]), 12) & [Ô]^FS[Ô] [ô]EAN

Mando 12 caracteres pois o digito verificador do EAN é calculado pela impressora.
Tópico encerrado , respostas não são mais permitidas
Voltar