UPLOAD PARA FTP

FERNANDOGO 14/10/2011 16:28:50
#386715
Boa Tarde a Todos
eu estou tentando fazer que minha aplicação faça upload de um aquivo de bakup
este codigo esta funcionando, o problema e que eu preciso informar 2 textbox dentro da linha

inet1.Execute , [Ô]PUT P:\Backup20111024.bak 2011.BAK[Ô]

exemplo: inet1.execute, [Ô]put[Ô] txtarquivo.text caminhoftp.text

Mas nao estou conseguindo
alguem poderia me ajudar?
esse e o codigo completo para envio do arquivo

Citação:


inet1.AccessType = icUseDefault
inet1.URL = [Ô]ftp://192.168.1.61[Ô]
inet1.userName = [Ô]xxxxx[Ô]
inet1.password = [Ô]xxxxx[Ô]

inet1.RequestTimeout = 40
inet1.Execute , [Ô]PUT P:\Backup20111024.bak 2011.BAK[Ô]
If inet1.ResponseCode = 0 Then
Form1.Caption = [Ô]Conectado e Enviando[Ô]
Do While inet1.StillExecuting
DoEvents

Loop
inet1.Execute , [Ô]close[Ô]

Form1.Caption = [Ô]Upload Concluido Com Sucesso![Ô]
End If
End Sub

LUIZCOMINO 14/10/2011 16:41:08
#386716
amigo ficaria assim


inet1.execute, [Ô]put[Ô] & txtarquivo.text

faltou o &
LUIZCOMINO 14/10/2011 16:43:09
#386717
faltou eu colocar um espaço no [Ô]put[Ô] fica assim:

inet1.execute, [Ô]put [Ô] & txtarquivo.text

FERNANDOGO 14/10/2011 17:09:30
#386719
eu testei aqui mas nao deu certo
coloquei da seguinte maneira
inet1.Execute , [Ô]PUT [Ô] & txtnomearq.Text & txtcaminhoftp.Text
mas sem sucesso
ele retorna [Ô]Upload Concluido Com Sucesso![Ô]
mas nao acontece nada no FTP
LUIZCOMINO 14/10/2011 17:15:08
#386722
faltou você colocar mais um espaço aqui :
inet1.Execute , [Ô]PUT [Ô] & txtnomearq.Text & [Ô] [Ô] & txtcaminhoftp.Text
Tópico encerrado , respostas não são mais permitidas
Voltar