Transferência Ftp

[Jefferson Saavedra 0]

Olá pessoal gostaria de saber como transferir um arquivo via ftp usando o objeto inet do vb6

 

fiz o seguinte comando mas não sei se estah certo(na verdade não tah pois naum funfa rsrs)

 

Private Sub Command1_Click()
    With CommonDialog1
      .Filter = "Todos os Arquivos|*.*"
      .FilterIndex = 1
      .ShowOpen
      If Len(.FileName) <> 0 Then Text1.Text = .FileName
   End With
End Sub

Private Sub Command2_Click()
    Dim ArqOrigem As String
    Dim ArqDestino As String
        ArqOrigem = Text1.Text
        ArqDestino = "/public_html/teste/testando.txt"
        Inet1.Execute , "PUT" & ArqOrigem & " " & ArqDestino
End Sub

Private Sub Form_Load()
   Inet1.URL = "ftp://www.meusite.com.br"
   Inet1.Password = "123456"
   Inet1.UserName = "meusite"
   'Text1.Text = Inet1.OpenURL
End Sub

Obrigado pela ajuda de todos.

[Claudio Neto 3]

Nunca utilizei esse componente, mas achei algumas coisas na net que podem te ajudar:

 

http://www.macoratti.net/vb_webbd.htm

http://www.garybeene.com/vb/tut-inet.htm

http://www.bufaloinfo.com.br/Artigos/artigo0610.asp