FTP的上传问题(急)

Question

通过程序上传文件到FTP服务器,有些用户能上传,而有些用户不能上传,请问
这是为什么有的能上传成功,而有的不能?
我的设置是
服务器=
用户名=
密码=
端口号=21
请问问题是不是出在"端口号=21"?

Answer 1

With EsFtp
         .RemoteHost = "211.137.102.4"
         .UserName = "smsftpfile"
         .Password = "smsftp#2005#02#23"
         .Port = 21
         .TimeOut = 60000
         While Not .Connect
               DoEvents
         Wend         
         While Not Rec.EOF
               If SysFileobj.FileExists(App.Path & "\data\" & Rec!filename & ".xml") Then
                  mFileName = Rec!filename
                  
                  If .SendLocalFile(App.Path & "\data\" & Rec!filename & ".xml", "xmlfile/" & Rec!filename & ".xml", "A") Then
                                           
                     If .SendLocalFile(App.Path & "\data\" & Rec!filename & ".TEMP", Rec!filename & ".xml", "A") = True Then
                       
                         SysFileobj.DeleteFile App.Path & "\data\" & Rec!filename & ".xml", True
    
                         SysFileobj.DeleteFile App.Path & "\data\" & Rec!filename & ".TEMP", True
    
                         Cnn.Execute "Delete From FileTable where id=" & Rec!id
                         
                     End If
                   
                  End If
               Else
                  Cnn.Execute "Delete From FileTable where id=" & Rec!id
               End If              
              Rec.MoveNext
        Wend
        .Disconnect
        
    End With这是上传Ftp的原代码

Answer 2

http://blog.csdn.net/liuxiaoyi666我写过一个ftp实现的上传下载