Shell

Shellオブジェクト (ShellApplication)

[概要]

Windowsのシェル(エクスプローラ)の機能を呼び出します。
Win95やNT4では、Internet Explorer4.0をシェル統合モードでインストールしていないと使えません。

[機能を提供するファイル]

SHDOCVW.DLL
Microsoft Internet Controls
(IE5インストール後は、SHDOC401.DLL<Microsoft Shell Controls And Automation>になります。 )

[呼び出し方]

Set Shell=Wscript.CreateObject("Shell.Application")

[主なメソッド]

BrowseForFolder(lngHWND, strTitle, lngOptions, [RootFolder])
　「フォルダの参照」ダイアログを出します。Folderオブジェクトを返します。(このオブジェクトはFileSystemObjectオブジェクトのFolderオブジェクトとは異なります。)
　strTitleには、ダイアログに表示させる説明文を指定します。
　RootFolderには、ルートフォルダのパス、もしくはこのページの下にある、ShellSpecialFolderConstantsの定数(特殊フォルダ)を指定できます。
　lngHWNDには、ウィンドウのハンドルを指定できる?ようですが詳細不明。通常は0にしておいて問題ないようです。
　lngOptionsは、ダイアログのタイプを指定します。このページの下にある、BROWSEINFOの定数が使用できます。複数のオプションを指定する時は、定数の和を指定します。
　以下のような例で、任意のフォルダ名を取得できます。
(例):
```
Set Shell=Wscript.CreateObject("Shell.Application")
Set f=Shell.BrowseForFolder(0,"フォルダを選んでください")
MsgBox f.Items.Item.Path '選択したフォルダ名を表示
```
CascadeWindows
　ウィンドウを重ねて表示。
ControlPanelItem szDir
　コントロールパネルの内容を表示します。
　(例):
```
 Shell.ControlPanelItem "desk.cpl" '「画面のプロパティ」を表示
```
EjectPC
　何をするメソッドか不明。
Explore vDir
　ディレクトリ名を指定してエクスプローラを起動。vDirにはパス、もしくはこのページの下にある、ShellSpecialFolderConstantsの定数(特殊フォルダ)を指定できます。
FileRun
　「ファイル名を指定して実行」を表示。
FindComputer
　コンピュータの検索を表示。
FindFiles
　ファイルの検索を表示。
NameSpace(vDir)
　vDirに指定したパスのFolderオブジェクトを返す。vDirはパス、もしくはこのページの下にある、ShellSpecialFolderConstantsの定数(特殊フォルダ)を指定できます。ファイルを指定することも一応可能です。
Help
　Windowsのヘルプ表示。バージョンによっては動作しない。
MinimizeAll
　ウィンドウすべて最小化。
Open vDir
　任意のフォルダをマイコンピュータ形式で開く。vDirにはパス、もしくはこのページの下にある、ShellSpecialFolderConstantsの定数(特殊フォルダ)を指定できます。
RefreshMenu
　スタートメニューを更新する。
SetTime
　日付と時刻のプロパティを出す。
ShutdownWindows
　「Windowsの終了」ダイアログを表示。
Suspend
　サスペンドする。
TileHorizontally
　ウィンドウを左右に並べて表示。
TileVertically
　ウィンドウを上下に並べて表示。
TrayProperties
　タスクバーのプロパティ表示。
UndoMinimizeALL
　ウィンドウ操作を元にもどす。
Windows
　現在開かれているすべてのフォルダのコレクション(Windowsオブジェクト)を返す。
このオブジェクトのItemプロパティが返すオブジェクトは、InternetExplorerと同じメソッド・プロパティを持ちます。
(例):
```
Set ws=Shell.Windows
For Each a In ws
	a.StatusText=Date
Next
'開かれているフォルダすべてのステータスバーに日付を表示
```

[主なプロパティ]

なし

[定数]

●ShellSpecialFolderConstants

定数名と値	意味
Const ssfDESKTOP = 0	デスクトップ(仮想)
1	Internet Explorer
Const ssfPROGRAMS = 2	プログラム
Const ssfCONTROLS = 3	コントロールパネル
Const ssfPRINTERS = 4	プリンタ
Const ssfPERSONAL = 5	マイドキュメント
Const ssfFAVORITES = 6	お気に入り
Const ssfSTARTUP = 7	スタートアップ
Const ssfRECENT = 8	最近使ったファイル
Const ssfSENDTO = 9	送る
Const ssfBITBUCKET = 10	ごみ箱
Const ssfSTARTMENU = 11	スタートメニュー
Const ssfDESKTOPDIRECTORY = 16	デスクトップ(フォルダ)
Const ssfDRIVES = 17	マイコンピュータ
Const ssfNETWORK = 18	ネットワークコンピュータ
Const ssfNETHOOD = 19	NetHood
Const ssfFONTS = 20	フォント
Const ssfTEMPLATES = 21	テンプレート

●BROWSEINFO

定数名と値	意味
Const BIF_RETURNONLYFSDIRS = &H1	ファイルシステムのフォルダ(仮想フォルダ以外)のみが選択できる。
Const BIF_DONTGOBELOWDOMAIN = &H2	ドメイン下のネットワークフォルダを含めない。
Const BIF_STATUSTEXT = &H4	ステータスバーを表示。WSHからは意味なし(サイズがちょっと変わる?)。
Const BIF_RETURNFSANCESTORS = &H8	選択不可になる?
Const BIF_EDITBOX = &H10	フォルダ名を指定する、テキストボックスも表示。
Const BIF_VALIDATE = &H20	?
Const BIF_BROWSEFORCOMPUTER = &H1000	コンピュータの検索。ssfNETWORKと併用。
Const BIF_BROWSEFORPRINTER = &H2000	プリンタの検索。ssfPRINTERS と併用。
Const BIF_BROWSEINCLUDEFILES = &H4000	ファイルも選択できるようになる。

[関連オブジェクト]

Folderオブジェクト、FolderItemsコレクション、FolderItemオブジェクト、Linkオブジェクト

IShellDispatch2オブジェクト

[UP]