Hola, he estado creando un Auto-Login desde Visual Basic.
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:
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
IMAGEN [URL="http://prntscr.com/mdbti"]http://prntscr.com/mdbti[/URL]
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:
Public 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
Textbox1 = Textuser
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