Saber que programa se esta usando

Muchas Gracias voy a probar ambas opciones

Señor David,
He probado su código, pero cuando lo pregunto la primera vez me funciona
bien pero después cierro el programa y me sigue diciendo que esta abierto,
apesar de que ya lo he cerrado.

Ej.:
cAr = Fopen("C:\Archivos de programa\Microsoft
Office\Office10\WINWORD.EXE",12)
If cAr = -1
? "Archivo Abierto"
ELSE
?'NO'
ENDIF
El me informa que esta abierto cuando en realidad esta cerrado, y no se esta
ejecutando en ningun lado...

Gracias por su comentarios...


"Victor Espina" escribió en el mensaje
news:%

En mi sitio web hay un archivo llamado WP1.ZIP el cual contiene una DLL y
unas funciones en VFP que te permiten obtener un listado de los procesos
activos en el computador. Como cada proceso es identificado con el nombre
del ejecutable, puedes buscar en esa lista para determinar si un

programado

dado está en ejecución o no. Incluso podrías terminar dicho programa en
forma programática.

Saludos

Victor Espina
http://victorespina.coolfreepages.com


"Oscar Portorreal" wrote in message
news:%
> Saludos a todos
>
> Estoy trabajando en un Sistema para un cyber café, lo que me gustaría
saber
> es como detectar si un usuario esta utilizando un determinado programa

en

> especial cuando usa el Internet Explorer, si hay alguna función o API

para

> esto..
> Gracias por la ayuda que me puedan brindar...
>
> Santo Domingo, Republica Dominicana
>
>

Seria mucho pedir, que me enviaran un código de ejemplo
lo agradecería mucho




"Luis María Guayán" escribió en el mensaje
news:%

Falta un FCLOSE()

Mira la ayuda de los comandos FOPEN() y FCLOSE()

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Oscar Portorreal" escribió en el mensaje
news:%
> Señor David,
> He probado su código, pero cuando lo pregunto la primera vez me funciona
> bien pero después cierro el programa y me sigue diciendo que esta

abierto,

> apesar de que ya lo he cerrado.
>
> Ej.:
> cAr = Fopen("C:\Archivos de programa\Microsoft
> Office\Office10\WINWORD.EXE",12)
> If cAr = -1
> ? "Archivo Abierto"
> ELSE
> ?'NO'
> ENDIF
> El me informa que esta abierto cuando en realidad esta cerrado, y no se
esta
> ejecutando en ningun lado...
>
> Gracias por su comentarios...
>
>
> "Victor Espina" escribió en el mensaje
> news:%
> > En mi sitio web hay un archivo llamado WP1.ZIP el cual contiene una

DLL

y
> > unas funciones en VFP que te permiten obtener un listado de los

procesos

> > activos en el computador. Como cada proceso es identificado con el
nombre
> > del ejecutable, puedes buscar en esa lista para determinar si un
> programado
> > dado está en ejecución o no. Incluso podrías terminar dicho programa

en

> > forma programática.
> >
> > Saludos
> >
> > Victor Espina
> > http://victorespina.coolfreepages.com
> >
> >
> > "Oscar Portorreal" wrote in message
> > news:%
> > > Saludos a todos
> > >
> > > Estoy trabajando en un Sistema para un cyber café, lo que me

gustaría

> > saber
> > > es como detectar si un usuario esta utilizando un determinado

programa

> en
> > > especial cuando usa el Internet Explorer, si hay alguna función o

API

> para
> > > esto..
> > > Gracias por la ayuda que me puedan brindar...
> > >
> > > Santo Domingo, Republica Dominicana
> > >
> > >
> >
> >
>
>

Gracias por su ayuda, me funcione de la siguiente forma:
cAr = Fopen("C:\Archivos de programa\Internet Explorer\IEXPLORE.EXE",12)
If car= - 1
? "Archivo Abierto"
ELSE
üLOSE(car)
?'NO'
ENDIF
RETURN car







"Luis María Guayán" escribió en el mensaje
news:%

Falta un FCLOSE()

Mira la ayuda de los comandos FOPEN() y FCLOSE()

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Oscar Portorreal" escribió en el mensaje
news:%
> Señor David,
> He probado su código, pero cuando lo pregunto la primera vez me funciona
> bien pero después cierro el programa y me sigue diciendo que esta

abierto,

> apesar de que ya lo he cerrado.
>
> Ej.:
> cAr = Fopen("C:\Archivos de programa\Microsoft
> Office\Office10\WINWORD.EXE",12)
> If cAr = -1
> ? "Archivo Abierto"
> ELSE
> ?'NO'
> ENDIF
> El me informa que esta abierto cuando en realidad esta cerrado, y no se
esta
> ejecutando en ningun lado...
>
> Gracias por su comentarios...
>
>
> "Victor Espina" escribió en el mensaje
> news:%
> > En mi sitio web hay un archivo llamado WP1.ZIP el cual contiene una

DLL

y
> > unas funciones en VFP que te permiten obtener un listado de los

procesos

> > activos en el computador. Como cada proceso es identificado con el
nombre
> > del ejecutable, puedes buscar en esa lista para determinar si un
> programado
> > dado está en ejecución o no. Incluso podrías terminar dicho programa

en

> > forma programática.
> >
> > Saludos
> >
> > Victor Espina
> > http://victorespina.coolfreepages.com
> >
> >
> > "Oscar Portorreal" wrote in message
> > news:%
> > > Saludos a todos
> > >
> > > Estoy trabajando en un Sistema para un cyber café, lo que me

gustaría

> > saber
> > > es como detectar si un usuario esta utilizando un determinado

programa

> en
> > > especial cuando usa el Internet Explorer, si hay alguna función o

API

> para
> > > esto..
> > > Gracias por la ayuda que me puedan brindar...
> > >
> > > Santo Domingo, Republica Dominicana
> > >
> > >
> >
> >
>
>

Puedes hacer de forma muy facil intentando abrir el archivo con FOPEN o
buscando la ventana con API ...

cAr = Fopen("rutadeprograma",12)

If cAr = -1
? "Archivo Abierto"
endif


David Amador Tapia
WebMaster de La Web de Davphantom
www.davphantom.net
Cartagena. Colombia
Tel. (5) 6581523 - 6621502 - Cel 310-6581865


"Oscar Portorreal" escribió en el mensaje
news:%

Saludos a todos

Estoy trabajando en un Sistema para un cyber café, lo que me gustaría

saber

es como detectar si un usuario esta utilizando un determinado programa en
especial cuando usa el Internet Explorer, si hay alguna función o API para
esto..
Gracias por la ayuda que me puedan brindar...

Santo Domingo, Republica Dominicana