topic-9059

Posts: 113

Joined: Wed Jan 10, 2007 08:43 PM

nro de instancias de un exe
Posted: Mon Dec 03, 2007 03:07 PM

Hola:
Cómo puedo evitar que un ejecutable se cargue dos o más veces en memoria?. Que solamente me permita mantener una instancia a la vez.
Gracias.

David Lagos S.
Coquimbo-Chile
www.wificafe.cl
webmaster@wificafe.cl

ADBLANCO

Posts: 299

Joined: Mon Oct 22, 2007 03:03 PM

nro de instancias de un exe
Posted: Mon Dec 03, 2007 03:16 PM

Puedes almacenar un archivo temporal en el disco de la estación (si no existe, lo creas),El cual bloqueas exclusivo cuando entras, si no te permite bloquearlo, es que ya está siendo utilizado (ya activastes una vez)

Se que es un poco primitivo, pero trabaja para mi.

Saludos

Angel, Valencia, Venezuela

xH .997 - FW 7.9 - BCC55 - WorkShop - MySql

Biel EA6DD

Posts: 682

Joined: Tue Feb 14, 2006 09:48 AM

nro de instancias de un exe
Posted: Mon Dec 03, 2007 03:37 PM

Code: Select all Collapse

   IF IsExeRunning(cFileName(GetModuleFileName(GetInstance())))   //cFileName(HB_ARGV(0))
      MsgStop("Programa ya se está ejecutando!"+CRLF+CRLF+"Este programa no permite multiples instancias!")
      QUIT
   ENDIF

Saludos desde Mallorca
Biel Maimó
http://bielsys.blogspot.com/

cuatecatl82

Posts: 625

Joined: Wed Mar 14, 2007 06:49 PM

nro de instancias de un exe
Posted: Mon Dec 03, 2007 03:39 PM

Saludos metaldrummer:

Hazlo más facil, agrega estas líneas en tu codifo fuente:

Function Main()

IF IsExeRunning( cFileName( HB_ARGV(0) ) )
MsgStop( "¡¡¡ ERROR CRITICO !!!"+CRLF+CRLF+"No es posible cargar más de 1 copia del Programa en su PC "+","Mensaje del Sistema")
QUIT
ENDIF

Return nil

Probado , asì no usas ninguna variable que cualquier usuario "escurridiso" pueda modificar y entrar cuantas veces quiera..

Espero te sirva.

Saludos...

I.S.C. Victor Daniel Cuatecatl Leon
Soluciones y Desarrollo de Software Empresarial

www.sisa.unlugar.com

Soluciones y Diseño de Software
Damos Soluciones...

I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos

http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon

metaldrummer

Posts: 113

Joined: Wed Jan 10, 2007 08:43 PM

nro de instancias de un exe
Posted: Tue Dec 04, 2007 05:46 PM

gracias por las respuestas!!!!
funciona de mil maravillas.
Saludos
Consultas sobre ado soy todo oídos
Mil gracias nuevamente

David Lagos S.
Coquimbo-Chile
www.wificafe.cl
webmaster@wificafe.cl

FiveTech Support Forums

Continue the discussion