USUÁRIO:
SENHA:
SALVAR LOGIN ?
Fórum
Visual Basic
Responder
Voltar
Autor
Assunto:
Imprimir codigo 10, 13 e 26 da tabela ASCII em VB
Miromar
não registrado
Postada em 07/12/2005 12:59 hs
Boa tarde,
Estou gerando um arquivo de texto, porem não esta sendo possivel importa-lo, segundo o pessoal do banco esta dando erro de delimitadores, na verdade tal arquivo contém informações de cobrança bancaria para o banco Banrisul, a linguagem que estou programando e Visual Basic 6, no layout do arquivo consta que no fim dos registros deve ser impresso o cod. 13 e 10 da tab. ASCII ,respecitivamente, ao final do registro deve ser impresso os mesmos cod. anteriores mais o 26 da tabela no final do arquivo.
UGS
SÃO CARLOS
SP - BRASIL
Postada em 07/12/2005 13:19 hs
Boa Tarde Amigo,
Que tipo de relatório você está ultilizando para imprmir isso, CrystalReports, Printer, ActiveReportX...
Tente fazer o seguinte para vc testar, crie um TextBox em um Form e na propriedade do Textbox faça o seguinte:
Private Sub
Text1_KeyPress(KeyAscii As Integer)
MsgBox KeyAscii 'Imprime uma Msg com o cód da tecla Ascii
End Sub
Miromar
não registrado
Postada em 07/12/2005 13:41 hs
Olá,
Na verdade estas informações estão sendo diretamente impressas no arquivo, acredito que não são visiveis, segundo meu colega para impremir o cod. 10 da TAB. ASCII, deve-se usar o comando Chr(10) e para o 13 Chr(13), vc confirma isso?
UGS
SÃO CARLOS
SP - BRASIL
Postada em 07/12/2005 13:53 hs
sim é isso mesmo amigo.
Qualquer dúvida é só perguntar. Abraços
Daniel
SÃO PAULO
SP - BRASIL
Postada em 07/12/2005 15:44 hs
Eu tive esse mesmo problema com arquivo de transferência bancária, e resolvi mudando a forma de abertura do arquivo para:
Open Arquivo For Append As #1
e a forma de gravação para:
Print #1, GRAVA
desse jeito o vb irá gravar os caracteres finalizadores de linha sózinho
dsmn
Miromar
não registrado
Postada em 12/12/2005 16:12 hs
Obrigado daniel, sua participação foi muito útil, é deste tipo de iniciativa que se forma uma mundo melhor, dezejo que Deus te abenções amigo!
Página(s): 1/1
Seu Nome:
Seu eMail:
ALTERAR PARA MODO HTML
Mensagem:
[:)] =
[:P] =
[:(] =
[;)] =
HTML DESLIGADO
VOLTAR
CyberWEB Network Ltda. © Copyright 2000-2024 - Todos os direitos reservados.
Powered by
HostingZone -
A melhor hospedagem para seu site