.acsauto 脚本保存到相对文件路径

Question

我有一个来自 Avaya CMS 系统的 .acsauto 脚本，它正在将数据保存到指定位置的文本文件中：

b = cvsSrv.Reports.CreateReport(Info,Rep)
           If b Then        
           stuff
           b = Rep.ExportData("C:\Long\File\Path\report.txt", 59, 0, True, True, True)

有没有办法使这个地址相对于 .ascauto 脚本位置，以便创建报告，例如在它的旁边？脚本语言应该是 VB 或 VBScript - 没有人知道该系统能够告诉我 - 但我什至无法用字符串替换直接引用（报告似乎运行，只是没有保存到想要的位置）

strFilePath = "C:\Long\File\Path\report.txt"
b = Rep.ExportData(strFilePath, 59, 0, True, True, True)

Answer 1

通过此代码更改解决：

dim fso, strPath
set fso = CreateObject("Scripting.FileSystemObject")
B = ...
     strPath = fso.GetAbsolutePathName("report.txt")
     b = Rep.ExportData(strPath, 59, 0, True, True, True)

.acsauto 脚本保存到相对文件路径

.acsauto script to save to relative filepath

vb.net

vbscript

avaya