如何删除VBS中“blah \ bleurgh \ filename.txt”中的“filename.txt”？

Question

我知道这个愚蠢的问题，但我想删除字符串中的文件名，例如

"blah\bleurgh\filename.txt"

删除我要做的扩展程序

strFile = Left(strFile, InStrRev(strFile, ".") - 1)

但是类似于删除最后的文件名却没有任何作用，例如。

tempStrFile = Left(tempStrFile, InStrRev(tempStrFile, "\") - 1)

“\\”也不起作用，因为它是一个转义字符问题。

非常感谢！

编辑：有关更多信息，我想要做的是如果给出一个文件名，例如“filename.txt”我想输出“output_filename.csv” - 我对此没有任何问题。

如果我得到一个目录，例如“blah \ filename.txt”，我很难在中间插入输出以获得“blah \ output_filename.csv”

Answer 1

如果我理解你想要什么，那么你的代码对我有用，代码如下：

dim tempStrFile
tempStrFile = "blah\bleurgh\filename.txt"
tempStrFile = Left(tempStrFile, InStrRev(tempStrFile, "\") - 1)
tempStrFile = tempStrFile & "\output_filename.csv"
msgbox tempStrFile

将输出我相信的blah\bleurgh\output_filename.csv。