تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ممكن اعرف اين الخطاء بالكود
#1
اولا احب اشكر الاخ ابو روضه اللي كل مره يعلمني الكثير والكثير 
ثانيا 

اضع هذا الكود في بوتن وعند الضغط عليه التكست بوكس يظهر فارغا حين اذا عرضت الراجع من المتغير aa مباشره في تكست بوكس يظهر رقم واحد فقط 
هذا جزاء من الذي استخرج منه 
<b>317748326</b></div><div>Username: <b>kareemabduljabbar_33</b></div><div>Full Name: <a href='https://instagram.com/kareemabduljabbar_33' target='_blank'><b>Kareem Abdul-Jabbar</b></a></div></div></div><hr /><div class='overflow-hidden' style=''><div class='overflow-hidden' style='float:left; width:30%; margin:0 .5em 0 0;'><img src='https://scontent-lax3-2.cdninstagram.com/v/t51.2885-19/s150x150/79901731_733053907218481_1761297540411555840_n.jpg?_nc_ht=scontent-lax3-2.cdninstagram.com&_nc_ohc=JjbyJWkyaX8AX8lHVU8&oh=2d10af707716fde5a057990ffcd6b78b&oe=5EDA1759' style='width:100%;' /></div><div class='overflow-hidden' style='float:left; width:65%;'><div>User ID: <b>284128665</b></div><div>Username: <b>kareemdeeb</b></div><div>Full Name: <a href='https://instagram.com/kareemdeeb' target='_blank'><b>الــذِيــبْ ?? | Kareem Deeb</b></a></div></div></div><hr /><div class='overflow-hidden' style=''><div class='overflow-hidden' style='float:left; width:30%; margin:0 .5em 0 0;'><img src='https://scontent-lax3-
كود :
Dim webClient As New System.Net.WebClient

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim aa As String = webClient.DownloadString("https://codeofaninja.com/tools/find-instagram-id-answer.php?instagram_username=" + TextBox2.Text + "")
       Dim json As String = aa
       Dim Name = From t As String In json Select _
                System.Text.RegularExpressions.Regex.Match(t, "<div>User ID: <b>(.+?)</b>").Groups(1).Value
       For i As Integer = 0 To Name.Count - 1
           TextBox1.Text = (Name(i))
       Next
   End Sub

(17-01-20, 06:26 PM)اليوم السابع كتب : اولا احب اشكر الاخ ابو روضه اللي كل مره يعلمني الكثير والكثير 
ثانيا 

اضع هذا الكود في بوتن وعند الضغط عليه التكست بوكس يظهر فارغا حين اذا عرضت الراجع من المتغير aa مباشره في تكست بوكس يظهر رقم واحد فقط 
هذا جزاء من الذي استخرج منه 
<b>317748326</b></div><div>Username: <b>kareemabduljabbar_33</b></div><div>Full Name: <a href='https://instagram.com/kareemabduljabbar_33' target='_blank'><b>Kareem Abdul-Jabbar</b></a></div></div></div><hr /><div class='overflow-hidden' style=''><div class='overflow-hidden' style='float:left; width:30%; margin:0 .5em 0 0;'><img src='https://scontent-lax3-2.cdninstagram.com/v/t51.2885-19/s150x150/79901731_733053907218481_1761297540411555840_n.jpg?_nc_ht=scontent-lax3-2.cdninstagram.com&_nc_ohc=JjbyJWkyaX8AX8lHVU8&oh=2d10af707716fde5a057990ffcd6b78b&oe=5EDA1759' style='width:100%;' /></div><div class='overflow-hidden' style='float:left; width:65%;'><div>User ID: <b>284128665</b></div><div>Username: <b>kareemdeeb</b></div><div>Full Name: <a href='https://instagram.com/kareemdeeb' target='_blank'><b>الــذِيــبْ ?? | Kareem Deeb</b></a></div></div></div><hr /><div class='overflow-hidden' style=''><div class='overflow-hidden' style='float:left; width:30%; margin:0 .5em 0 0;'><img src='https://scontent-lax3-
كود :
Dim webClient As New System.Net.WebClient

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim aa As String = webClient.DownloadString("https://codeofaninja.com/tools/find-instagram-id-answer.php?instagram_username=" + TextBox2.Text + "")
       Dim json As String = aa
       Dim Name = From t As String In json Select _
                System.Text.RegularExpressions.Regex.Match(t, "<div>User ID: <b>(.+?)</b>").Groups(1).Value
       For i As Integer = 0 To Name.Count - 1
           TextBox1.Text = (Name(i))
       Next
   End Sub
انا اريد ان اجلب كل شيئ امام كلمه <div>User ID: <b>
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن كود فلترة الصنف بواسطة الكمبوبوكس sofiane-phy 2 129 18-11-20, 04:01 PM
آخر رد: INFLaaTy.cR
  ممكن تعديل علي الكود ليكون بشكل صحيح modywassem520 6 217 06-11-20, 11:16 PM
آخر رد: سعود
  ممكن كود مجموع ضرب عمودين (هناك صورة مرفقة) sofiane-phy 2 192 29-10-20, 10:31 AM
آخر رد: sofiane-phy
  ممكن حل للمشكلة بخصوص Crystal Report Alanwalker 3 243 27-10-20, 06:27 PM
آخر رد: ZaerAllail
  ممكن توضيح نوع الخطأ sofiane-phy 2 165 25-10-20, 05:18 PM
آخر رد: sofiane-phy
  ممكن مساعدة بخصوص تحزيم المشروع Alanwalker 3 243 25-10-20, 03:57 AM
آخر رد: ٍOfelas
  [سؤال] ممكن كود فيجوال بيسك عند تشغيل ملف دفعي bat عند انتهاء من الامر jam3h 0 174 17-10-20, 04:37 PM
آخر رد: jam3h
  [سؤال] ممكن كود فيجوال بيسك نقل ملف وحذف ملف واستبدال ملف والكتابه على ملف jam3h 1 239 14-10-20, 07:17 PM
آخر رد: abdou
  [سؤال] ممكن طريقة تشفير اداة لعدم سرقتها jam3h 3 304 14-10-20, 11:20 AM
آخر رد: jam3h
  ممكن المساعدة فى برنامج البصمة مرفق مثال new_programer 3 367 12-10-20, 12:53 AM
آخر رد: new_programer

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


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