Bonsoir,
Aujourd'hui, je me lance dans la création de compte j'ai pas beaucoup d'information sur la méthode à utiliser
J'ai suivis un tuto voila ce que j'ai :
Dim postData As String = "f=&postBack=1&pe5cf98ece1990f032152fbc00ca27f5e=" & NDC & "&p683e224c2954ab3d718e431d97c3befc=" & MDP & "&pb7c91238ffa44c71f26445ca63b21356=" & MDP & "&p8adabfae9fa62230d0d9250bb3bc1d51=" & mail & "&p54fdae4a68c4e3b346760a610870e5a1=" & Pseudo & "&pf4ac60d4712933ceecf83d02d04cefd2=M&p502eb3fe02bae286260bdf2e074631a7=" & Anné & "&p89600acf9478ef5c6ae7b02aa640af4c=FR"
Dim encoding As New UTF8Encoding
Dim byteData As Byte() = encoding.GetBytes(postData)
Dim postReq As HttpWebRequest = DirectCast(WebRequest.Create("https://secure.dofus.com/fr/creer-un-compte"), HttpWebRequest)
postReq.Method = "POST"
postReq.KeepAlive = False
postReq.ContentType = "application/x-www-form-urlencoded"
postReq.Referer = "https://secure.dofus.com/fr/creer-un-compte"
postReq.UserAgent = "Mozilla/5.0 (Windows NT 6.2; WOW64; rv:5.0) Gecko/20100101 Firefox/5.0"
postReq.ContentLength = byteData.Length
Dim Postreqstream As Stream = postReq.GetRequestStream
Postreqstream.Write(byteData, 0, byteData.Length)
Postreqstream.Close()
Dim postreponse As HttpWebResponse
postreponse = DirectCast(postReq.GetResponse, HttpWebResponse)
Dim postreader As New StreamReader(postreponse.GetResponseStream())
Dim page As String = postreader.ReadToEnd
WebBrowser1.DocumentText = page
Voila, le site affiche, à travers le WebBrowser, donne "Le code que vous avez recopié est inexact : veuillez recommencer."
Et le seul champ remplis est celui du pays
Si vous avez des informations sur la méthode à utiliser je suis preneur :D
Merci