.acsautoスクリプト

Question

：

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)