VBScript:IE

Set objIE = CreateObject("InternetExplorer.Application")

'指定したURLを表示します
objIE.Navigate "http://yahoo.co.jp"

objIE.Visible = True
'表示終了まで待つ
Do While objIE.Busy = True
'何もしないループ
Loop

WScript.Sleep (2000)

Set objIE = Noting