السلام عليكم ورحمة الله وبركاته
هل يجوز عمل هذا الكود داخل Module ليكون بالنهاية ملف dll يتم استدعائه وقتما أريد
كود :
WebBrowser1.Document.GetElementById("email").SetAttribute("value", TextBox1.Text)
WebBrowser1.Document.GetElementById("pass").SetAttribute("value", TextBox2.Text)
WebBrowser1.Document.GetElementById("login").InvokeMember("click")
بما انك تريد عمل ملف 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
(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 = التكست بوكس الاخر ؟
فعلا اخى نجحت لكن لما عملته كلاس كما قولت بكون ملف vb ليس dll
وانا اريده بصيغة dll
ولما عملتها ClassLibrary ظهر خطأ
ظهور الخطا لانك لم تتبع التعليمات التي ذكرتها لك
هناك سطر لم تنسخه وترتبط بها خطوه لم تعملها
تحتاج لعمل استدعاء لمكتبه System.Windows.Forms في الرفرنس reference ثم عمل build
Imports System.Windows.Forms
ايوه ايوه فعلا أخى نغعت بهذا جزاك الله كل خير
كود :
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