Dim request As System.Net.FtpWebRequest = _
          System.Net.FtpWebRequest.Create("FTP://192.168.107.12/Upload/Test/")
        request.Method = System.Net.WebRequestMethods.Ftp.ListDirectoryDetails
        request.Credentials = New System.Net.NetworkCredential("Test", "Test")
 
        Dim response As System.Net.FtpWebResponse = request.GetResponse
        Dim responseStream As Stream = response.GetResponseStream()
        Dim reader As System.IO.StreamReader = New System.IO.StreamReader( _
          responseStream)
 
        Console.WriteLine(reader.ReadToEnd())
        Console.WriteLine("Directory List Complete, status {0}", _
          response.StatusDescription)
        reader.Close()
        response.Close()