Dim ftpupdate As String
ftpupdate = ""
Try
Dim ftprequest As System.Net.FtpWebRequest = System.Net.FtpWebRequest.Create(New Uri(ftppath & ftpdirectory))
Dim ftpresponse As System.Net.FtpWebResponse
With ftprequest
.UseBinary = True
.KeepAlive = False
‘ .Credentials = New System.Net.NetworkCredential("", "")
.Method = System.Net.WebRequestMethods.Ftp.ListDirectory
ftpresponse = .GetResponse
Dim ftpinfo As New System.IO.StreamReader(ftpresponse.GetResponseStream)
ftpupdate = ftpinfo.ReadToEnd.ToString
End With
ftprequest = Nothing
ftpresponse.Close()
ftpresponse = Nothing
Catch ex As Exception
End Try
在家里自己建的FTP上可以，在单位 ftpupdate 是空的。求大神解答