WSH/ファイルかフォルダーのどちらであるかを判定する
の編集
Top
/
WSH
/
ファイルかフォルダーのどちらであるかを判定する
[
トップ
] [
編集
|
差分
|
バックアップ
|
添付
|
リロード
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
-- 雛形とするページ --
(no template pages)
#navi(../) * ファイルかフォルダーのどちらであるかを判定する [#j4dcac4c] FileSystemObjectのFolderExistsメソッド, FileExistsメソッドの2つを使用して、引数で指定されたファイルまたはフォルダーがファイルなのかフォルダーなのかを判別するVBScriptサンプルコードを作成しました。~ 以下にVBScriptで作成したサンプルコードと実行結果について記します。 #contents #htmlinsertpcsp(win-top.html,win-sp.html) * 関連記事 [#s8419a82] -[[ファイルの存在チェックを行う・FileExists>WSH/ファイルの存在チェックを行う・FileExists]] -[[フォルダの存在チェックを行う・FolderExists>WSH/フォルダの存在チェックを行う・FolderExists]] -[[WSHで引数を取得する方法・Arguments・Named, Unnamed>WSH/WSHで引数を取得する方法・Arguments・Named, Unnamed]] * FolderExistsメソッド, FileExistsメソッドを利用したファイル/フォルダー判別スクリプト [#ze9312e1] #ref(FileOrFolder.vbs) 1: Set oArgs = WScript.Arguments 2: 3: If oArgs.Count <> 1 Then 4: WScript.Echo "Usage : " & WScript.ScriptName & " <file or folder path>" 5: WScript.Quit 6: End If 7: 8: Set fso = CreateObject("Scripting.FileSystemObject") 9: If fso.FolderExists(oArgs(0)) Then 10: WScript.Echo oArgs(0) & " is folder." 11: ElseIf fso.FileExists(oArgs(0)) Then 12: WScript.Echo oArgs(0) & " is file." 13: Else 14: WScript.Echo oArgs(0) & " is unknown or nothing." 15: End If 16: 17: Set fso = Nothing 18: Set oArgs = Nothing 本スクリプトは引数で渡された文字列がファイルまたはフォルダーのどちらであるかを判別しています。~ 3行目から6行目までは引数の数に誤りがある場合、Usageメッセージを表示して終了しています。~ 8行目から15行目にFolderExistsメソッド, FileExistsメソッドを利用して、ファイルまたはフォルダーの判別をしています。 * サンプルスクリプトの実行結果 [#ad88f72e] 以下に上記のVBScriptサンプルコードの実行結果を記します。 - 引数をあたえていない場合 C:\wsh>cscript /nologo FileOrFolder.vbs Usage : FileOrFolder.vbs <file or folder path> - 引数にC:\windowsをあたえた場合 C:\wsh>cscript /nologo FileOrFolder.vbs c:\windows c:\windows is folder. - 引数に本スクリプトをあたえた場合 C:\wsh>cscript /nologo FileOrFolder.vbs FileOrFolder.vbs FileOrFolder.vbs is file. - 引数に存在しないファイル(フォルダー)をあたえた場合 C:\wsh>cscript /nologo FileOrFolder.vbs d:\hoge.txt d:\hoge.txt is unknown or nothing. #htmlinsertpcsp(win-btm.html,win-sp.html)
タイムスタンプを変更しない
#navi(../) * ファイルかフォルダーのどちらであるかを判定する [#j4dcac4c] FileSystemObjectのFolderExistsメソッド, FileExistsメソッドの2つを使用して、引数で指定されたファイルまたはフォルダーがファイルなのかフォルダーなのかを判別するVBScriptサンプルコードを作成しました。~ 以下にVBScriptで作成したサンプルコードと実行結果について記します。 #contents #htmlinsertpcsp(win-top.html,win-sp.html) * 関連記事 [#s8419a82] -[[ファイルの存在チェックを行う・FileExists>WSH/ファイルの存在チェックを行う・FileExists]] -[[フォルダの存在チェックを行う・FolderExists>WSH/フォルダの存在チェックを行う・FolderExists]] -[[WSHで引数を取得する方法・Arguments・Named, Unnamed>WSH/WSHで引数を取得する方法・Arguments・Named, Unnamed]] * FolderExistsメソッド, FileExistsメソッドを利用したファイル/フォルダー判別スクリプト [#ze9312e1] #ref(FileOrFolder.vbs) 1: Set oArgs = WScript.Arguments 2: 3: If oArgs.Count <> 1 Then 4: WScript.Echo "Usage : " & WScript.ScriptName & " <file or folder path>" 5: WScript.Quit 6: End If 7: 8: Set fso = CreateObject("Scripting.FileSystemObject") 9: If fso.FolderExists(oArgs(0)) Then 10: WScript.Echo oArgs(0) & " is folder." 11: ElseIf fso.FileExists(oArgs(0)) Then 12: WScript.Echo oArgs(0) & " is file." 13: Else 14: WScript.Echo oArgs(0) & " is unknown or nothing." 15: End If 16: 17: Set fso = Nothing 18: Set oArgs = Nothing 本スクリプトは引数で渡された文字列がファイルまたはフォルダーのどちらであるかを判別しています。~ 3行目から6行目までは引数の数に誤りがある場合、Usageメッセージを表示して終了しています。~ 8行目から15行目にFolderExistsメソッド, FileExistsメソッドを利用して、ファイルまたはフォルダーの判別をしています。 * サンプルスクリプトの実行結果 [#ad88f72e] 以下に上記のVBScriptサンプルコードの実行結果を記します。 - 引数をあたえていない場合 C:\wsh>cscript /nologo FileOrFolder.vbs Usage : FileOrFolder.vbs <file or folder path> - 引数にC:\windowsをあたえた場合 C:\wsh>cscript /nologo FileOrFolder.vbs c:\windows c:\windows is folder. - 引数に本スクリプトをあたえた場合 C:\wsh>cscript /nologo FileOrFolder.vbs FileOrFolder.vbs FileOrFolder.vbs is file. - 引数に存在しないファイル(フォルダー)をあたえた場合 C:\wsh>cscript /nologo FileOrFolder.vbs d:\hoge.txt d:\hoge.txt is unknown or nothing. #htmlinsertpcsp(win-btm.html,win-sp.html)
テキスト整形のルールを表示する
添付ファイル:
FileOrFolder.vbs
819件
[
詳細
]