تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف نقرا هذا الجزء من الصفحة
#1
اخواني الكرام
امتدادا للسؤال السابق
[سؤال] احتاج مساعدة في نسخ مواضيع المنتدى (الصفحات : 1 2 )


كنت واجهت عدة مشاكل منها:
1- صلاحية تحميل المرفق
2- نوع امتداد الملف لكن لفت انتباهي انه مكتوب


فكيف نعرف او نقرا هذا الامتداد
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته


عملت لك طريقة إن شاء الله تفي بالغرض، طبعاً هناك طرق أفضل ومنها استخدام Regex ولكني لا أتقنها.
قام أخي عبوووودي بإضافة موضوع (شرح التعابير القياسية Regex) إن شاء الله راح استفيد منه إن تحسنت ظروفي.
كود :
Dim htmlString = TextBox1.Text
Dim i1 As Integer = htmlString.IndexOf("attachment.php?aid=")
Dim attachmentURL As String = "http://vb4arb.com/vb/" & htmlString.Substring(i1, htmlString.IndexOf("""", i1) - i1)
i1 = htmlString.IndexOf(">", i1) + 1
Dim i2 As Integer = htmlString.IndexOf("<", i1)
Dim attachmentFilename As String = htmlString.Substring(i1, i2 - i1)

MsgBox(attachmentURL)
MsgBox(attachmentFilename)

السلام عليكم ورحمة الله وبركاته
الرد }}}
تم الشكر بواسطة: سعود , sooriaty03
#3
احسها معقدة وغامضة يمكن مع الوقت تنحل العقد و تتضح المعالم.
بصراحة الان تعب مخي.

بصراحة الكود رائع ومذهل
اتمنى اقدر افهمه واكتبه بعد الفهم لان الان مضطر استخدمه بدون فهمSmile
الرد }}}
تم الشكر بواسطة: @@أبورائد@@
#4
السلام عليكم ورحمة الله وبركاته

انظر الرابط
الرد }}}
تم الشكر بواسطة: @@أبورائد@@


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  العبارات الموجودة في الصفحة غير موجودة في سوسرس الصفحة ؟؟ سامي محمد 7 1,704 20-03-21, 10:07 PM
آخر رد: سامي محمد
  [مشروع] موضوع اليوم الصفحة هد لزم تكون بدي لمفهوم Regular Expression Ali 2020 0 1,145 03-10-20, 09:16 PM
آخر رد: Ali 2020
  أريد كود عند اكتمال تحميل الصفحة في Chorme Driver selenium developermedo111 1 1,218 27-04-20, 05:42 AM
آخر رد: mohamedahmed1
  طلب كود لحذف الجزء المظلل عليه من النص في التيكست بوكس waelalmsry75 3 1,707 22-02-20, 12:37 PM
آخر رد: alsalamoni
  عرض جزء محدد من الصفحة داخل اداة ويب براوزر ابو روضة 8 2,858 29-12-19, 10:26 PM
آخر رد: ابو روضة
Exclamation [VB.NET] كود عندما يتم تحميل الصفحة كاملة في WebBrowser يكمل تنفيذ الكود SnTnt 4 2,059 16-09-19, 01:25 AM
آخر رد: SnTnt
  مشكلة فى جلب كامل الصفحة ابو روضة 11 3,793 07-06-19, 03:51 AM
آخر رد: ابو روضة
Rainbow [VB.NET] [تم الحل] عدم تنفيذ امر الا عند تحميل الصفحة DK-x 4 1,554 11-04-19, 11:23 PM
آخر رد: elgokr
  جلب هذا الجزء من هذا العنوان ابو روضة 12 3,820 19-02-19, 01:07 AM
آخر رد: ابو روضة
Bug [VB.NET] نزول الى اسفل الصفحة WebBrowser mervandzz 1 1,551 17-11-18, 03:30 AM
آخر رد: elgokr

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


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