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

时间:2016-08-31 14:07:49

标签: vb.net vbscript avaya

我有一个来自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)

1 个答案:

答案 0 :(得分:1)

已解决此代码更改:

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