How can you know the name of the exe-file you're executing?

[INFORMAT]

Now I use the function ADIR to get some information about our running exe-file 'student.exe':

dimension lExeInfo(1)
lProgName='student.exe'
=adir(lExeInfo,'&lProgName')
thisform.txtDatInstal.value=dtoc(lExeInfo[1,3])+' - '+lExeInfo[1,4]

To try things in the field before publishing it to the real users, I like to compile to a file name 'student1.exe'. In that case the upper code wil not work, because the exe-file name isn't 'student.exe' but 'student1.exe'...

I need VFP-code to use in my application to know the name of the exe-file that is currently executing. In that case I don't have to hard-code the variabel lProgName.

Who can help me?

 

[TomasDill]

Hi!

Use sys(16) function in the topmost program. For example, when your startup module in project is a program file 'main.prg', add following lines there:

public gcAppPath
gcAppName = JUSTFName(sys(16))

gcAppName variable will contain 'SOMEFILE.EXE' if your exe file named 'SOMEFILE' and you running it as standalone EXE application. If you run just 'main.prg' from development environment, you will get 'MAIN.FXP'

Note that you can get a full path to the application, that is useful too in many cases.

Vlad Grynchyshyn
vgryn@softserve.lviv.ua

http://www.softserve.lviv.ua

The professional level of programmer could be determined by level of stupidity of his/her bugs

 

[JimmyK]

Hi,
Does Application.Servername help. It returns full path VFP EXE.

Jimmy
Jimmy Le
nhan_tiags@yahoo.com

 

[JimmyK]

Hi,
Does Application.Servername help.? It returns full path VFP EXE.

Jimmy
Jimmy Le
nhan_tiags@yahoo.com