Hatena::Groupuwsc

WScript.Shell

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

WScript.Shell

概要

WScript.Shell は、Windows シェル オブジェクトを表す ProgID です。

Shell.Application と似たような機能を持っていますが、WScript.Shell はシステム環境的なものにアクセスする場合に使用されることが多いです。

サンプル

// File : ShowSpecialFolder.uws
// Description : UWSC から WScript.Shell を使用して特殊フォルダを表示するサンプル
Option Explicit

Main()

Procedure Main()
    Dim strFolderType
    strFolderType = "Desktop" 
    ShowSpecialFolder( strFolderType )
Fend

Procedure ShowSpecialFolder( strFolderType )
    Dim strFolderName
    strFolderName = GetSpecialFolder( strFolderType )
    Print "Folder Type : [" + strFolderType + "]"
    Print "Folder Name : [" + strFolderName + "]"
Fend

Function GetSpecialFolder( strFolderType )
    Dim strResult
    Dim shell
    shell = CreateOleObj("WScript.Shell")
    strResult = shell.SpecialFolders( strFolderType )
    Result = strResult
Fend
実行結果
Folder Type : [Desktop]
Folder Name : [C:\Documents and Settings\Administrator\デスクトップ]

参考情報