Pessoal, estou necessitando Gerar boleto de pagamento do banco Itaú. Se alguém tiver algum exemplo e puder disponibilizar. Desde já, agradeço.
3 participantes
[Resolvido]Importação de dados de um arquivo texto
suporte- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 80
Registrado : 18/01/2011
- Mensagem nº1
[Resolvido]Importação de dados de um arquivo texto
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
É preciso seguir algum padrão de tipo e tamanho de letras? Gerar o boleto em si é simples, é só criar um relatório com o texto dos boletos e configurar as posições na folha.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
suporte- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 80
Registrado : 18/01/2011
Ele gera arquivos de retorno(com a extensão .RET) como leio estes arquivos no access? Se abrir pelo BLOCO DE NOTAS, dá certo, mas como importar os dados para o access?
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
Veja;
http://dl.dropbox.com/u/771097/Importando%20Arquivos%20Texto%20Via%20VBA.doc
http://dl.dropbox.com/u/771097/Importando%20Arquivos%20Texto%20Via%20VBA.doc
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
suporte- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 80
Registrado : 18/01/2011
O problema Mestre JPaulo, é que o arquivo vem com a extensão .RET. Eu teria que transforma-lo em .txt para poder importar no access, e não sei como. Eu postei ele aqui com a extensão .txt, mas ele é .RET. É possível renomea-lo com a extensão txt, via VBA?
- Anexos
- CN04020A_2.txt
- Você não tem permissão para fazer download dos arquivos anexados.
- (2 Kb) Baixado 50 vez(es)
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
O procedimento usado para copiar dados de um txt pode copiar dados de qualquer outro tipo de arquivo de texto. Se o tipo de arquivo puder simplesmente ter a extensão renomeada para txt, pode fazê-lo tambem. Entre em um módulo vba e pressione F1 e procure por rename.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
Olhe o simples;
Private Sub SeuBotao_Click()
FileCopy "C:\teste.txt", "C:\teste.ret"
Kill "C:\teste.txt"
End Sub
Private Sub SeuBotao_Click()
FileCopy "C:\teste.txt", "C:\teste.ret"
Kill "C:\teste.txt"
End Sub
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
suporte- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 80
Registrado : 18/01/2011
Mestres, obrigado mais uma vez. Consegui através deste último código. Um abraço.
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
Obrigado pelo retorno o forum agradece.
Foi apenas um exemplo que para o seu proposito seria o contrario;
Private Sub SeuBotao_Click()
FileCopy "C:\teste.ret", "C:\teste.txt"
Kill "C:\teste.ret"
End Sub
Foi apenas um exemplo que para o seu proposito seria o contrario;
Private Sub SeuBotao_Click()
FileCopy "C:\teste.ret", "C:\teste.txt"
Kill "C:\teste.ret"
End Sub
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...