strTarget = "C:\WINDOWS\notepad.exe"

if Fso.FileExists( strTarget ) then
	WScript.Echo strTarget & " は存在します"
	WScript.Quit
else
	if Fso.FolderExists( strTarget ) then
		WScript.Echo strTarget & " はディレクトリです"
		WScript.Quit
	end if
end if

WScript.Echo strTarget & " は存在しません"

strTarget = "C:\WINDOWS\notepad.exe"

' 1) notepad.exe
WScript.Echo Fso.GetFileName( strTarget )

' 2) C:\WINDOWS
WScript.Echo Fso.GetParentFolderName( strTarget )

' 3) notepad
WScript.Echo Fso.GetBaseName( strTarget )

' 4) exe
WScript.Echo Fso.GetExtensionName( strTarget )

' 5) C:
WScript.Echo Fso.GetDriveName( strTarget )