Dobrý den, momentálně používám na výpis obsahu ftp serveru tento kód:
Dim strList As New List(Of String)
Dim request As FtpWebRequest = Nothing
Dim sr As StreamReader = Nothing
Dim response As FtpWebResponse = Nothing
request = CType(WebRequest.Create(txtUrl.Text), FtpWebRequest)
request.Credentials = New NetworkCredential(txtUserName.Text, txtPassword.Text)
request.Method = WebRequestMethods.Ftp.ListDirectory
response = CType(request.GetResponse(), FtpWebResponse)
sr = New IO.StreamReader(response.GetResponseStream())
Dim str As String = sr.ReadLine
While (str <> Nothing)
strList.Add(str) 'tohle si potom nechám vypsat
str = sr.ReadLine
End While
sr.Close()
Problém je, že z tohoto výpis nezjistím, která položka je soubor a která složka.
Zkoušel jsem i
request.Method = WebRequestMethods.Ftp.ListDirectoryDetails
místo
request.Method = WebRequestMethods.Ftp.ListDirectory
, ale nechtějí se mi rozsekávat řetěžce typu:
drwxr--r-- 1 user group 0 Mar 19. 19.09 slozka
Nejde to vyřešit nějak elegantněji. Nejlepší by bylo, kdyby šly složky napasovat do komponenty treeview a soubory do listview jako například v průzkumníku.
Má s tímto problémem někdo zkušenost, děkuji za odpověď.