[sharo.azad]

سلام عليكم   

اريد استخراج  كلمة   من   سورس كود  موقع  

عندي  هي  كود 

كود :

Imports System.Text.RegularExpressions

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

كود :

       Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://example.com")

كود :

       Dim response As System.Net.HttpWebResponse = request.GetResponse

       Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())

       Dim rssourcecode As String = sr.ReadToEnd

       Dim r As New System.Text.RegularExpressions.Regex("")
       Dim matches As MatchCollection = r.Matches(rssourcecode)

       For Each itemcode As Match In matches

           ListBox1.Items.Add(itemcode.Value.Split("""").GetValue(5))

       Next

   End Sub

End Class

اريد  استخرج   <title dir="ltr">[A-Z]</title>  من سورس كود