tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルYahoo メールサイトへの自動ログイン サンプル
記事No8924
投稿日: 2009/05/09(Sat) 02:59
投稿者山広
いろいろとVB2005で勉強させて頂いています。

OS:XP sp3 VB:VB2005


VB6.0用ですが、VB2005でも使えるかなと思い試してみました。

どうしても「CVar」のところでエラーが出てしまうので、困ってしまっています。
連動して、Dim i ・・にも。


「CVar」{式をバリアント型に変換する}

この関数はVB2005では使えなくなってしまっているのでしょうか?



あと、IEに限定ではなく、標準設定のブラウザーで開くようにすることも出来ますでしょうか?




「訂正」2009/05/09 21:25 コード削除

[ツリー表示へ]
タイトルRe: Yahoo メールサイトへの自動ログイン サンプル
記事No8925
投稿日: 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 しか使っておりませんので、試した事もありません。

[ツリー表示へ]
タイトルRe^2: Yahoo メールサイトへの自動ログイン サンプル
記事No8926
投稿日: 2009/05/09(Sat) 21:50
投稿者山広
失礼しました。
コードは削除しました。


> なぜ、 .Navigate ("http://mail.yahoo.co.jp/") の部分の投稿はだめなのでしょうか?

これも私の勘違いで、問題なかったです。

WebBrowserでの利用は問題なかったです。

> 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 = "パスワード"
>

上記の方法や、CStr()に変更など試してみたのですが、表示後にエラーが出てしまいます。


まだ道のりは遠そうですが、試行錯誤がんばってみたいと思います。

有り難うございました。

[ツリー表示へ]