GetExtensionName 方法
返回字符串，该字符串包含路径最后一个组成部分的扩展名。
object.GetExtensionName(path)
参数
object
必选项。应为 FileSystemObject 的名称。
path
必选项。指定路径，用于返回其组成部分的扩展名。
说明
对于网络驱动器，根目录 (\) 也认为是一个组成部分。
如果路径组成部分与 path 参数不匹配，则 GetExtensionName 方法返回零长度字符串 ("")。
下面例子举例说明如何使用 GetExtensionName 方法：
Function GetAnExtension(DriveSpec) Dim fso Set fso = CreateObject("Scripting.FileSystemObject") GetAnExtension = fso.GetExtensionName(Drivespec)End Function