(07-02-18, 12:08 AM)anes كتب :

(06-02-18, 11:10 PM)عبد العزيز البسكري كتب :

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

يمكنك أخي الكريم استخدام هذا الحدث بزر الأمر رقم 1 كمثال للضغط على زر الأمر رقم 2 و تنفيذ أوامره .. طبعا يمكنك تغيير الحدث حسب ما تحتاجه .. لعلّه يفيد و لو بالجزء اليسير إن شاء الله

تحياتي

كود :

   Private Sub Button1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles Button1.KeyPress
       If e.KeyChar = Chr(13) Then
           Button2_Click(Me, EventArgs.Empty)
       End If
   End Sub

الله يحفظك احي عبد العزيز
ولكن ليس هذا المطلوب

المطلوب لما اظغط على الزر مباشرتا الموجود في الويب براوزر يظغط على زر البرنامج او ينفذ كود موجود به
شكرا لك اخي الله يبارك فيك ويرحم والديك

(07-02-18, 12:49 AM)عبد العزيز البسكري كتب :

(07-02-18, 12:08 AM)anes كتب :

(06-02-18, 11:10 PM)عبد العزيز البسكري كتب :

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

يمكنك أخي الكريم استخدام هذا الحدث بزر الأمر رقم 1 كمثال للضغط على زر الأمر رقم 2 و تنفيذ أوامره .. طبعا يمكنك تغيير الحدث حسب ما تحتاجه .. لعلّه يفيد و لو بالجزء اليسير إن شاء الله

تحياتي

كود :

   Private Sub Button1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles Button1.KeyPress
       If e.KeyChar = Chr(13) Then
           Button2_Click(Me, EventArgs.Empty)
       End If
   End Sub

الله يحفظك احي عبد العزيز
ولكن ليس هذا المطلوب

المطلوب لما اظغط على الزر مباشرتا الموجود في الويب براوزر يظغط على زر البرنامج او ينفذ كود موجود به
شكرا لك اخي الله يبارك فيك ويرحم والديك

شكرا لك أخي الكريم .. لست أدري قد أكون ربما خارج مجال التغطية لما تفكر به ..

يمكن كتابة الكود الذي تريد تنفيذه بزر الأمر 2 مثلا .. و تغير إلى الحدث Click بزر الأمر 1

السؤال واضح يا اخواني
هو لما اظغط على الزر الموجود في صفحة html  يظغط تلقائيا على زر البرنامج

(07-02-18, 04:19 PM)طالب برمجة كتب :

PHP كود :

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
    For Each lnk As HtmlElement In WebBrowser1.Document.Links
        lnk.AttachEventHandler("onclick", AddressOf Link_Click)
    Next
End Sub
Private Sub Link_Click()
    If WebBrowser1.Document.ActiveElement.InnerText = "btn1" Then Button1.PerformClick()
    If WebBrowser1.Document.ActiveElement.InnerText = "btn2" Then Button2.PerformClick()
End Sub 


(07-02-18, 05:02 PM)طالب برمجة كتب : بدله بالتالي
System.Windows.Forms.HtmlElement

(07-02-18, 05:19 PM)طالب برمجة كتب : الرابط الموجود في المرفق الأول لا يعمل لأعرف ماهو كو الزر الذي استخدمته في الصفحة
http://btnmlive.somee.com/HtmlElement.html

(07-02-18, 05:59 PM)طالب برمجة كتب :

PHP كود :

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
    For Each div As Windows.Forms.HtmlElement In WebBrowser1.Document.Body.GetElementsByTagName("div")
        If div.InnerHtml = "btn1" Then div.AttachEventHandler("onclick", AddressOf Button1_Click)
        If div.InnerHtml = "btn2" Then div.AttachEventHandler("onclick", AddressOf Button2_Click)
    Next
End Sub