Shell.FileRun メソッド

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

「ファイル名を指定して実行」ウィンドウを開きます。この方法は、[スタート]メニューを右クリックして「ファイル名を指定して実行」を選択するのと同じ効果があります。

構文
Shell.FileRun( )
引数
戻り値

開いたダイアログを取得

FileRunで開いたダイアログをGETIDで取得するプログラムです。

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.FileRun()

DIM ID = GETID("ファイル名を指定して実行", "#32770")

プログラム実行例

ファイル名を指定して実行で「ごみ箱」を開く

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.FileRun

DIM ID = GETID("ファイル名を指定して実行", "#32770")
SENDSTR(ID, "shell:RecycleBinFolder")
CLKITEM(ID, "OK", ITM_BTN)
解説

ファイルを開いているプロセスを調べる

UWSC
SETHOTKEY(VK_ESC, EMPTYPARAM, "forceQuit")

CONST TemporaryFolder = 2

DIM FSO = CREATEOLEOBJ("Scripting.FileSystemObject")

WITH FSO
	DIM Folder = .GetSpecialFolder(TemporaryFolder)
	DIM folderspec = Folder.Path
	DIM filename = .GetTempName
	DIM path = .BuildPath(folderspec, filename)
ENDWITH

DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.FileRun()

DIM ID = GETID("ファイル名を指定して実行", "#32770")

SENDSTR(ID, "cmd /c openfiles /query /fo CSV > " + path)
CLKITEM(ID, "OK", CLK_BTN)
SLEEP(0.500)

REPEAT
	SLEEP(0.100)
UNTIL GETID("C:\WINDOWS\system32\cmd.exe", "ConsoleWindowClass") = -1

DIM FID = FOPEN(path, F_READ)

TRY
	DIM ID2 = GETID("使用中", "OperationStatusWindow")

	GETITEM(ID2, ITM_ACCTXT, 1)
	DIM str = ALL_ITEM_LIST[1]
	
	DIM sep = IIF(POS("フォルダー", STATUS(ID2, ST_TITLE)) <> 0, "\", "")
	DIM msg = "■" + str + "<#CR>"
	
	FOR r = 5 TO FGET(FID, F_LINECOUNT)
		IF POS("\" + str + sep,  FGET(FID, r, 3)) <> 0 THEN
			msg = msg + "ID:" + FGET(FID, r, 1) + ", プロセス名:" + FGET(FID, r, 2) + "<#CR>"
		ENDIF
	NEXT
	FCLOSE(FID)

	REPEAT
		FUKIDASI(TRIM(msg))
		SLEEP(0.100)
	UNTIL GETID("使用中", "OperationStatusWindow") = -1
FINALLY
	FSO.DeleteFile(path)
ENDTRY

//////////////////////////////////////////////////
// 【引数】
//   
// 【戻り値】
//   
//////////////////////////////////////////////////
PROCEDURE forceQuit()
	EXITEXIT
FEND

//////////////////////////////////////////////////
// 【引数】
//   expr : 評価する式 
//   truepart : 評価した式がTrueのときに返す値 
//   falsepart : 評価した式がFalseのときに返す値 
// 【戻り値】
//   
//////////////////////////////////////////////////
FUNCTION IIF(expr, truepart, falsepart)
	IFB EVAL(expr) THEN
		RESULT = truepart
	ELSE
		RESULT = falsepart
	ENDIF
FEND
使用関数
解説

「ファイル名を指定して実行」でタスクマネージャーを起動

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application") 
Shell.FileRun()
ID = GETID("ファイル名を指定して実行")
SENDSTR(ID, "taskmgr")
CLKITEM(ID, "OK", CLK_BTN)

「ファイル名を指定して実行」で使用できるコマンド

コマンド プログラム
calc 電卓
charmap 文字コード表
dxdiag DirectX 診断ツール
eudcedit 外字エディタ
excel Microsoft Office Excel
firewall.cpl Windows Defender ファイアウォール
fxscover FAX 送付状エディター
joy.cpl ゲーム コントローラー
magnify 拡大鏡
mrt Microsoft Windows 悪意のあるソフトウェアの削除ツール
mspaint ペイント
narrator ナレーターの設定
notepad メモ帳
osk スクリーンキーボード
outlook Outlook
pbrush ペイント
powerpnt PowerPoint
UserAccountControlSettings ユーザー アカウント制御の設定
wmimgmt.msc WMIコントロール
wmplayer Windows Media Player
winword Microsoft Office Word
wordpad ワードパッド
write ワードパッド
コマンド パス
shell:ControlPanelFolder コントロール パネル\すべてのコントロール パネル項目
shell:AddNewProgramsFolder コントロール パネル\すべてのコントロール パネル項目\プログラムの取得
shell:AppUpdatesFolder インストールされた更新プログラム
shell:ChangeRemoveProgramsFolder コントロール パネル\すべてのコントロール パネル項目\プログラムと機能
shell:ConflictFolder コントロール パネル\すべてのコントロール パネル項目\同期センター\競合
shell:ConnectionsFolder コントロール パネル\すべてのコントロール パネル項目\ネットワーク接続
shell:PrintersFolder すべてのコントロール パネル項目\プリンター
shell:SyncCenterFolder shell:SyncCenterFolder
shell:SyncResultsFolder コントロール パネル\すべてのコントロール パネル項目\同期センター\同期結果
shell:SyncSetupFolder コントロール パネル\すべてのコントロール パネル項目\同期センター\同期のセットアップ
shell:AppData C:\Users\Username\AppData\Roaming
shell:Administrative Tools C:\Users\Username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Administrative Tools
shell:Cookies C:\Users\Username\AppData\Local\Microsoft\Windows\INetCookies
shell:NetHood C:\Users\Username\AppData\Roaming\Microsoft\Windows\Network Shortcuts
shell:PrintHood C:\Users\Username\AppData\Roaming\Microsoft\Windows\Printer Shortcuts
shell:Programs C:\Users\Username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs
shell:Recent C:\Users\Username\AppData\Roaming\Microsoft\Windows\Recent
shell:SendTo C:\Users\Username\AppData\Roaming\Microsoft\Windows\SendTo
shell:Start Menu C:\Users\Username\AppData\Roaming\Microsoft\Windows\Start Menu
shell:Startup C:\Users\Username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup
shell:Templates C:\Users\Username\AppData\Roaming\Microsoft\Windows\Templates
shell:Quick Launch C:\Users\Username\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch
shell:User Pinned C:\Users\Username\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned
shell:Local AppData C:\Users\Username\AppData\Local
shell:Cache C:\Users\Username\AppData\Local\Microsoft\Windows\INetCache
shell:CD Burning C:\Users\Username\AppData\Local\Microsoft\Windows\Burn\Burn
shell:History C:\Users\Username\AppData\Local\Microsoft\Windows\History
shell:Common AppData C:\ProgramData
shell:Common Templates C:\ProgramData\Microsoft\Windows\Templates
shell:Common Start Menu C:\ProgramData\Microsoft\Windows\Start Menu
shell:Common Startup C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp
shell:Common Programs C:\ProgramData\Microsoft\Windows\Start Menu\Programs
shell:Common Administrative Tools C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Administrative Tools
shell:ProgramFiles C:\Program Files (x86)
shell:ProgramFilesCommon C:\Program Files (x86)\Common Files
shell:Common Desktop C:\Users\Public\Desktop
shell:Common Documents C:\Users\Public\Documents
shell:CommonDownloads C:\Users\Public\Downloads
shell:CommonMusic C:\Users\Public\Music
shell:CommonPictures C:\Users\Public\Pictures
shell:CommonVideo C:\Users\Public\Videos
shell:Libraries ライブラリ
shell:UsersLibrariesFolder ライブラリ
shell:DocumentsLibrary ライブラリ\ドキュメント
shell:MusicLibrary ライブラリ\ミュージック
shell:PicturesLibrary ライブラリ\ピクチャ
shell:VideosLibrary ライブラリ\ビデオ
shell:UserProfiles C:\Users
shell:Profile C:\Users\Username
shell:UsersFilesFolder C:\Users\Username
shell:Contacts C:\Users\Username\Contacts
shell:Downloads ダウンロード
shell:Favorites C:\Users\Username\Favorites
shell:Links C:\Users\Username\Links
shell:My Music ミュージック
shell:My Pictures ピクチャ
shell:My Video ビデオ
shell:Personal ドキュメント
shell:SavedGames C:\Users\Username\Saved Games
shell:Searches C:\Users\Username\Searches
shell:Public C:\Users\Public
shell:SampleMusic C:\Users\Public\Music\Sample Music
shell:SamplePictures C:\Users\Public\Pictures\Sample Pictures
shell:SampleVideos C:\Users\Public\Videos\Sample Videos
shell:Windows C:\Windows
shell:Fonts C:\Windows\Fonts
shell:ResourceDir C:\Windows\Resources
shell:System C:\Windows\System32
shell:Desktop デスクトップ
shell:HomeGroupFolder ホームグループ
shell:MyComputerFolder PC
shell:NetworkPlacesFolder ネットワーク
shell:RecycleBinFolder ごみ箱
shell:SearchHomeFolder search-ms: