vbsでフォルダやファイルを開く

vbsでフォルダを開く。
ファイルコピーした後などに、実際にコピーされているかを確認するために、対象のフォルダやファイルを開くために使ったり。

Dim iii
iii = "C:\対象フォルダまたは対象ファイル\"
CreateObject("Shell.Application").ShellExecute iii

もう一つの方法（フォルダのみ？）だったかな。

----- べんりあつめ。-----

Dim FN ' フォルダ名
Dim objShell

FN = "C:\対象フォルダ\"
Set objShell = WScript.CreateObject("Shell.Application")
objShell.Explore FN
Set objShell = Nothing