Hatena::Groupvbscript

Shell.Application

主要な Windows 標準コンポーネントの一覧 → http://vbscript.g.hatena.ne.jp/keyword/ProgID
VBScript 基礎文法最速マスター → http://vbscript.g.hatena.ne.jp/cx20/20100131/1264906231

Shell.Application

Shell.Application

概要

Shell.Application は、Windows シェル のオートメーション オブジェクトを表す ProgID です。

このオブジェクトを使用することでエクスプローラの機能をオートメーション操作することが可能です。

また、FTP やファイルの更新日時の変更といったファイル操作も可能です。

サンプル

' File : ShowExplore.vbs
' Usage : CScript //Nologo ShowExplore.vbs
' Description : VBScript から Shell.Application を使用してエクスプローラを起動するサンプル
Option Explicit

Call Main()

Sub Main()
    Dim strFilePath
    strFilePath = "C:\"
    DebugPrint "[" & strFilePath & "] をエクスプローラで表示"
    Call ShowExplore( strFilePath )
End Sub

Sub ShowExplore( strFilePath )
    Dim shell
    Set shell = CreateObject("Shell.Application")
    shell.Explore strFilePath
End Sub

Sub DebugPrint( strMessage )
    ' WSH で実行する場合
    WScript.Echo strMessage
    ' VBA で実行する場合
    ' Debug.Print strMessage
End Sub
実行結果
[C:\] をエクスプローラで表示

参考情報