Flaming hell...that was a braincracker...
I tried all the tricks and tips I could get my hands on...
Ended up with only one solution(that works):Could somebody explain to me:Code:Private Sub WebBrowser_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser.DocumentCompleted Dim Username = WebBrowser.Document.All("login[username]") 'Searches for username field Dim Password = WebBrowser.Document.All("login[password]") 'Searches for password field Dim pass As String Dim user As String user = My.Settings.ForgardenUser 'doesn't work, think it doesn't convert "@" to string or smth!!!! pass = My.Settings.ForgardenPass If Username <> Nothing And Password <> Nothing Then Username.InnerText = "[email protected]" 'set the user manually Password.InnerText = pass SendKeys.Send("{ENTER}") 'hits ENTER to log in instead of click via code(no code worked) End If End Sub
* why I couldn't get invokemember("click") to work
* why an e-mail address stored in my. settings doesn't convert to string and populate username field?
Is there a better way to write such code?




Reply With Quote