+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [تم الحل] عمل هذا الكود داخل Module (/showthread.php?tid=29289)
[تم الحل] عمل هذا الكود داخل Module - ابو روضة - 08-04-19
السلام عليكم ورحمة الله وبركاته
هل يجوز عمل هذا الكود داخل Module ليكون بالنهاية ملف dll يتم استدعائه وقتما أريد
كود :
WebBrowser1.Document.GetElementById("email").SetAttribute("value", TextBox1.Text)
WebBrowser1.Document.GetElementById("pass").SetAttribute("value", TextBox2.Text)
WebBrowser1.Document.GetElementById("login").InvokeMember("click")RE: عمل هذا الكود داخل Module - بدري - 08-04-19
بما انك تريد عمل ملف dll اعملها في كلاس مثل
في مشروع ملف dll تحتاج لمعمل استدعاء لمكتبه System.Windows.Forms في الرفرنس reference ثم عمل build
Imports System.Windows.Forms
Public Class Class1
Public Shared Sub Login(wb As WebBrowser, email As String, password As String)
wb.Document.GetElementById("email").SetAttribute("value", email)
wb.Document.GetElementById("pass").SetAttribute("value", password)
wb.Document.GetElementById("login").InvokeMember("click")
End Sub
End Class
الان في اي مشروع يمكنك استدعاء مكتبه dll من الرفرنس وبعدها تكتب التالي لتنفيذ الاجراء مثل
ClassLibrary1.Class1.Login(WebBrowser1, TextBox1.Text, TextBox2.Text)
غير ClassLibrary1 الى اسم مشروع ملف dll
RE: عمل هذا الكود داخل Module - ابو روضة - 08-04-19
(08-04-19, 04:30 PM)بدري كتب : بما انك تريد عمل ملف dll اعملها في كلاس مثل
في مشروع ملف dll تحتاج لمعمل استدعاء لمكتبه System.Windows.Forms في الرفرنس reference ثم عمل build
Imports System.Windows.Forms
Public Class Class1
Public Shared Sub Login(wb As WebBrowser, email As String, password As String)
wb.Document.GetElementById("email").SetAttribute("value", email)
wb.Document.GetElementById("pass").SetAttribute("value", password)
wb.Document.GetElementById("login").InvokeMember("click")
End Sub
End Class
الان في اي مشروع يمكنك استدعاء مكتبه dll من الرفرنس وبعدها تكتب التالي لتنفيذ الاجراء مثل
ClassLibrary1.Class1.Login(WebBrowser1, TextBox1.Text, TextBox2.Text)
غير ClassLibrary1 الى اسم مشروع ملف dll
الله يسعد قلبك أخى ويبارك بعمرك يارب...
حضرتك هنا ال email = التكست بوكس الاول ؟؟؟
والpassword = التكست بوكس الاخر ؟
RE: عمل هذا الكود داخل Module - ابو روضة - 08-04-19
فعلا اخى نجحت لكن لما عملته كلاس كما قولت بكون ملف vb ليس dll
وانا اريده بصيغة dll
ولما عملتها ClassLibrary ظهر خطأ
RE: عمل هذا الكود داخل Module - بدري - 08-04-19
ظهور الخطا لانك لم تتبع التعليمات التي ذكرتها لك
هناك سطر لم تنسخه وترتبط بها خطوه لم تعملها
RE: عمل هذا الكود داخل Module - ابو روضة - 08-04-19
(08-04-19, 09:30 PM)بدري كتب : ظهور الخطا لانك لم تتبع التعليمات التي ذكرتها لك
هناك سطر لم تنسخه وترتبط بها خطوه لم تعملها
اى خطوة أخى
RE: عمل هذا الكود داخل Module - asemshahen5 - 08-04-19
تحتاج لعمل استدعاء لمكتبه System.Windows.Forms في الرفرنس reference ثم عمل build
Imports System.Windows.Forms
RE: عمل هذا الكود داخل Module - ابو روضة - 08-04-19
ايوه ايوه فعلا أخى نغعت بهذا جزاك الله كل خير
كود :
Imports System.Windows.Forms
Public Class Class1
Public Shared Sub Login(wb As WebBrowser, email As String, password As String)
wb.Document.GetElementById("email").SetAttribute("value", email)
wb.Document.GetElementById("pass").SetAttribute("value", password)
wb.Document.GetElementById("login").InvokeMember("click")
End Sub
End Class