tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: HTTPサーバーにPOST要求してログイン
投稿日: 2010/03/22(Mon) 23:09
投稿者keisuke
こんばんは、です、
色々、調べたり、他の方法をトライしてみましたが、、、、、

> 実際の通信内容が、どのような内容になっているのかは調べてみましたか?

GET http://mobile.rakuten-sec.co.jp/favicon.ico HTTP/1.1
User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.1; Trident/4.0; YTB720; GTB6.3; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; Media Center PC 5.0; SLCC1; Tablet PC 2.0; Lunascape 6.0.3.20663)
Host: mobile.rakuten-sec.co.jp
Pragma: no-cache
Cookie: s_pers=%20s_vnum%3D1269189115610%2526vn%253D32%7C1269189115610%3B%20s_sec-pn%3D%255Bmember%255Dapp%253Acom_web_order_direct%7C1269070909743%3B%20s_invisit%3Dtrue%7C1269070909750%3B%20mem%3Dy%7C1276845109756%3B%20s_nr%3D1269069109762-Repeat%7C1276845109762%3B; mbox=PC#1258355569504-924597.18#1270269372|check#true#1269059832|session#1269059757115-605053#1269061632; LATEST_LOGOUT_DATE=Wed%2C%2024%20Feb%202010%2006%3A24%3A49%20UTC;



> 通常の手続きと同じ文字列が得られたのは、どのエンコードを使った場合でしたか?
**932です。
> > URL02 = postData
> 変換された URL02 の内容は、適切な内容になっているのでしょうか?
** 多分


> Cookie や User-Agent 等でブロックされているケースも無いとは言えませんし。
Cookieのあるほかのサイトで動作するもので試してみましたが駄目でした。
POSTでなく、GETでも試してみました、、、

で結局下のコーディングでできました。ありがとうございます。
User-Agentの関係ですね。

Dim enc As System.Text.Encoding = System.Text.Encoding.GetEncoding("shift_jis")
Dim wc As WebClient = New WebClient()
  wc.Headers.Add("User-Agent", _
              "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.1)")

  Dim nvc As NameValueCollection = New NameValueCollection()
        nvc.Add("loginid", "********")
        nvc.Add("password", "****")
        nvc.Add("forward", "3")
        nvc.Add("fop", "fop")

        wc.QueryString = nvc

Dim result As Byte() = _
     wc.DownloadData("https://mobile.rakutenec.co.jp/fopweb/IMFR000_002_doLogin.do")
Dim html As String = enc.GetString(result)

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。