Ale
|
NITERÓI
RJ - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 02/01/2006 18:57 hs
Senhores, estou precisando imprimir alguns valores no boleto bancário do Bradesco. A impressão do primeiro boleto está saido correta, porém no 2ª boleto os valores já não estão ficando na mesma posição e na 3ª impressão ele já fica todo errado. Estou usando o código abaixo, mais acho que o problema é que não consigo definir o tamanho da folha. Private Sub ImpBoletoBradasco() Open Printer.Port For Output As #1 Len = 142
Print #1, ""
Print #1, Space(100); "02/01/2006" 'data de vencimento
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, Space(110); "115,27" 'valor do documento
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, Space(10); "APOS O VENCIMENTO MULTA DE 5%" 'obs
Print #1, Space(10); "COBRANCA MENS./DEZEMBRO" 'obs
Print #1, Space(10); "FILIAL: EXTRA SAO GONCALO" 'obs
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Print #1, ""
Close #1 End Sub
Obrigado. |
|
|
|
|
|
|
|
Postada em 03/01/2006 09:17 hs
cara sinceramente, tambem apanhei muito com isso, o unico jeito é imprimir uma a um....porque a propria impressora matricial é muito chata pra isso... espero ter ajudar Obs.: todas as pessoas que consultei deram a mesma opinião.. abraços
Argemiro Aguiar da Silva Criativa Produtos e Serviços 5511 2135-9600
|
|
|
|
Motor
|
PARÁ DE MINAS
MG - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 05/01/2006 17:52 hs
Ao Invés de colocar spac(110)
(Print #1, Space(110); "115,27" 'valor do documento)
Tente colocar tab(); Por exemplo
(Print #1, tab(60) ; "115,27"), será impresso na coluna 60
aí você vai calculando os espaços dependendo da quantidade de caracteres.
Espero ter Ajuado. 
|
|
|
|
Motor
|
PARÁ DE MINAS
MG - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 05/01/2006 17:53 hs
Ao Invés de colocar spac(110)
(Print #1, Space(110); "115,27" 'valor do documento)
Tente colocar tab(); Por exemplo
(Print #1, tab(60) ; "115,27"), será impresso na coluna 60
aí você vai calculando os espaços dependendo da quantidade de caracteres.
Espero ter Ajuado.
|
|
|
|
Ale
|
NITERÓI
RJ - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 05/01/2006 19:16 hs
valeu cara pela dica. Depois de bastante tempo eu consegui fazer a impressão dos boletos correta. |
|
|
|
|
|
Postada em 03/11/2006 11:04 hs
Alguem sabe me dizer como faço para gerar um boleto no VB completo com codigo de barras ? |
|
|
|
|
