PDA

View Full Version : دانلود پوشه با محتویاتش از روی هاست



Samsam2010
چهارشنبه 09 شهریور 1390, 00:50 صبح
با سلام

دوستان من میخوام یک فولدر رو با تمام محتویاتش از روی هاستم دانلود کنم
لطفا راهشو بهم بگید
جستجو کردم این کد رو پیدا کردم اما این کد فقط اسامی رو بصورت استرینگ میاره چطوری میتونم دونه دونه اسم فایل ها رو بدست بیارم و دانلودشون کنم

Imports System.IO
Imports System.Net
Imports System.Text

Namespace Examples.System.Net
Public Class WebRequestGetExample
Public Shared Sub Main()
' Get the object used to communicate with the server.
Dim request As FtpWebRequest = DirectCast(WebRequest.Create("ftp://www.contoso.com/"), FtpWebRequest)
request.Method = WebRequestMethods.Ftp.ListDirectoryDetails

' This example assumes the FTP site uses anonymous logon.
request.Credentials = New NetworkCredential("anonymous", "janeDoe@contoso.com")

Dim response As FtpWebResponse = DirectCast(request.GetResponse(), FtpWebResponse)

Dim responseStream As Stream = response.GetResponseStream()
Dim reader As New StreamReader(responseStream)
Console.WriteLine(reader.ReadToEnd())

Console.WriteLine("Directory List Complete, status {0}", response.StatusDescription)

reader.Close()
response.Close()
End Sub
End Class
End Namespace