当前位置：文江博客话题详情

windows shell - 如何检测当前放置脚本文件的位置？

发布于 2024-08-22 06:06:24 字数 168 浏览 4 评论 0原文

我正在尝试将 Windows shell 文件插入到将分析文件夹内容的文件夹中。

现在我想知道如何检测当前路径？即使用 FileSystemObject 放置 vbs 文件的位置？

设置 objFSO = CreateObject("Scripting.FileSystemObject")

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

情绪 2024-08-29 06:06:24

Set objFS = CreateObject("Scripting.FileSystemObject")
WScript.Echo objFS.GetParentFolderName(WScript.ScriptFullName)

Set objFS = CreateObject("Scripting.FileSystemObject")
WScript.Echo objFS.GetParentFolderName(WScript.ScriptFullName)

回复收藏 0 原文

打小就很酷 2024-08-29 06:06:24

您可以从 WScript.ScriptFullName。只需从末尾删除文件名（最后一个反斜杠后面的位）。我通常使用 JScript 编写脚本，但 IIRC VBScript 有一个 InStrRev 函数，可以帮助您找到最后一个反斜杠。或者：为 WScript.ScriptFullName 路径创建一个 File 对象，然后使用其 ParentFolder 属性。像（未经测试）的东西：

Dim objFSO
Dim objFile
Dim objFolder

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(WScript.ScriptFullName)
Set objFolder = objFile.ParentFolder

You can get that from WScript.ScriptFullName. Just remove the filename from the end (the bit after the last backslash). I normally use JScript for scripts, but IIRC VBScript has an InStrRev function that will help you find the last backslash. Or: Create a File object for the WScript.ScriptFullName path and then use its ParentFolder property. Something like (untested):

Dim objFSO
Dim objFile
Dim objFolder

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(WScript.ScriptFullName)
Set objFolder = objFile.ParentFolder

回复收藏 0 原文