07-02-18, 06:14 PM
07-02-18, 06:18 PM
07-02-18, 06:22 PM
اللي مثقل الصفحة ال script الأول من كود الصفحة وتحديدا
PHP كود :
http://ff.kis.v2.scr.kaspersky-labs.com/B4552AF2-C4EB-AB42-ADAD-96490830D6AB/main.js
07-02-18, 06:44 PM
(07-02-18, 06:22 PM)طالب برمجة كتب : [ -> ]اللي مثقل الصفحة ال script الأول من كود الصفحة وتحديدا
PHP كود :
http://ff.kis.v2.scr.kaspersky-labs.com/B4552AF2-C4EB-AB42-ADAD-96490830D6AB/main.js
شكرا لك ايها الاستاذ الكريم
سانتظر يمكن احد الاخوة يمكن يساعدني في ادات GeckoWebBrowser
لان الشطر الاهم من الكود قد اتيت به انت
شكرا جزيلا
07-02-18, 11:11 PM
صلو على النبي
08-02-18, 12:58 AM
شكراً اخي على رسالتك ,
يمكنك التحكم بالبرنامج المكتوب بالـVB.Net عن طريق صفحة ويب يتم تحميلها داخل Gecko WebBrowser
في المشروع اضف ملف الى الـResources واجعل اسمه html وضع بداخله الكود التالي :
ثم في نافذه Form1 اضف اداة GeckoWebBrowser1 و TextBox1
وضع الكود التالي
تحياتي وتمنياتي لك بالتوفيق
يمكنك التحكم بالبرنامج المكتوب بالـ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
تحياتي وتمنياتي لك بالتوفيق
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
08-02-18, 02:09 AM
ضع الكود التالي
بدلاً من
قم بتبديل الرابط الى رابط صفحتك . علماً بأنني قمت برفع الصفحة للتجربة
PHP كود :
GeckoWebBrowser1.Navigate("http://sbetan.com/bb.html")
بدلاً من
PHP كود :
GeckoWebBrowser1.LoadHtml(My.Resources.html)
قم بتبديل الرابط الى رابط صفحتك . علماً بأنني قمت برفع الصفحة للتجربة
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
08-02-18, 10:24 AM
ما المطلوب ؟؟؟؟؟؟