IMPRESSORA ARGOX
OLA A TODOS, NAO CONSIGO POSICIONAR ETIQUETA 75MMX100MM, NA IMPRESSORA OS0214 PLUS .E ETIQUETA E PRE-IMPRESSEÇA E E FORMULARIO CONTINUO, ESTOU USANDO ESTE CODIGO A BAIXA, MAS NAO CONSIGO ACERTAR AS POSIÇÕES, ALGUEM PODE VER O QUE ESTA DE ERRADO OU PODE ME DAR UM DICA DE COMO FAZER, DESDE JA AGRADEÇO A ATENÇÃO DE TODOS.
F = FreeFile
For Cont = 1 To 10
Open [Ô]Lpt1[Ô] For Output As #F
Print #F, Chr(2) & [Ô]Q[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]c0000[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]f320[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]L[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]C0000[Ô] & Chr(13)
Print #F, [Ô]H12[Ô] & Chr(13)
Print #F, [Ô]D11[Ô] & Chr(13)
Print #F, [Ô]R0000[Ô] & Chr(13)
Print #F, [Ô]131100000420080[Ô] & Format(Date, [Ô]dd/MM/yyyy[Ô]) & [Ô] - [Ô] & Cont & Chr(13)
[ô]LINGUA
Print #F, [Ô]131100000790033L[Ô] & Chr(13)
[ô]RINS
Print #F, [Ô]131100001000033R[Ô] & Chr(13)
[ô]CORAÇÃO
Print #F, [Ô]131100001220033C[Ô] & Chr(13)
[ô]FIGADO
Print #F, [Ô]131100001430033F[Ô] & Chr(13)
[ô]RABADA
Print #F, [Ô]131100001430112RR[Ô] & Chr(13)
[ô]BOVINOS
Print #F, [Ô]131100001800131X[Ô] & Chr(13)
[ô]BUBALINO
Print #F, [Ô]131100001800190X[Ô] & Chr(13)
Print #F, [Ô]E[Ô] & Chr(13)
Close #F
Next Cont
F = FreeFile
For Cont = 1 To 10
Open [Ô]Lpt1[Ô] For Output As #F
Print #F, Chr(2) & [Ô]Q[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]c0000[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]f320[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]L[Ô] & Chr(13)
Print #F, Chr(2) & [Ô]C0000[Ô] & Chr(13)
Print #F, [Ô]H12[Ô] & Chr(13)
Print #F, [Ô]D11[Ô] & Chr(13)
Print #F, [Ô]R0000[Ô] & Chr(13)
Print #F, [Ô]131100000420080[Ô] & Format(Date, [Ô]dd/MM/yyyy[Ô]) & [Ô] - [Ô] & Cont & Chr(13)
[ô]LINGUA
Print #F, [Ô]131100000790033L[Ô] & Chr(13)
[ô]RINS
Print #F, [Ô]131100001000033R[Ô] & Chr(13)
[ô]CORAÇÃO
Print #F, [Ô]131100001220033C[Ô] & Chr(13)
[ô]FIGADO
Print #F, [Ô]131100001430033F[Ô] & Chr(13)
[ô]RABADA
Print #F, [Ô]131100001430112RR[Ô] & Chr(13)
[ô]BOVINOS
Print #F, [Ô]131100001800131X[Ô] & Chr(13)
[ô]BUBALINO
Print #F, [Ô]131100001800190X[Ô] & Chr(13)
Print #F, [Ô]E[Ô] & Chr(13)
Close #F
Next Cont
Passei por isso uns anos atrás. Acho que vc pode usar o penúltimo post desse link pra resolver seu problema:
http://www.vbmania.com.br/pages/index.php?varModulo=Forum&varMethod=abrir&varID=311821&varWorld=
Se liga na linha colorida e a legenda logo abaixo dessa linha no post.
http://www.vbmania.com.br/pages/index.php?varModulo=Forum&varMethod=abrir&varID=311821&varWorld=
Se liga na linha colorida e a legenda logo abaixo dessa linha no post.
Tópico encerrado , respostas não são mais permitidas