[RESOLVED] Downloading with Internet Transfer Control!

[GlowingVB]

Hey guys...

I actually know how to upload a file to FTP server :

Private Sub CmdUpload_Click()
With Inet1
.URL = "ftp://ftp.Mysite.com"
.UserName = "My FTP account Username"
.Password = "My FTP account  Password"
.Execute , "PUT C:\Sample.txt/Sample.txt"
End With
End sub

How can i change the code to download instead of uploading ?!

What about this ?! is it correct :

Private Sub CmdDownload_Click()
With Inet1
.URL = "ftp://ftp.Mysite.com"
.UserName = "My FTP account Username"
.Password = "My FTP account  Password"
.Execute , "GET File-in-server.txt " & "  /" & "C:\1.txt"
End With
End sub

Thanks for further guidance!

[mickeykelley]

Review this thread and it gives you details and some options in case you run into problems.

http://www.vbforums.com/showthread.p...et-not-working

[jmsrickland]

   '
   '
 Dim LocalPath As String
 Dim RemotePath As String
 
 LocalPath = Chr(34) & "C:\testfolder\mytextfilename.txt" & Chr(34)
 RemotePath = Chr(34) & "/somewebsite/mytextfilename.txt" & Chr(34) 
 
 With MyForm.Inet1
   .AccessType = icDirect
   .Protocol = icFTP
   
   .UserName = "username"
   .Password = "password"
   .RemoteHost = "www.somewebsite.com"
     
   .Execute .URL, "GET " & RemotePath & " " & LocalPath
  
   While .StillExecuting
     DoEvents
   Wend
        
   .Execute , "CLOSE"
 End With
  '

[GlowingVB]

Thanks . The problem is solved!