[a.ahmed]

PHP كود :

Dim h As String = New Net.WebClient().DownloadString("http://saaid.net/gesah/410.htm")
Dim s As String = System.Text.RegularExpressions.Regex.Match(h, "(<table width=""98%"" border=""0"" cellspacing=""0"" cellpadding=""7"">).+?(</table>)", System.Text.RegularExpressions.RegexOptions.Singleline).Value
Me.WebBrowser1.DocumentText = s