用代码测试,如果不行,试试把ftp电脑的防火墙关闭一下。
Dim ftp1 As New FtpClientftp1.Host="196.128.143.28"ftp1.Account = "foxuser"ftp1.Password = "138238110"ftp1.OpenManager()