FiveTech Support Forums

Hi to all,
I have to know if "myprogram" is already running in other sessions in a server.
Is it possible?
If a Open Task Manager and I click show processes from all users I can have this info.

I need to perform this control at the beginning of myprogram.
to ensure that myprogram is running twice in the same server.

Now I perform this control at the beginning

IF FindWindow( 0 , "myprogram" ) <> 0
RETURN NIL
ENDIF

Is it possible?

Many thanks
Marco

Marco,

Surely there may be other ways, but these are a few ways:

1. Try to open the EXE file in exclusive mode. If you can't, then it is already in use.

2. The EXE generates a file in disk. If this file exists, then the app is running.

Option 1 seems better

Excellent idea
Many thanks!

Marco

The problem with option 2 is that the app may have crashed and the file remains as not deleted.

Thats why option 1 seems as the better one

Antonio Linares wrote:Marco,

Surely there may be other ways, but these are a few ways:

1. Try to open the EXE file in exclusive mode. If you can't, then it is already in use.

2. The EXE generates a file in disk. If this file exists, then the app is running.

Option 1 seems better

Hi Antonio,

How to open the EXE file exclusive mode? Can you explain more?

Thanks

Hakan,

In harbour\include\fileio.ch there is a FO_EXCLUSIVE define that can be used as a flag for FOpen().

Here it is explained how to use it:
http://www.fivetechsoft.com/harbour-docs/harbour-reference-guide.htm#FOpen

Marco,

dbmanfwh wrote:Marco,

Code (fw): Select all Collapse

IF IsExeRunning( cFilename( GetModuleFileName( GetInstance() ) ) )
   RETURN NIL
ENDIF

Hi,

Is this syntax valid for network?

HaKan,

When installs program on each computer and shares data, is not possible and
When share program and the data in network, is possible.

If I open exe in this way it works
FOPEN( "cic_spi.exe" , FO_READWRITE )

in this way not
FOPEN( "cic_spi.exe" , FO_EXCLUSIVE )

because I can open exe even if it is already running

Best regards
Marco