Como Ejecuto.. ??

08/10/2004 - 23:49 por Ricardo Contreras | Informe spam
Hola foro,..

Por favor si alguien sabe... ayuda...

Amigos.. tengo una tabla con una rutas de programas entre
ellos el del wordpad (esta tabla segun sistema operativo)
Luego Capturo en una variable el camino donde esta el
worpad.exe y quiero ejecutarlo

Public Ruta
Ejemplo
Store tabla.camino to Ruta && ruta del worpad

Ahora como ejecuto para que me habra el worpad y un
achivo...


Gracias...

Preguntas similare

Leer las respuestas

#1 Jorge Mota
08/10/2004 - 23:57 | Informe spam
si digamos
cRuta = "C:\windows\wordpad.exe"
Run /N7 "&cRuta"


Saludos

En , Ricardo Contreras escribió:

Hola foro,..

Por favor si alguien sabe... ayuda...

Amigos.. tengo una tabla con una rutas de programas entre
ellos el del wordpad (esta tabla segun sistema operativo)
Luego Capturo en una variable el camino donde esta el
worpad.exe y quiero ejecutarlo

Public Ruta
Ejemplo
Store tabla.camino to Ruta && ruta del worpad

Ahora como ejecuto para que me habra el worpad y un
achivo...


Gracias...








Jorge Mota
Microsoft Visual FoxPro MVP
Guatemala
Respuesta Responder a este mensaje
#2 Ricardo Contreras
09/10/2004 - 00:05 | Informe spam
Amigo Gracias... le agradesco viejito...
me funciono

Ojala leas esto ... sabes como ejecutarlo maximizado...
por que me ejecuta pero mini...



gracias...
Respuesta Responder a este mensaje
#3 ricardo contreas
09/10/2004 - 00:18 | Informe spam
jorge si puedes contestarme esto..

porque en modo ejecucion no mefunciona... es decir en
rutime si funciona pero en exe no ...

???
Respuesta Responder a este mensaje
#4 Luis María Guayán
09/10/2004 - 14:06 | Informe spam
Mira si este código te ayuda:

lcArc = GETFILE("TXT")
lcApp = AplicAsoc("WRI")
lcCmd = [RUN /N "] + lcApp + [" "] + lcArc + ["]
&lcCmd

*
* FUNCTION AplicAsoc(tcExt)
*
* Retorna la ruta y nombre completo de la
* aplicación asociada a al extensión del
* archivo pasado como parámetro
*
FUNCTION AplicAsoc(tcExt)
LOCAL lcArc, lcApp, ln, ll, lc
DECLARE LONG FindExecutable ;
IN SHELL32.DLL ;
STRING lpfile, ;
STRING lpdirectory, ;
STRING lpresult
lcArc = FORCEEXT(SYS(5)+CURDIR()+SYS(2015),tcExt)
ln = FCREATE(lcArc)
ll = FCLOSE(ln)
lc = SPACE(255)
lcApp = ""
IF FindExecutable(lcArc,"",@lc) >= 32
lcApp = SUBSTR(lc,1,AT(CHR(0),lc)-1)
ENDIF
IF FILE(lcArc)
DELETE FILE (lcArc)
ENDIF
RETURN lcApp
ENDFUNC
*

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

"ricardo contreas" escribió en el
mensaje news:2f6901c4ad84$b3f431b0$
jorge si puedes contestarme esto..

porque en modo ejecucion no mefunciona... es decir en
rutime si funciona pero en exe no ...

???


Respuesta Responder a este mensaje
#5 Ricador Contreras
11/10/2004 - 14:42 | Informe spam
Luis Maria
Muchas gracias me sirvio totalmente... gracias amigos...
Era lo que necesitava...
Con Ese codigo me quito el problemita de saber donde esta
instalado el wordpad y con que sistema operativo estoy
corriendo mi aplicacion para poder llamar el wordpad


Verdad ???


gracias
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida