arjaylieann23 Ответов: 2

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


Надеюсь, кто-нибудь мне в этом поможет..

Спасибо..

2 Ответов

Рейтинг:
2

Sergey Alexandrovich Kryukov

Понимаете ли вы, что форма уведомления о сбое входа в систему полностью определена на стороне сервера? Вы можете понять это, только проанализировав содержание postResponce.

Попробуйте сделать следующее. Войдите в Yahoo с помощью обычного веб-браузера и попробуйте сделать действительные и недействительные логины вручную. Выясните, как проявляется отказ войти в систему. Во время чтения из postResponce и попробуйте определить, как проявляется сбой входа в систему. Используйте его в своем коде.

—СА


Рейтинг:
1

Member 13044559

Мой адрес электронной почты и пароль были в порядке еще 2 недели назад.что случилось?


CHill60

Это не решение вопроса! С какой стати вы размещаете этот вопрос на этом форуме? Иди поговори с Yahoo!