VBScript拖放&；删除相对引用

我是VBScript新手，但在提出问题之前，我已经做了同样多的研究。我有一个脚本，当一个文件被放到图标上时，它会打开它，从同一文件夹中的另一个文件运行宏，然后关闭。我想做的是更改它，使宏的位置相对于VBScript文件，因为它将在不同的位置使用

Wscript.echo "Start analysis..." 
Set objArgs = Wscript.Arguments
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = False
xlApp.Workbooks.Open("C:\Users\user\Desktop\RT_Macro\macro")
xlApp.Workbooks.Open(objArgs(0))
xlApp.Run "'macro.xlsm'!analysis"
xlApp.Workbooks.Open("C:\Users\user\Desktop\RT_Macro\macro").Close
Wscript.echo "...Analysis complete"

我曾经尝试过使用GetAbsolutePathname在这个站点上使用其他示例，但不断出现错误，它找不到文件，目录是System32。

---

任何让它工作或整理的帮助都会很好。

尝试使用GetAbsolutePathname从本网站上的其他人那里获得的示例-失败的示例代码在哪里？vbscript文件的路径是什么？您应该能够使用文件夹遍历方法（“..”和“.”）查找相对于当前路径的路径。您是否可以解析
WScript.ScriptFullName
以获取路径？