VB2005でWebBrowserでログイン

質問

• VB2005EEを利用してWebBrowserコントロールを使用してログインを行う方法について教えてください。
• VB2005EEをインストールしたため、Excelで行っていた作業を移行しようとしていますが、WebBrowserコントロールを使用してログインを行う方法がわかりません。
• ExcelのVBAを使用してIEを操作していたが、VB2005EEを使って同じ作業を行おうとしており、WebBrowserコントロールを使用してログインする方法について教えてください。

回答No.1

himajin100000 · ベストアンサー

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim hoge As System.Windows.Forms.HtmlElementCollection

With WebBrowser1
.Navigate( "http://***.****.***/" )
Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete '読み込み終わるまで待つ

System.Windows.Forms.Application.DoEvents()

Loop
.Document.All.GetElementsByName("acctname")(0).InnerText = "abcd123"
.Document.All.GetElementsByName("passwd")(0).InnerText = "1234567"
.Document.Forms(0).InvokeMember("submit")

End With

End Sub
End Class

'だと思うけど、何故か手元ではナビゲーションがキャンセルされました、と出るんだよなあ・・・