Ruta del ejecutable

Hola Carlos ... existen diversas formas ..

Con el API ...

DECLARE integer GetModuleFileName IN WIN32API ;
integer hinst,;
string @lpszFilename,;
integer @cbFileName

lcFilename=Space(256)
lnBytes%5

=GetModuleFileName(0,@lcFileName,@lnBytes)

lnBytes=AT(CHR(0),lcFileName)
IF lnBytes > 1
lcFileName=SUBSTR(lcFileName,1,lnBytes-1)
ELSE
lcFileName=""
ENDIF

?lcFileName
-

? _VFP.fullname


y Con la función Sys(16)
David Amador Tapia
Webmaster de "La Web de Davphantom"
www.davphantom.cjb.net
Cartagena. Colombia
Tel (5) 6621502 - 6581523

"Carlos Rene Acevedo" escribió en el mensaje
news:

Amigos, con que funcion puede devolver la ruta donde se encuentra el
ejecutable de mia aplicacion,

por ejemplo si yo tengo una aplicacion copiada en c:\windows y estando en

el

directorio c:\prueba digito miaplicacion.exe me corre ya que como esta
copiada en c:\windows el path hacia alli hace que corra, necesito que me
retorne c:\windows y no c:\prueba con curdir() me retorna c:\prueba,


muchas gracias