HTTP Webrequest post (вход в YAhooMail)
Наконец я вошел в yahoomail с помощью httpwebrequest.
теперь моя проблема заключается в том, как я собираюсь поставить messagebox, сообщающий, что мой вход в систему успешен или нет.
на данный момент я пытаюсь войти в систему, используя правильное имя пользователя и пропуск.
Надеюсь, кто-нибудь мне в этом поможет.
Вот мой код на данный момент.
Imports System.IO Imports System.Net Imports System.Text Public Class Form1 Dim loginCoockie As New CookieContainer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim uName As String = TextBox1.Text Dim pWord As String = TextBox2.Text Label1.Text = "Trying to Log In" Dim postData As String = ".tries=1&.src=ym&.md5=&.hash=&.js=&.last=&promo=&.intl=us&.bypass=&.partner=&.u=7jebrpt78q79h&.v=0&.challenge=a5PSc8KUgQ7.sU0VVUE9JsdHOosB&.yplus=&.emailCode=&pkg=&stepid=&.ev=&hasMsgr=0&.chkP=Y&.done=http%3A%2F%2Fmail.yahoo.com&.pd=ym_ver%3D0%26c%3D%26ivt%3D%26sg%3D&.ws=1&.cp=0&pad=5&aad=6&login=" & uName & "&passwd=" & pWord & "&.save=&passwd_raw=" Dim tempCookies As New CookieContainer Dim encoding As New UTF8Encoding Dim byteData As Byte() = encoding.GetBytes(postData) Dim postRequest As HttpWebRequest = DirectCast(WebRequest.Create("https://login.yahoo.com/config/login"), HttpWebRequest) postRequest.Method = "POST" postRequest.KeepAlive = True postRequest.CookieContainer = tempCookies postRequest.ContentType = "application/x-www-form-urlencoded" postRequest.Referer = "https://login.yahoo.com/config/login" postRequest.UserAgent = "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:6.0a2) Gecko/20110613 Firefox/6.0a2" postRequest.ContentLength = byteData.Length Dim postReqStream As Stream = postRequest.GetRequestStream postReqStream.Write(byteData, 0, byteData.Length) postReqStream.Close() Dim postResponse As HttpWebResponse postResponse = DirectCast(postRequest.GetResponse(), HttpWebResponse) tempCookies.Add(postResponse.Cookies) loginCoockie = tempCookies Dim postReqReader As New StreamReader(postResponse.GetResponseStream()) End Sub
Я действительно Новичок в этом деле.
Вот мой исходный код:
http://www.mediafire.com/?klkdtigu34qaek2
Надеюсь, кто-нибудь мне в этом поможет..
Спасибо..