怎么用Inet控件的FTP功能下传文件?谢谢!!!!

Question

怎么用Inet控件的FTP功能上传和下传文件???
有没有相应的学习代码下载???

Answer 1

Private Sub DownFile(SourceFile As String, DestinatonFile As String)
   ' OperationStyle = 7
    Inet1.Execute , "GET " & Trim(SourceFile) & " " & Trim(DestinatonFile)
End Sub
Private Sub UpFile(SourceFile As String, DestinatonFile As String)
   ' OperationStyle = 8
    Inet1.Execute , "SEND " & Trim(SourceFile) & " " & Trim(DestinatonFile)
End Sub

Answer 2

昨天回答的：
http://expert.csdn.net/Expert/topic/2011/2011634.xml?temp=.5824854