指定したパスの最後のコンポーネントのファイル拡張子名を返します。
- 構文
- FileSystemObject.GetExtensionName( path )
- 引数
- path
- 戻り値
プログラム実行例
パス名からファイル名・拡張子・ベース名・親フォルダを取得
DIM FSO = CREATEOLEOBJ("Scripting.FileSystemObject")
DIM path = "D:\Desktop\sample.txt"
WITH FSO
PRINT "ファイル名<#TAB>" + .GetFileName(path)
PRINT "ベース名<#TAB>" + .GetBaseName(path)
PRINT "拡張子<#TAB><#TAB>" + .GetExtensionName(path)
PRINT "親フォルダ<#TAB>" + .GetParentFolderName(path)
ENDWITH-
(1)
(5)
(6)
(7)
(8)
- 結果
ファイル名 sample.txt ベース名 sample 拡張子 txt 親フォルダ D:\Desktop
指定したフォルダ内の拡張子とファイルの種類を返す
DIM FSO = CREATEOLEOBJ("Scripting.FileSystemObject")
DIM folderspec = "D:\Desktop\"
DIM Files = FSO.GetFolder(folderspec).Files
FOR File IN Files
PRINT FSO.GetExtensionName(File.Name) + "：" + File.Type
NEXT-
(1)
(3)
- FSO.Folder.Files(3)
- FSO.Files.Item(5) (6) (6) (6)
