[ホームページを表示する]

InternetExplorer のホームページを表示します。
（インターネットオプションの全般タブで設定されているページ）

【ソースコード】

[tips0155.vbs]
Option Explicit
On Error Resume Next

Dim objIE       ' IE オブジェクト

Set objIE = WScript.CreateObject("InternetExplorer.Application")
If Err.Number = 0 Then
    objIE.GoHome
    objIE.Visible = True
Else
    WScript.Echo "エラー：" & Err.Description
End If
Set objIE = Nothing