Arquivo de Retorno CEF

[dataset 0]

Prezados, boa tarde;

 

Estou na conclusão do boleto da CEF. Terei que pegar o arquivo de retorno via FTP. Então funciona assim:

 

Sistema gera boleto => Cliente paga => CEF gera arquivo de retorno => Envia pra Embratel.

 

Agora a minha aplicação vai la no Servidor da Embratel pegar o arquivo de retorno (txt).

 

Porem terá que ser via FTP. Com usuário e senha.

 

Como fazer um script ASP pra ir lá e copiar o arquivo de texto via FTP ?

 

Valeu.

[xanburzum 169]

existem um componente que é free para usar FTP ou componentes pagos, olha este exemplo

[dataset 0]

xanburzum...

 

Fiz vários testes usando esse código, mas ta gerando um erro e não sei como resolver. Acredito que ele funciona rodando sobre o Windows XP. Não sei se estou certo sobre isso.

 

Mas sobre o erro, ocorre o seguinte:

 

É criado um obejto do tipo FileSystemObject:

Set oFileSys = Server.CreateObject("Scripting.FileSystemObject")

 

Após ele cria uma variável contendo o seguinte:

strTempFile = "C:\" & oFileSys.GetTempName( )

ATé aqui tudo bem.

 

O problema acontece nessa linha:

Set oFile = oFileSys.OpenTextFile (strTempFile, 1, False, 0)

 

Eu parei o código antes dessa linha e fui no C: pra ver se o arquivo criado tava la... mas não tava. Como ele nao acha, então estora o erro nessa linha.

 

Será que tem uma maneira de contornar esse problema ?

 

O que eu preciso é conectar no FTP da Embratel e traferir um arquivo pro servidor onde está hospedado meu sistema.

 

Ambos os FTP contem usuário e senha. Eu tenho todos os dados. Endereço, usuário, senha, pasta e etc...

 

Só nnão estou conseguindo fazer a copia dos arquivos entre servidores.

 

Pesquisei na WEB e não achei nada... tem vários compontentes mas todos pagos. Além do mais, não poderei registrar um componente no servidor onde hospedo.

 

Se puder me ajudar... ficarei grato.

[xanburzum 169]

ele gera algum numero de erro

[dataset 0]

Então.... eu comentei a linha:

On Error Resume Next

 

Mandei rodar, como te falei e deu a mensagem de erro:

 

Microsoft VBScript runtime error '800a0035' 

File not found 

/paratodos/includes/ftp.asp, line 56 

 

Exatamente na linha:

Set oFile = oFileSys.OpenTextFile (strTempFile, 1, False, 0)

 

Na variável strTempFile contem o seguinte: C:\rad3DB25.tmp (Lembrando que a cada vez que rodo o programa o nome muda... é como se fosse um randômico.

Daí quando ele tenta abrir (OpenTextFile) o arquivo C:\rad3DB25.tmp e não encontra... entao gera erro que te falei.

 

Estranho ne... agora não sei o porque disso.

 

Sou meio leigo nesse esquema de criar aquivo e abrir... mas estive analisando o código, e não entendi o porque de criar um arquivo temporário.

 

E agora... o que fazer ? Minhas tentativas estão zerando... valeu.

[xanburzum 169]

o caminho do arquivo esta correto ?

[dataset 0]

Então...

 

Troquei o caminho de C:

 

Agora deu certo... valeu pela dica.

 

Me diga... esse codigo serve pra enviar um arquivo via FTP. Tem algum código que eu possa copiar do FTP pra máquina local ? Eu preciso fazer o inverso, em vez de enviar.. copiar.

 

Ou quem sabe traferir um arquivo de um servidor FTP para outro.

 

Pode me dar uma ajuda ?

[xanburzum 169]

eu postei um exemplo assim, nop lab. de scrip, da uma procurada

mas existem componentes pagos que tambem faz isso

[dataset 0]

xanburzum...

 

Procurei no Banco de Scripts e achei somente o seu código para envio de arquivos. Não encontrei um que fizesse o down do arquivo que ta no FTP para outra máquina. Nem tão pouco alguma matéria sobre esse assunto para estudo.

 

Você poderia me passar o link de onde ta o código ?

 

Não poderei usar um componente pago. Pois não posso registrar componente nesse servidor onde hospedo.

 

Valeu... fico aguardando qualquer dica pra em ajudar.

 

Abs.

[xanburzum 169]

me manda um email que te envio

xanburzum@terra.com.br

[dataset 0]

xanburzum....

 

Te madei um email. Fico no aguardo desse milagre rsrs

 

Valeu.

rhael77@gmail.com

[dataset 0]

xanburzum ...

 

você achou código pra trabalhar com FTP ? Estou na espectativa pra dar continuidade.

 

OBS:

Eu mandei pra Caixa Econômica Federal os boletos impressos pra validarem. Se tudo funcionar, eu mando o código pra geração de Boletos pra Caixa Economica Federal em PDF funcionando e testada por eles.

 

Valeu.