IE自動入力

Set WShell = WScript.CreateObject("WScript.Shell")
Set IE = WScript.CreateObject("InternetExplorer.Application")
Const URL = "http://www.basicauth.com"
IE.navigate2 URL
IE.Visible = True
Do While WShell.AppActivate("some title") = false 'ダイアログのウインドウのタイトル
WScript.Sleep(100);
Loop
WShell.Sendkeys("user_id{TAB}passward{TAB}{TAB}{ENTER}")

ベーシック認証のダイアログ相手の例、
見てのとおりキー入力を自動化してるだけなので普通のページにも応用可
#平文でパスワードを書かなければならないところが弱いです