从完整文件路径中提取文件名

Question

在VBScript中如何单独从下面的路径中分离Test1_QTP文件夹名称。我需要将“Test1_QTP”字符串提取到变量中。

C:\TeamTask\Automation\Daily\EB\20140508\Test1_QTP

任何建议都表示赞赏。

Answer 1

如果指定的文件夹存在，则可以使用FileSystemObject对象而不是字符串操作：

strPath = "C:\TeamTask\Automation\Daily\EB\20140508\Test1_QTP"
Set fso = CreateObject("Scripting.FileSystemObject") 
strName = fso.GetFolder(strPath).Name

Answer 2

Dim strMyPath, strFileName
strMyPath = "C:\TeamTask\Automation\Daily\EB\20140508\Test1_QTP"
strFileName = Mid(strMyPath, InStrRev(strMyPath, "\") + 1)