[dubai.eig]

(19-06-18, 09:47 PM)حريف برمجة كتب :

(19-06-18, 09:23 PM)dubai.eig كتب :

(19-06-18, 05:47 PM)elgokr كتب :

تفضل اخى dubai.eig

طريق بطريقة بسيطة

كود :

Dim lines() As String = IO.File.ReadAllLines("D:\file.txt")
       For ii As Integer = 0 To lines.Length - 1
           TextBox1.Text += lines(ii) & IIf(ii < lines.Length - 1, vbCrLf, "")
       Next

تحياتى لك

وتمنياتى لك التوفيق

تسلم استاذي الكريم

المشكله ان الملف في موقعي وليس في الجهاز

ضع الرابط بدال موقع الملف "D:\file.txt"

نعم اخي جربت

طلع معاي

إقتباس : 'URI formats are not supported.'

كود :

       Dim lines() As String = IO.File.ReadAllLines("http://www.test.net/test.txt")
       For ii As Integer = 0 To Lines.Length - 1
           TextBox1.Text += Lines(ii) & IIf(ii < Lines.Length - 1, vbCrLf, "")
       Next