vbs提取文件名不含后缀
Dim pos
pos = InStrRev(sFileName, ".")
GetFileTitle = Left(sFileName, pos - 1)
先用InStrRev函数取得点分隔符的位置,再用left取得文件名
vbs提取文件名不含后缀
Dim pos
pos = InStrRev(sFileName, ".")
GetFileTitle = Left(sFileName, pos - 1)
先用InStrRev函数取得点分隔符的位置,再用left取得文件名