我正在尝试将Windows shell文件插入到将分析文件夹内容的文件夹中。
现在我想知道如何检测当前路径是哪条?即使用FileSystemObject放置vbs文件的位置?
设置objFSO = CreateObject(“Scripting.FileSystemObject”)
答案 0 :(得分:3)
Set objFS = CreateObject("Scripting.FileSystemObject")
WScript.Echo objFS.GetParentFolderName(WScript.ScriptFullName)
答案 1 :(得分:2)
你可以从WScript.ScriptFullName
获得。只需从末尾删除文件名(最后一个反斜杠后的位)。我通常使用JScript作为脚本,但IIRC VBScript有一个InStrRev
函数,可以帮助您找到最后一个反斜杠。或者:为File
路径创建WScript.ScriptFullName
对象,然后使用其ParentFolder
属性。像(未经测试)的东西:
Dim objFSO
Dim objFile
Dim objFolder
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(WScript.ScriptFullName)
Set objFolder = objFile.ParentFolder
答案 2 :(得分:1)
要仅在没有扩展名的情况下获取完整路径,我使用Replace(WScript.ScriptFullName, WScript.ScriptName, "")
来生成文件路径