投稿日 | : 2003/05/21(Wed) 10:52 |
投稿者 | : LESIA |
Eメール | : |
URL | : |
タイトル | : Re^8: VBでブラウザにログイン |
FORMにNameがないならこんな感じでどうでしょう。
Dim objForm As Object
WebBrowser1.Navigate2 "http://www.hogehoge.html"
Do
DoEvents
Loop While WebBrowser1.Busy
For Each objForm In WebBrowser1.Document.getElementsByTagName("FORM")
If objForm.Action = "./index.php" Then
objForm.si.Value = "ログインID"
objForm.pw.Value = "パスワード"
objForm.submit
End If
Next objForm