دخول

**طالب برمجة** · 07-02-18, 06:14 PM

لا أعرف الأداة GeckoWebBrowser

**anes** · 07-02-18, 06:18 PM

(07-02-18, 06:14 PM)طالب برمجة كتب : لا أعرف الأداة GeckoWebBrowser

جزاك الله خيرا
شكرا لك

**طالب برمجة**

اللي مثقل الصفحة ال script الأول من كود الصفحة وتحديدا

PHP كود :

http://ff.kis.v2.scr.kaspersky-labs.com/B4552AF2-C4EB-AB42-ADAD-96490830D6AB/main.js 

**anes**

(07-02-18, 06:22 PM)طالب برمجة كتب : اللي مثقل الصفحة ال script الأول من كود الصفحة وتحديدا

PHP كود :

http://ff.kis.v2.scr.kaspersky-labs.com/B4552AF2-C4EB-AB42-ADAD-96490830D6AB/main.js

شكرا لك ايها الاستاذ الكريم
سانتظر يمكن احد الاخوة يمكن يساعدني في ادات GeckoWebBrowser
لان الشطر الاهم من الكود قد اتيت به انت
شكرا جزيلا

**anes** · 07-02-18, 11:11 PM

صلو على النبي

**HASAN6.0**

شكراً اخي على رسالتك ,
يمكنك التحكم بالبرنامج المكتوب بالـVB.Net عن طريق صفحة ويب يتم تحميلها داخل Gecko WebBrowser

في المشروع اضف ملف الى الـResources واجعل اسمه html وضع بداخله الكود التالي :

كود :

<!DOCTYPE html>

<html>

<head>

</head>

<body>

<h1>Welcome</h1>

<button onclick="ShowText()">Show Text</button>

<button onclick="End()">End</button>

<script type='text/javascript'>

    function ShowText(){

        var event = document.createEvent('MessageEvent');

        var origin = window.location.protocol + '//' + window.location.host;

        var event = new MessageEvent('ABC', { 'view': window, 'bubbles': false, 'cancelable': false, 'data': "This Text From HTML Page" });

        document.dispatchEvent (event);

    }

 function End(){

    var event = document.createEvent('MessageEvent');

        var origin = window.location.protocol + '//' + window.location.host;

        var event = new MessageEvent('ABC', { 'view': window, 'bubbles': false, 'cancelable': false, 'data': "End" });

        document.dispatchEvent (event);

 }

</script>

</body>

</html>

ثم في نافذه Form1 اضف اداة GeckoWebBrowser1 و TextBox1

وضع الكود التالي

PHP كود :

Public Class Form1
    Private Sub MyBase_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        GeckoWebBrowser1.LoadHtml(My.Resources.html)
    End Sub
    Private Sub x1(a As String)
        If a = "End" Then
            MsgBox("Now Will Exit App ;")
            End
        Else
            TextBox1.Text = a
        End If

    End Sub
    Private Sub GeckoWebBrowser1_DocumentCompleted(sender As Object, e As Gecko.Events.GeckoDocumentCompletedEventArgs) Handles GeckoWebBrowser1.DocumentCompleted
        GeckoWebBrowser1.AddMessageEventListener("ABC", AddressOf x1)
    End Sub
End Class 

تحياتي وتمنياتي لك بالتوفيق

**anes** · 08-02-18, 01:50 AM

(08-02-18, 12:58 AM)HASAN6.0 كتب : شكراً اخي على رسالتك ,
يمكنك التحكم بالبرنامج المكتوب بالـVB.Net عن طريق صفحة ويب يتم تحميلها داخل Gecko WebBrowser

في المشروع اضف ملف الى الـResources واجعل اسمه html وضع بداخله الكود التالي :

كود :

<!DOCTYPE html> <html> <head> </head> <body> <h1>Welcome</h1> <button onclick="ShowText()">Show Text</button> <button onclick="End()">End</button> <script type='text/javascript'> function ShowText(){ var event = document.createEvent('MessageEvent'); var origin = window.location.protocol + '//' + window.location.host; var event = new MessageEvent('ABC', { 'view': window, 'bubbles': false, 'cancelable': false, 'data': "This Text From HTML Page" }); document.dispatchEvent (event); } function End(){ var event = document.createEvent('MessageEvent'); var origin = window.location.protocol + '//' + window.location.host; var event = new MessageEvent('ABC', { 'view': window, 'bubbles': false, 'cancelable': false, 'data': "End" }); document.dispatchEvent (event); } </script> </body> </html>

ثم في نافذه Form1 اضف اداة GeckoWebBrowser1 و TextBox1

وضع الكود التالي

PHP كود :

Public Class Form1 Private Sub MyBase_Load(sender As Object, e As EventArgs) Handles MyBase.Load GeckoWebBrowser1.LoadHtml(My.Resources.html) End Sub Private Sub x1(a As String) If a = "End" Then MsgBox("Now Will Exit App ;") End Else TextBox1.Text = a End If End Sub Private Sub GeckoWebBrowser1_DocumentCompleted(sender As Object, e As Gecko.Events.GeckoDocumentCompletedEventArgs) Handles GeckoWebBrowser1.DocumentCompleted GeckoWebBrowser1.AddMessageEventListener("ABC", AddressOf x1) End Sub End Class

تحياتي وتمنياتي لك بالتوفيق

شكرا لك اخي على المثال الرائع
لكن اخي انا اريد نفس الصفحة التي ارفقتها ولا اريدها في الريسورس لغرض تحديثها لذا يجب ان تكون مرفوعة
الف تحية وتقدير لك استاذنا الكبير HASAN6.0

**HASAN6.0** · 08-02-18, 02:09 AM

ضع الكود التالي

PHP كود :

GeckoWebBrowser1.Navigate("http://sbetan.com/bb.html") 

بدلاً من

PHP كود :

GeckoWebBrowser1.LoadHtml(My.Resources.html) 

قم بتبديل الرابط الى رابط صفحتك . علماً بأنني قمت برفع الصفحة للتجربة

**anes** · 08-02-18, 02:16 AM

(08-02-18, 02:09 AM)HASAN6.0 كتب : ضع الكود التالي

PHP كود :

GeckoWebBrowser1.Navigate("http://sbetan.com/bb.html")

بدلاً من

PHP كود :

GeckoWebBrowser1.LoadHtml(My.Resources.html)

قم بتبديل الرابط الى رابط صفحتك . علماً بأنني قمت برفع الصفحة للتجربة

لا اخي انا اقصد نفس الصفحة اي هاذه التي ارفقتهل
http://btnmlive.somee.com/HtmlEle.html

**HASAN6.0** · 08-02-18, 10:24 AM

ما المطلوب ؟؟؟؟؟؟

دخول
إسم المستخدم
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة

المواضيع المحتمل أن تكون متشابهة .
الموضوع :		الكاتب	الردود :	المشاهدات :	آخر رد
	لماذا البرنامج يتوقف بدل عرض رسالة الخطأ	justforit	0	109	07-12-25, 10:22 AM آخر رد: justforit
	كيف يمكن تصدير ascx كملف dll	justforit	1	142	06-12-25, 12:33 AM آخر رد: salamandal
	جهاز ارسال رسائل SMS من خلال برنامج فيجوال بيسك	جيولوجي مبتدئ	4	1,028	05-09-25, 12:37 PM آخر رد: جيولوجي مبتدئ
	كيفية حفظ إعدادات البرنامج بحيث لا تتغير	أحمد إبراهيم سعد	4	3,006	06-08-25, 06:34 PM آخر رد: Taha Okla
	كيف يمكن تحريك الفورم بأستخدام زر	heem1986	2	591	30-03-25, 01:58 AM آخر رد: heem1986
	[سؤال] تغيير الفورم الرئيسي عند تشغيل البرنامج في Visual Studio مع .NET 8؟	silverlord	2	658	09-03-25, 03:52 AM آخر رد: silverlord
	[VB.NET] عدد من هم فاتحي البرنامج	محمد مسافر	1	421	25-02-25, 07:58 PM آخر رد: princelovelorn
	كيف يمكن تحويل ملف تنفيذى الى فيجوال بيسك 2010	walkady	2	789	07-02-25, 07:57 PM آخر رد: الورد2
	[سؤال] اجراء المسح الضوئي وتصوير المستندات من خلال المستعرض	ابوعبدالملك	3	380	24-01-25, 06:37 AM آخر رد: ابوعبدالملك
	استفسار عن حمايه البرنامج	ahmedramy	1	559	25-12-24, 11:07 PM آخر رد: aljzazy