Que loguee a este juego: http://Darkorbit.com
bueno, lo que pasa es que despues de loguear pide "Seleccionar Servidor"
Lo malo de eso es que el codigo que pide es este: (Ejemplo)
Código:
IMAGEN [URL="http://prntscr.com/mdbti"]http://prntscr.com/mdbti[/URL]http://int15.darkorbit.bigpoint.com /GameAPI.php?req=YTo1OntzOjY6ImFjdGlvbiI7czoyMToicG9ydGFsLmxvZ2luQnlDcnlwdElkIjtzOjEyOiJsb2dpbkNyeXB0SWQiO3M6MzI6ImNkNDIyM2Q3MjU3Zjc2YzNmYzQxYjU5Y2E5ZjQzMzZiIjtzOjY6ImdhbWVJZCI7aTo3Mjg7czo2OiJsb2NhbGUiO3M6MjoiZXMiO3M6OToiYm9udXNDb2RlIjtOO30%3D&sign=13a6c1477923ab965137e39f2fdb496b&loginError=99&lang=es&ref_sid=293f21e2b331623046f761301fcf9360&ref_pid=728&__utma=1.1220086248.1355503890.1355674581.1355684792.6&__utmb=1.12.10.1355684792&__utmc=1&__utmx=-&__utmz=1.1355684792.6.4.utmcsr%3Ddarkorbit.com%7Cutmccn%3D%28referral%29%7Cutmcmd%3Dreferral%7Cutmcct%3D%2F&__utmv=-&__utmk=65468718
Al final del codigo hay un "utmk=xxxxxxxx" y ese es el que cambia por cada logueo.
Necesito hacer que el programa cada vez que loguee, consiga el codigo y entre.
Mi codigo de Logueo es este:
Código:
Textbox1 = TextuserPublic Sub login() Dim postData As String = "loginForm_default_username=" & Form1.TextBox1.Text & "&loginForm_default_password=" & Form1.TextBox2.Text & "&loginForm_default_login_submit=Entrar" Dim tempcookies As New CookieContainer Dim encoding As New UTF8Encoding Dim bytedata As Byte() = encoding.GetBytes(postData) Dim postreq As HttpWebRequest = DirectCast(WebRequest.Create("http://www.darkorbit.com/?locale=es&aid=0"), HttpWebRequest) postreq.Method = "POST" postreq.KeepAlive = True postreq.CookieContainer = tempcookies postreq.ContentType = "application/x-www-form-urlencoded" postreq.Referer = "http://www.darkorbit.com/?locale=es&aid=0" postreq.UserAgent = "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:17.0) Gecko/20100101 Firefox/17.0" postreq.ContentLength = bytedata.Length Dim postreqstream As Stream = postreq.GetRequestStream postreqstream.Write(bytedata, 0, bytedata.Length) postreqstream.Close() Dim postresponse As HttpWebResponse postresponse = DirectCast(postreq.GetResponse(), HttpWebResponse) tempcookies.Add(postresponse.Cookies) logincookies = tempcookies Dim postreqreader As New StreamReader(postresponse.GetResponseStream()) Dim thepage As String = postreqreader.ReadToEnd Form1.RichTextBox1.Text = thepage Form1.WebBrowser1.DocumentText = Form1.RichTextBox1.Text Call loginsv() end sub
textbox2 = textpass
textbox3 = textserver (Donde tengo el problema)
Este codigo hace : Entra a darkorbit usando un codigo ejemplo:
www.darkorbit.com/login&username=Textuser.text&Password=textpass.text&/home
Hasta aqui llega el codigo, luego viene lo de la imagen (Seleccionar Servidor)
Tengo un codigo simple pero funcional:
Webbrowser1.navigate(http://textserver.text.(Primer codigo mostrado en el tema, arriba) )
Bueno no funciona ¿Por que? Cada vez que loguea genera un nuevo UTMK que sirve para loguear, necesito hacer que consiga ese codigo y lo coloque en el codigo del webbrowser1.navigate
Ayuda por favor :)
Cuenta darkorbit: tXMax_bot
pass: test
Saludos