用去群辉架设了一个内部的FTP,直接用以下的代码是可以链接的,
Network.DownloadFile("ftp://nassys:1QAZ2WSX3edc@192.168.1.97/BINFTP/TEST.txt","D:\TEST.txt","" ,"" ,False, 100000, True)
但若用以下的代码却发现不行
Dim ftp1 As New FtpClient
Dim fls As List(of String)
ftp1.Host="192.168.1.97"
ftp1.Account = "nassys"
ftp1.Password = "1QAZ2WSX3edc"
If ftp1.Connected = False '如果FTP没有连接
If ftp1.Connect Then '连接FTP
fls = ftp1.GetFileList("\BINFTP")
For Each fl As String In fls
Output.Show(fl)
Next
Else
Messagebox.show("连接FTP失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
End If
请问这个是什么问题会造成这样的情况;