+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : جلب سطر من صفحة انترنت (/showthread.php?tid=21657)
جلب سطر من صفحة انترنت - bidaya - 11-09-17
السلام عليكم ورحمة اللع تعالى وبركاته
اريد جلب سطر من صفحة نت الى التكست بوكس
السطر الي بالصورة
هذا هو رابط الصفحة
RE: جلب سطر من صفحة انترنت - أبو نوره - 11-09-17
مرحبا اخى
PHP كود :
Dim wc As New Net.WebClient
Dim html As String = wc.DownloadString("http://bhfutur.usite.pro/benhh.html")
Dim source As String = System.Text.RegularExpressions.Regex.Match(html, "(?<=source: ').+?(?=')").Value
MsgBox( source )
RE: جلب سطر من صفحة انترنت - bidaya - 12-09-17
(11-09-17, 09:17 PM)أبو نوره كتب : مرحبا اخى
PHP كود :
Dim wc As New Net.WebClient
Dim html As String = wc.DownloadString("http://bhfutur.usite.pro/benhh.html")
Dim source As String = System.Text.RegularExpressions.Regex.Match(html, "(?<=source: ').+?(?=')").Value
MsgBox( source )
الله يرضى عليك يا ابو نورة
الله يجعل لك من امامك نور ومن خلفك نور ومن شمالك ويمينك نور على نور
الف شكر اخي
