shai_shai_shai
New member
שאלה חשובה
יש לי בעיה אני רוצה לגשת לתיבת טקסט באתר אינטרנט הצלחתי לעשות את זה אבל אני לא מצליח ללחוץ על הכפתור כדי לאשר את זה הנה מה שבינתיים:
יש לי בעיה אני רוצה לגשת לתיבת טקסט באתר אינטרנט הצלחתי לעשות את זה אבל אני לא מצליח ללחוץ על הכפתור כדי לאשר את זה הנה מה שבינתיים:
Private Sub WebBrowser_DocumentComplete(ByVal pDisp As Object, URL As Variant) Dim Doc As IHTMLDocument2 Dim Inputs As IHTMLElementCollection Set Doc = WebBrowser.Document Set Inputs = Doc.All.tags("INPUT") Inputs.Item("username").Value = frmLogin.txtUserName Inputs.Item("password").Value = frmLogin.txtPassword End Sub Private Sub Form_Load() WebBrowser.Navigate "http://www.amitalon.com/cgi-bin/ultimatebb.cgi?ubb=login" End Sub
אז ניסיתי לראות את הקוד מקור של האתר אבל עדיין לא הבנתי איך ללחוץ על הכפתור, אני יודע איך אפשר ללחוץ על כפתור אבל אני לא מצליח לדעת איך ללחוץ על הכפתור הזה כל עזרה תתקבל בברכה שי