(01-07-19, 02:45 AM)dasktop كتب : اخي سعود كيف نجلب الجداول من هاذا الموقع https://up.top4top.net/downloadf-1276p4m8t1-rar.html
جدول عدد التحميلات
عن طريق web browser
بدون استخدام HtmlAgilityPack.dll
PHP كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'https://up.top4top.net/downloadf-7498pxcv1-rar.html
Button1.Enabled = False
Dim html As String = ""
Using wc As New WebClient
html = wc.DownloadString(TextBox1.Text)
Dim str As String = "<td class=""tddata"">([0-9]{1,})</td>"
Dim reg As New Regex(str)
Dim mc As MatchCollection = reg.Matches(html)
For Each h As Match In mc
If h.Success Then
TextBox2.Text = h.Groups(1).Value
Exit For
Exit Sub
End If
Next
End Using
Button1.Enabled = True
End Sub
المثال مرفق
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
