windows - Windowsシェル-スクリプトファイルが配置されている現在の場所を検出する方法は？

Question

フォルダの内容を分析するフォルダに挿入されるWindowsシェルファイルを試しています。

現在のパスを検出するにはどうすればよいですか？つまり、FileSystemObjectを使用してvbsファイルが配置される場所ですか？

Set objFSO = CreateObject（ "Scripting.FileSystemObject"）

Answer 1

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

Answer 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

Answer 3

拡張子なしでのみフルパスを取得するにReplace(WScript.ScriptFullName, WScript.ScriptName, "")は、ファイルパスを作成するために使用します