تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
استخراج رقم من صفحة
#1
مرحبا

انا لدي مشروع لمعرفة عدد تحميلات ملف على مركز تحميل


استخدمت كود استخراج td من html ونجح

ولاكن يستخرج بيانات ليس لها داعي وتشوه منضر  التكست بوك


مثال على ذالك



المطلوب استخراجه Downloaded: 36 times

والمشكلة ان جميع الكلمات في الصوره تبدا ب وسم td وتنتهي ب <td/>

يعني عند استخراج td الفلتره تستخرج التاريخ وكل شي وهاذي مشكلة

فهل الحل نعمل فلتره للبيانات بعد استخراجها ام كيف الطريقة لستخراج فقط هذة الكلمة Downloaded: 36 times

هاذا كود html في الصفحة 
كود :
         <tr>
           <td><b>Downloaded:</b></td>
           <td>
             36 times</td>
         </tr>
         <tr>
الرد
تم الشكر بواسطة:
#2
مرحبا
تفضل اخي 
كود :
Dim iddownload As String = ""
   Sub main()
       Using req As New HttpRequest
           With req
               .UserAgent = Http.ChromeUserAgent
               .Cookies = New CookieDictionary
               .AddParam("op", "download1")
               .AddParam("method_free", "Free Download")
               .AddParam("id", iddownload)
               Dim res As String = .Post(TextBox1.Text).ToString
               Dim downloaded As String = Regex.Match(res, "              (.*?)<\/td>").Groups(1).Value
               'Label2.Text = "Downloaded :-  " + downloaded
           End With
       End Using
   End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim add = TextBox1.Text + "Trakktour"
       iddownload = Regex.Match(add, "net\/(.*?)Trakktour").Groups(1).Value
       main()
   End Sub
الرد
تم الشكر بواسطة: dasktop , elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخراج نص من webbrowser ووضعه بrichtextbox Basil Abdallah 7 417 13-11-20, 08:57 PM
آخر رد: Basil Abdallah
  البحث عن نص معين داخل صفحة ويب وعرضة Basil Abdallah 1 210 26-10-20, 11:11 AM
آخر رد: اليوم السابع
  [VB.NET] اخذ قيمة الProgressBar من صفحة ويب aldery 1 106 25-10-20, 07:44 PM
آخر رد: bidaya
  كود استخراج رقم الهارديسك للكومبيومتر عمور2016 2 157 25-09-20, 07:36 PM
آخر رد: عمور2016
  مشكلة بعد استخراج مشروع رسالة خطء chankar 14 676 24-09-20, 03:26 AM
آخر رد: chankar
Exclamation [VB.NET] مشكلة بعد استخراج مشروع إدارة المكتبة abarrak 0 216 20-09-20, 11:43 AM
آخر رد: abarrak
  طريقة استخراج كمية الاصناف المتألق9 4 554 17-08-20, 07:14 PM
آخر رد: المتألق9
  [سؤال] اخفاء عنصر من صفحة العمل دون حذفه عبد الهادي بهاب 2 340 14-08-20, 06:58 PM
آخر رد: عبد الهادي بهاب
  إضافة بيانات جدول ثالث أثناء طباعة صفحة التقرير عبد العزيز البسكري 2 550 08-07-20, 03:24 PM
آخر رد: عبد العزيز البسكري
  اريد عمل ريستارت للراوتر بالفيجوال لتغير اي بي الراوتر وفتح صفحة نت بعد الريستارت ahmedhhh2 0 312 03-06-20, 11:20 AM
آخر رد: ahmedhhh2

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم