Dim web As System.Windows.Forms.WebBrowser = e.Form.controls("webbrowser1").basecontrol
Dim vw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.ScriptErrorsSuppressed = True
vw.Address = "https://XXXXX.com"
Do Until web.ReadyState = 4
Application.DoEvents
Loop
Dim vu = web.Document.GetElementById("mobile")
Dim vp = web.Document.GetElementById("password")
vu.SetAttribute("value", "test")
vp.SetAttribute("value", "test")
web.Document.InvokeScript("login")