Shell.Exploreエクスプロール メソッド

本ページには広告が含まれています。

Contents

Windowsエクスプローラーウィンドウで指定したフォルダーを開きます。

Shell.Explore メソッドでも同じように開くことができます。

構文
Shell.Explore( vDir )
引数
vDir (ShellSpecialFolderConstants必須
フォルダのパスもしくはShellSpecialFolderConstantsを指定
戻り値

定数一覧

ShellSpecialFolderConstants 列挙

名前説明
ssfDESKTOP0デスクトップ
ssfPROGRAMS2プログラム
C:\Users\username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs
ssfCONTROLS3すべてのコントロール パネル項目
ssfPRINTERS4プリンター
ssfPERSONAL5ドキュメント
ssfFAVORITES6お気に入り
ssfSTARTUP7スタートアップ
C:\Users\username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup
ssfRECENT8最近使った項目
ssfSENDTO9送る
C:\Users\username\AppData\Roaming\Microsoft\Windows\SendTo
ssfBITBUCKET10ごみ箱
ssfSTARTMENU11スタート メニュー
ssfDESKTOPDIRECTORY16デスクトップ
C:\Documents and Settings\username\Desktop
ssfDRIVES17PC
ssfNETWORK18ネットワーク
ssfNETHOOD19Network Shortcuts
C:\Users\username\AppData\Roaming\Microsoft\Windows\Network Shortcuts
ssfFONTS20フォント
C:\Windows\Fonts
ssfTEMPLATES21Templates
C:\Users\username\AppData\Roaming\Microsoft\Windows\Templates
ssfCOMMONSTARTMENU22スタート メニュー
C:\ProgramData\Microsoft\Windows\Start Menu
ssfCOMMONPROGRAMS23プログラム
C:\ProgramData\Microsoft\Windows\Start Menu\Programs
ssfCOMMONSTARTUP24スタートアップ(全ユーザー共通)
C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp
ssfCOMMONDESKTOPDIR25パブリックデスクトップ
C:\Users\Public\Desktop
ssfAPPDATA26Roaming
C:\Users\username\AppData\Roaming
ssfPRINTHOOD27C:\Users\username\AppData\Roaming\Microsoft\Windows\Printer Shortcuts
ssfLOCALAPPDATA28Local
C:\Users\username\AppData\Local
ssfALTSTARTUP29スタートアップ(ログオンユーザー)
C:\Users\username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup
ssfCOMMONALTSTARTUP30スタートアップ(全ユーザー共通)
C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp
ssfCOMMONFAVORITES31お気に入り
C:\Users\username\Favorites
ssfINTERNETCACHE32Temporary Internet Files
ssfCOOKIES33INetCookies
ssfHISTORY34History
ssfCOMMONAPPDATA35C:\ProgramData
ssfWINDOWS36%windir% or %SystemRoot%
ssfSYSTEM37C:\Windows\System32
ssfPROGRAMFILES38C:\Program Files (x86)
ssfMYPICTURES39ピクチャ
ssfPROFILE40C:\Users\username
ssfSYSTEMx8641C:\WindowsSystem32
C:\WindowsSyswow32
ssfPROGRAMFILESx8648C:\Program Files
C:\Program Files (X86)
UWSC
CONST ssfDESKTOP = 0
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
CONST ssfFONTS = 20
CONST ssfTEMPLATES = 21
CONST ssfCOMMONSTARTMENU = 22
CONST ssfCOMMONPROGRAMS = 23
CONST ssfCOMMONSTARTUP = 24
CONST ssfCOMMONDESKTOPDIR = 25
CONST ssfAPPDATA = 26
CONST ssfPRINTHOOD = 27
CONST ssfLOCALAPPDATA = 28
CONST ssfALTSTARTUP = 29
CONST ssfCOMMONALTSTARTUP = 30
CONST ssfCOMMONFAVORITES = 31
CONST ssfINTERNETCACHE = 32
CONST ssfCOOKIES = 33
CONST ssfHISTORY = 34
CONST ssfCOMMONAPPDATA = 35
CONST ssfWINDOWS = 36
CONST ssfSYSTEM = 37
CONST ssfPROGRAMFILES = 38
CONST ssfMYPICTURES = 39
CONST ssfPROFILE = 40
CONST ssfSYSTEMx86 = 41
CONST ssfPROGRAMFILESx86 = 48

開いたウィンドウのタイトルとクラス名

Exploreで開いたウィンドウをGETID関数で取得するプログラムです。

UWSC
// 0
GETID("デスクトップ", "CabinetWClass")

// 2
GETID("プログラム", "CabinetWClass")

// 3
GETID("すべてのコントロール パネル項目", "CabinetWClass")

// 4
GETID("プリンター", "CabinetWClass")

// 5
GETID("ドキュメント", "CabinetWClass")

// 6
GETID("お気に入り", "CabinetWClass")

// 7
GETID("スタートアップ", "CabinetWClass")

// 8
GETID("最近使った項目", "CabinetWClass")

// 9
GETID("SendTo", "CabinetWClass")

// 10
GETID("ごみ箱", "CabinetWClass")

// 11
GETID("スタート メニュー", "CabinetWClass")

// 16
GETID("デスクトップ", "CabinetWClass")

// 17
GETID("PC", "CabinetWClass")

// 18
GETID("ネットワーク", "CabinetWClass")

// 19
GETID("Network Shortcuts", "CabinetWClass")

// 20
GETID("Fonts", "CabinetWClass")

// 21
GETID("Templates", "CabinetWClass")

// 22
GETID("スタート メニュー", "CabinetWClass")

// 23
GETID("プログラム", "CabinetWClass")

// 24
GETID("スタートアップ", "CabinetWClass")

// 25
GETID("パブリック デスクトップ", "CabinetWClass")

// 26
GETID("Roaming", "CabinetWClass")

// 27
GETID("Printer Shortcuts", "CabinetWClass")

// 28
GETID("Local", "CabinetWClass")

// 29
GETID("スタートアップ", "CabinetWClass")

// 30
GETID("スタートアップ", "CabinetWClass")

// 31
GETID("お気に入り", "CabinetWClass")

// 32
GETID("INetCache", "CabinetWClass")

// 33
GETID("INetCookies", "CabinetWClass")

// 34
GETID("History", "CabinetWClass")

// 35
GETID("ProgramData", "CabinetWClass")

// 36
GETID("Windows", "CabinetWClass")

// 37
GETID("System32", "CabinetWClass")

// 38
GETID("Program Files", "CabinetWClass")

// 39
GETID("ピクチャ", "CabinetWClass")

// 40
GETID(username, "CabinetWClass")

// 41
GETID("System32", "CabinetWClass")

// 48
GETID("Windows 管理ツール", "CabinetWClass")

プログラム実行例

「デスクトップ」を開く

UWSC
CONST ssfDESKTOP = 0

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfDESKTOP)
使用関数

「プログラム」を開く

UWSC
CONST ssfPROGRAMS = 2

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfPROGRAMS)
使用関数

「すべてのコントロール パネル項目」を開く

UWSC
CONST ssfCONTROLS = 3

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCONTROLS)
SLEEP(3.000)

DIM ID = GETID("すべてのコントロール パネル項目")
CTRLWIN(ID, CLOSE)

「プリンター」を開く

UWSC
CONST ssfPRINTERS = 4

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfPRINTERS)
SLEEP(3.000)

DIM ID = GETID("プリンター")
CTRLWIN(ID, CLOSE)

「ドキュメント」を開く

UWSC
CONST ssfPERSONAL = 5

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfPERSONAL)
SLEEP(3.000)

DIM ID = GETID("ドキュメント")
CTRLWIN(ID, CLOSE)

「お気に入り」を開く

UWSC
CONST ssfFAVORITES = 6

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfFAVORITES)
SLEEP(3.000)

DIM ID = GETID("お気に入り")
CTRLWIN(ID, CLOSE)

「スタートアップ」を開く

UWSC
CONST ssfSTARTUP = 7

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfSTARTUP)
SLEEP(3.000)

DIM ID = GETID("スタートアップ")
//CTRLWIN(ID, CLOSE)

「最近使った項目」を開く

UWSC
CONST ssfRECENT = 8

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfRECENT)
SLEEP(3.000)

DIM ID = GETID("最近使った項目")
CTRLWIN(ID, CLOSE)

「送る」を開く

UWSC
CONST ssfSENDTO = 9

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfSENDTO)
SLEEP(3.000)

DIM ID = GETID("SendTo")
CTRLWIN(ID, CLOSE)

「ごみ箱」を開く

UWSC
CONST ssfBITBUCKET = 10

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfBITBUCKET)
SLEEP(3.000)

DIM ID = GETID("ごみ箱")
CTRLWIN(ID, CLOSE)

「スタートメニュー」を開く

UWSC
CONST ssfSTARTMENU = 11

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfSTARTMENU)
SLEEP(3.000)

DIM ID = GETID("スタート メニュー")
CTRLWIN(ID, CLOSE)

「デスクトップ」を開く

UWSC
CONST ssfDESKTOPDIRECTORY = 16

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfDESKTOPDIRECTORY)
SLEEP(3.000)

DIM ID = GETID("デスクトップ")
CTRLWIN(ID, CLOSE)

「My Computer」を開く

UWSC
CONST ssfDRIVES = 17

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfDRIVES)
SLEEP(3.000)

DIM ID = GETID("PC")
CTRLWIN(ID, CLOSE)

「ネットワーク」を開く

UWSC
CONST ssfNETWORK = 18

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfNETWORK)
SLEEP(3.000)

DIM ID = GETID("ネットワーク")
CTRLWIN(ID, CLOSE)

「ネットワークショートカット」を開く

UWSC
CONST ssfNETHOOD = 19

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfNETHOOD)
SLEEP(3.000)

DIM ID = GETID("Network Shortcuts")
CTRLWIN(ID, CLOSE)

「フォント」を開く

UWSC
CONST ssfFONTS = 20

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfFONTS)
SLEEP(3.000)

DIM ID = GETID("Fonts")
CTRLWIN(ID, CLOSE)

「テンプレート」を開く

UWSC
CONST ssfTEMPLATES = 21

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfTEMPLATES)
SLEEP(3.000)

DIM ID = GETID("Templates")
CTRLWIN(ID, CLOSE)

「スタート メニュー」を開く

UWSC
CONST ssfCOMMONSTARTMENU = 22

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOMMONSTARTMENU)
SLEEP(3.000)

DIM ID = GETID("スタート メニュー")
CTRLWIN(ID, CLOSE)

「プログラム」を開く

UWSC
CONST ssfCOMMONPROGRAMS = 23

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOMMONPROGRAMS)
SLEEP(3.000)

DIM ID = GETID("プログラム")
CTRLWIN(ID, CLOSE)

「スタートアップ」を開く

UWSC
CONST ssfCOMMONSTARTUP = 24

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOMMONSTARTUP)
SLEEP(3.000)

DIM ID = GETID("スタートアップ")
//CTRLWIN(ID, CLOSE)

「パブリックデスクトップ」を開く

UWSC
CONST ssfCOMMONDESKTOPDIR = 25

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOMMONDESKTOPDIR)
SLEEP(3.000)

DIM ID = GETID("パブリックデスクトップ")
CTRLWIN(ID, CLOSE)

「Roaming」フォルダを開く

UWSC
CONST ssfAPPDATA = 26

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfAPPDATA)
SLEEP(3.000)

DIM ID = GETID("Roaming")
CTRLWIN(ID, CLOSE)

「Printer Shortcuts」を開く

UWSC
CONST ssfPRINTHOOD = 27

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfPRINTHOOD)
SLEEP(3.000)

DIM ID = GETID("Printer Shortcuts")
CTRLWIN(ID, CLOSE)

「Local」を開く

UWSC
CONST ssfLOCALAPPDATA = 28

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfLOCALAPPDATA)
SLEEP(3.000)

DIM ID = GETID("Local")
CTRLWIN(ID, CLOSE)

「スタートアップ」を開く

UWSC
CONST ssfALTSTARTUP = 29

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfALTSTARTUP)
SLEEP(3.000)

DIM ID = GETID("スタートアップ")
//CTRLWIN(ID, CLOSE)

「スタートアップ」を開く

UWSC
CONST ssfCOMMONALTSTARTUP = 30

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOMMONALTSTARTUP)
SLEEP(3.000)

DIM ID = GETID("スタートアップ")
//CTRLWIN(ID, CLOSE)
使用関数

「お気に入り」を開く

UWSC
CONST ssfCOMMONFAVORITES = 31

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOMMONFAVORITES)
SLEEP(3.000)

DIM ID = GETID("お気に入り")
CTRLWIN(ID, CLOSE)

「Temporary Internet Files」を開く

Temporary Internet Fiels = インターネット一時ファイル

UWSC
CONST ssfINTERNETCACHE = 32

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfINTERNETCACHE)
SLEEP(3.000)

DIM ID = GETID("Temporary Internet Files")
CTRLWIN(ID, CLOSE)

「INetCookies」を開く

INetCookies = Cookieフォルダー

UWSC
CONST ssfCOOKIES = 33

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOOKIES)
SLEEP(3.000)

DIM ID = GETID("INetCookies")
CTRLWIN(ID, CLOSE)

「History」を開く

UWSC
CONST ssfHISTORY = 34

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfHISTORY)
SLEEP(3.000)

DIM ID = GETID("History")
CTRLWIN(ID, CLOSE)

「ProgramData」を開く

UWSC
CONST ssfCOMMONAPPDATA = 35

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfCOMMONAPPDATA)
SLEEP(3.000)

DIM ID = GETID("ProgramData")
CTRLWIN(ID, CLOSE)

「Windows」フォルダを開く

UWSC
CONST ssfWINDOWS = 36

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfWINDOWS)
SLEEP(3.000)

DIM ID = GETID("Windows")
CTRLWIN(ID, CLOSE)

「System32」を開く

UWSC
CONST ssfSYSTEM = 37

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfSYSTEM)
SLEEP(3.000)

DIM ID = GETID("System32")
CTRLWIN(ID, CLOSE)

「Program Files」を開く

UWSC
CONST ssfPROGRAMFILES = 38

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfPROGRAMFILES)
SLEEP(3.000)

DIM ID = GETID("Program Files")
CTRLWIN(ID, CLOSE)

「ピクチャ」を開く

UWSC
CONST ssfMYPICTURES = 39

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfMYPICTURES)
SLEEP(3.000)

DIM ID = GETID("ピクチャ")
CTRLWIN(ID, CLOSE)

「ユーザーフォルダ」を開く

UWSC
CONST ssfPROFILE = 40

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfPROFILE)
SLEEP(3.000)

DIM WshShell = CREATEOLEOBJ("WScript.Shell")
DIM ID = GETID(WshShell.ExpandEnvironmentStrings("%USERNAME%"))
CTRLWIN(ID, CLOSE)

「SysWOW64」フォルダを開く

UWSC
CONST ssfSYSTEMx86 = 41

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfSYSTEMx86)
SLEEP(3.000)

DIM ID = GETID("SysWOW64")
CTRLWIN(ID, CLOSE)

「Windows 管理ツール」を開く

UWSC
CONST ssfPROGRAMFILESx86 = 48

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.Explore(ssfPROGRAMFILESx86)
SLEEP(3.000)

DIM ID = GETID("Windows 管理ツール")
CTRLWIN(ID, CLOSE)

関連記事

FSO.GetFolder メソッド
指定したパスのFolder オブジェクトを返します。
Folder オブジェクト
フォルダのすべてのプロパティにアクセスできます。
getFileList関数 (自作関数)
サブフォルダを含めたファイル一覧を配列で返します。
CreateFolders関数 (自作関数)
FSO.CreateFolderの改良版。親フォルダが存在しなくてもフォルダを作成できます。
IE.Navigate メソッド
URLまたは絶対パスで指定されたファイルを開きます。
FSO.GetExtensionName メソッド
指定したパスの最後のコンポーネントのファイル拡張子名を返します。
File.Path プロパティ (FSO)
指定したファイルのパスを返します。
getBitmap関数 (自作関数)
引数に指定したビットマップ画像のサイズ・幅・高さ・ビットの深さを配列で返します。
ShellLinkObject.Path プロパティ (Shell)
リンク オブジェクトへのパスを取得または設定します。
Folder オブジェクト
シェルフォルダを表します。