منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم ورحمة الله وبركاته 


جرب التالي 

جرب التالي 

(07-03-17, 12:56 AM)sendbad100 كتب : [ -> ]جرب التالي 

PHP كود :

Private Sub Command1_Click()

Set iDoc = WebBrowser1.Document
For Each element In iDoc.getElementsByTagName("td")
  If element.className = "2" Then Set li = ListView3.ListItems.Add(, , element.innerText)
 If element.className = "1" Then li.SubItems(1) = element.innerText

Next
End Sub

Private Sub Form_Load()
WebBrowser1.Navigate "http://onlyformessage.000webhostapp.com/2.htm"
End Sub 


ظهور خطأ li.SubItems(1) = element.innerText

برجاء تصحيح الخطأ بالكود

اخي الكريم

لم اعرف ما المشكلة

ضع المثال

وربك يسهل

(07-03-17, 02:18 PM)sendbad100 كتب : [ -> ]اخي الكريم  

لم اعرف ما المشكلة

ضع المثال

وربك يسهل

تم ارفاق المثال في الاعلى

السلام عليكم

المرفق في المشاركة الاولى مجرد ملف تكست يحتوي على الكود فقط وليس مثال جرب بنفسك تحميله

السلام عليكم


تفضل

(07-03-17, 05:58 PM)sendbad100 كتب : [ -> ]السلام عليكم


تفضل

لقد بذلت جهد تشكر عليه ولكن قمت بعكس  اسماء ال column headrs ال (1) لازم يكون password والثاني username 
كالتالي تماما