タイトル | : Re: Yahoo メールサイトへの自動ログイン サンプル |
記事No | : 8925 |
投稿日 | : 2009/05/09(Sat) 08:21 |
投稿者 | : 花ちゃん |
初めにお読み下さい や 掲示板ご利用に際し、にも書いてありますが、当サイト記載の サンプル等の転載を禁止しております、必要ならリンクを張るようにして下さい。 (特に今回貼り付けられたコードは、改善が必要なコードなので、貼り付け先まで修正 できませんので、これをご覧になられたら、削除願います) > 'ヤフーのログインサイトのところだけ変更しています。 > 投稿できないので。 なぜ、 .Navigate ("http://mail.yahoo.co.jp/") の部分の投稿はだめなのでしょうか? ---------------------------------------------------------------------------------
VB2005 をお使いなら、IE を使用せず、WebBrowser コントロールを使って DocumentCompleted イベント内で設定するようにして下さい。
With WebBrowser1 'ID の入力 .Document.GetElementById("login").SetAttribute("Value", "myId") 'パスワードの入力 .Document.GetElementById("passwd").SetAttribute("Value", "myPasswd") 'ログインボタンをクリック .Document.Forms(0).InvokeMember("Submit") End With
VB2005 上で、IE を使用すると、Com オブジェクトの解放処理とか、DocumentCompleted イベント内での処理方法が複雑になります。 http://hanatyan.sakura.ne.jp/patio/read.cgi?no=192
一応動作だけなら、下記でも動くはずですが。(ちょっと試せば解るかと) .Document.Forms(0).Elements("login").Value = "JAPAN ID" .Document.Forms(0).Elements("passwd").Value = "パスワード"
> 連動して、Dim i ・・にも。 よくご覧になれば解る筈ですが(ミスをしておきながら偉そうな事は言えませんが。)
>あと、IEに限定ではなく、標準設定のブラウザーで開くようにすることも >出来ますでしょうか? 出来る、出来ないで言えば多分できるでしょうが、ブラウザ と言っても色々ある でしょうから、それぞれのブラウザにあった処理が必要でしょうね。 因みに、私は、IE しか使っておりませんので、試した事もありません。
|