Печать

Расположение Broker.exe

Опубликовано в AmiBroker

Как получить путь к исполняемому файлу Аmibroker, в котором запущен скрипт?

Вариант с использованием VBScript: 

EnableScript("vbscript");


function AmibrokerPath()
{ local path,path1;

if ((path = StaticVarGetText("amibroker_full_path")) == "")
 { <%
 set GetPid = GetObject("winmgmts:\\.\root\cimv2:win32_process.Handle='" & CreateObject("WScript.Shell").Exec("rundll32 kernel32,Sleep").ProcessId & "'")
 set GetPath = GetObject("winmgmts:\\.\root\cimv2:win32_process.Handle='" & GetPid.ParentProcessId & "'")
 afl("path1") = GetPath.ExecutablePath 
 GetPid.Terminate
 %>
 StaticVarSetText("amibroker_full_path",path1);
 path = path1;
 }
 return path;
}

Недостаточно прав для комментирования