hi!
I have webbrowsser to login in a web. this web is webbrowsser´s game called ikariam. When i go to this page, show me a message "this browsser is not compatible whith this web, but if y make loggin ingnoring this message i can access to the game perfectly.
the problen is that i can´t chage a combo box (this combo is for select the world of the game), loggin make good but in the default option of the combo box.
this is combo box html code
and this is my vb code
there is no error but the combo don´t change
i try with
, but the result is same
help!!! please!!!
I have webbrowsser to login in a web. this web is webbrowsser´s game called ikariam. When i go to this page, show me a message "this browsser is not compatible whith this web, but if y make loggin ingnoring this message i can access to the game perfectly.
the problen is that i can´t chage a combo box (this combo is for select the world of the game), loggin make good but in the default option of the combo box.
this is combo box html code
Code:
<SELECT id=logServer class=validate[required] name=uni_url> <OPTION selected value=s1.es.ikariam.com cookieName="" fbUrl="" mobileUrl="m1.es.ikariam.com">Alpha</OPTION> <OPTION value=s2.es.ikariam.com cookieName="" fbUrl="" mobileUrl="m2.es.ikariam.com">Beta</OPTION> <OPTION value=s3.es.ikariam.com cookieName="" fbUrl="" mobileUrl="m3.es.ikariam.com">Gamma</OPTION> <OPTION value=s4.es.ikariam.com cookieName="" fbUrl="" mobileUrl="m4.es.ikariam.com">Delta</OPTION></SELECT>Code:
Private Sub btnlogin_Click(sender As System.Object, e As System.EventArgs) Handles btnlogin.Click
Dim combo As HtmlElement
Dim nombre As HtmlElement
Dim pass As HtmlElement
Dim boton As HtmlElement
combo = web.ikaweb.Document.GetElementById("logServer")
nombre = web.ikaweb.Document.GetElementById("name")
pass = web.ikaweb.Document.GetElementById("password")
boton = web.ikaweb.Document.GetElementById("loginBtn")
combo.SetAttribute("value", "s4.es.ikariam.com")
combo.RaiseEvent("onChange")
nombre.SetAttribute("value", "minombre")
pass.SetAttribute("value", "mipass")
boton.InvokeMember("click")
End Subi try with
Code:
combo.SetAttribute("selectedindex", 5)help!!! please!!!