C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


(過去ログ 156 を表示中)
■90355 / )  WebBrowser経由でログインできない
□投稿者/ 0302 (1回)-(2019/03/03(Sun) 00:05:24)
0302 さんの Web サイト

分類:[.NET 全般] 

始めまして

VB.NETでクックパッドにログインし、
(https://cookpad.com/identity/session/new?navigator_name=cookpad&navigator_parameters)
開いたURLをコピーし、色々活用するようなプログラムを作っています。
VB.NETには見識はありますが、HTMLにはあまり馴染みがない為、言葉など謝っていたらすみません。

下記のようなサイトを参考にし、ログインを試みました。
(http://surferonwww.info/BlogEngine/post/2012/08/10/how-to-get-htmlelements-in-iframe-shown-in-webbrowser.aspx)
入力自体は出来たのですが、入力箇所が隠れ文字(ログイン画面の灰色文字で「メールアドレスまたは電話番号」「パスワード」となっているもの)となり、
ログインボタンを押すも、文字が入力されていると判断されませんでした。

クックパッドのログイン画面のソースを見ると、57行目付近に「<div data-props=〜」で始まるもので、暗号化されているように見受けます。

こういったものは、従来の「GetElementsByName」でテキストボックスを取得する等の方法でログインすることは不可能でしょうか?
代替の方法などがあれば、ぜひ教えて頂けたら幸いです。

よろしくお願いします。

↓組んだプログラム(テキストボックスへ入力はできたが、灰色文字となり、入力文字と判断されていない)
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
    Private Sub XXXXX()
        Dim htmlDoc As HtmlDocument

        ' 読込待機
        Do While Not isCmp = vbTrue
            ' キュー実行
            Application.DoEvents()
        Loop
        isCmp = False

        htmlDoc = wb.Document

        ' インプット
        With htmlDoc
            .All.GetElementsByName("identifier")(0).InnerText = [ログインID]
            .All.GetElementsByName("password")(0).InnerText = [パスワード]
            ' キュー実行
            Application.DoEvents()

            .Forms(0).InvokeMember("login_form")
        End With

        'キュー実行
        Application.DoEvents()

    End Sub

    Private Sub isComlepete(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles wb.DocumentCompleted
        isCmp = vbTrue
    End Sub
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー

返信 編集キー/


管理者用

- Child Tree -