Ubicación de un exe
Ingeniero García, como puedo determinar la ubicación de un exe en tiempo de ejecución.
1 Respuesta
Respuesta de Antonio Garcia
1
Esto puede ser simple si estas utilizando la version 8.x puesto que existe en esta una función llamada GetCurrentDirectory() esta función devuelve el directorio donde se encuentra ubicado el ejecutable, sin embargo si esto no fuera así y estuvieras utilizando una version inferior, la forma más sencilla es utilizar una función de API
Primero, hay que declarar la siguiente función externa:
Function uLong GetModuleFileName(Int hinstModule, Ref String lpszPath, uLong cchPath) Library "kernel32.dll"
Entonces añade el siguiente script. Date cuenta que pasando un nulo indica la aplicación actual (es decir, la tuya).
Puedes especificar otro EXE en ejecución para obtener su directorio (como por ejemplo, word.exe).
Integer li_RC
String la_AppPath, ls_Null
ls_AppPath = space(256)
SetNull (ls_Null)
li_RC = GetModuleFileName(ls_Null, ls_AppPath, 256)
If (li_RC = 0) Then ls_AppPath = ""
esto lo encontre en una pagina dedicada a power builder
Y claro funciona tal y como se tratare de la función GetCurrentDirectory().
Espero que esto pueda ser de utilidad para resolver tu problema
saludos
agdsys
Primero, hay que declarar la siguiente función externa:
Function uLong GetModuleFileName(Int hinstModule, Ref String lpszPath, uLong cchPath) Library "kernel32.dll"
Entonces añade el siguiente script. Date cuenta que pasando un nulo indica la aplicación actual (es decir, la tuya).
Puedes especificar otro EXE en ejecución para obtener su directorio (como por ejemplo, word.exe).
Integer li_RC
String la_AppPath, ls_Null
ls_AppPath = space(256)
SetNull (ls_Null)
li_RC = GetModuleFileName(ls_Null, ls_AppPath, 256)
If (li_RC = 0) Then ls_AppPath = ""
esto lo encontre en una pagina dedicada a power builder
Y claro funciona tal y como se tratare de la función GetCurrentDirectory().
Espero que esto pueda ser de utilidad para resolver tu problema
saludos
agdsys
