[dubai.eig]

السلام عليكم ورحمة الله

اريد اقراء ملف نصي من موقعي 

txt file 


الملف في اربع سطور

وفي القراءه يكونون كلهم في سطر واحد 

   

جربت هذا الكود

كود :

       Dim Lines() As String
       Dim stringSeparators() As String = {vbCrLf}
       Dim Source As String
       Dim wc As New WebClient

       Source = wc.DownloadString("http://www.test.net/test.txt")
       Lines = Source.Split(stringSeparators, StringSplitOptions.None)
       For Each s As String In Lines
           ListBox1.Items.Add(s)
       Next

وجربت هذا

كود :

       Dim address As String = "http://www.test.net/test.txt"
       Dim client As WebClient = New WebClient()
       Dim reader As StreamReader = New StreamReader(client.OpenRead(address))
       TextBox1.Text = reader.ReadToEnd

حاولت ان اجعله يقراء سطر سطر نفس الي في الملف بس ما ضبط 

بارك الله فيكم وشكرا على المساعدة