Pequeña duda

[jrestojeda]

Hola a todos.
Tengo una pequeña duda.
Como debo hacer para que una aplicación no se pueda ajecutar más de una vez al mismo tiempo?

Porbé con lo siguiente:

SET MULTIPLE OFF

Pero no me ha funcionado.

Desde ya muchas gracias.
Saludos, Esteban.

[karinha]

Code: Select all

FUNCTION MAIN()

    SET DATE BRITISH
    SET EPOCH TO 1950
    SET CENTURY ON
    SET SOFTSEEK OFF
    SET WRAP ON
    SETCANCEL( .F. )
    SET CONFIRM OFF
    SET DELETED ON
    SET ESCAPE OFF
    SET EXCLUSIVE OFF
    SET MULTIPLE OFF

    REQUEST DBFCDX
    RDDSETDEFAULT("DBFCDX")
    DBSETDRIVER("DBFCDX")

    IF ISEXERUNNING( CFILENAME( HB_ARGV( 0 ) ) )
        __Quit()
    ENDIF

...

[jrestojeda]

Karina.
Gracias por tu ayuda!!.
Saludos.