26-07-16, 05:29 PM
(آخر تعديل لهذه المشاركة : 26-07-16, 05:50 PM {2} بواسطة عبدالرحمن المكاوي.)
(26-07-16, 12:39 PM)ramygamalvb كتب : اخى لو الموضوع خاص بحسابات bein sport او برامج الخاص بالتفعيل
فانتظر سوف اطرح موضوع خاص بهذا الشأن
متي اخي
(26-07-16, 01:19 PM)LoveVb كتب : تفضل لم استطع الرد امس
طريقة معرفة id العنصر على الصفحة
![]()
Listen عنصر
![]()
ضع هذه الكود عند بدء الفورم ضع هذا
GeckoWebBrowser1.Navigate("رابط الموقع")
وهذه ضعها في مكان عام ليس في اي حدث
Dim FirstTime As Boolean = True
Dim h As Gecko.GeckoHtmlElement
بالنسبة للاكواد الخاصة بموضوعك ستكون
إقتباس : Private Sub GeckoWebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As Gecko.Events.GeckoDocumentCompletedEventArgs) Handles GeckoWebBrowser1.DocumentCompletedسينفذ هذه الاكواد اول مره فقط
If FirstTime = True Then
Dim UserName As String = New Net.WebClient().DownloadString("رابط الخاص ب الايميل فقط")
Dim Password As Integer = CInt(New Net.WebClient().DownloadString("رابط الخاص ب الباسورد"))
h = GeckoWebBrowser1.Document.GetElementById("Id") ' عنصر ادخال الايميل
h.InnerHtml = UserName
h = GeckoWebBrowser1.Document.GetElementById("Id") 'عنصر ادخال الباسورد
h.InnerHtml = Password
h = GeckoWebBrowser1.Document.GetElementById("Id") ' عنصر زر تسجيل دخول
h.Click()
FirstTime = False
End If
End Sub
عند تسجيل الدخول للموقع وقام بحفظ الصفحة راح يحدث خطا لان العناصر ليست موجودة
واعتقد راح يحولك للصفحة الرئيسية
لذلك يجب ان تتاكد من الرابط اذا كان خاص بتسجيل الدخول
اي استفسار في الخدمة
يوجد مشكلة لكن قبل هذه المشكلة صفحة تسجيل الدخول لم تفتح
هل يمكن ان يكون المشكل من هنا

