Valor en ejecucion

Post Reply
servicomver
Posts: 193
Joined: Fri Nov 18, 2005 7:34 pm

Valor en ejecucion

Post by servicomver »

Hola, como puedo hacer que un exe pueda distinguir por una variable la ruta de uso ? por ejemplo
CAJA.EXE 2
c\dastos2\

necesito que ese 2 lo tome en cuenta ("lea") el programa y sepa que el subdirectorio de trabajo y bases de datos corresponden al almacén 2-

CAJA.EXE 3
este tome otro directorio por ejemplo c:\datos3\

Como tomo o recupero esos números en cada caso (2 o 3) ???
Para que el programa CAJA.EXE lo use (CAJA.EXE sería el mismo programa)

Espero haberme explicado correctamente, gracias
User avatar
leandro
Posts: 1744
Joined: Wed Oct 26, 2005 2:49 pm
Location: Colombia
Has thanked: 34 times
Been thanked: 10 times
Contact:

Re: Valor en ejecucion

Post by leandro »

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 24.09 ] [ xHarbour 64 bits) ]
User avatar
Armando
Posts: 3271
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México
Been thanked: 2 times
Contact:

Re: Valor en ejecucion

Post by Armando »

Servicom:

A ver si esto es lo que necesitas?

Code: Select all | Expand


MsgInfo( cFilePath(GetModuleFileName(GetInstance())) )
 


Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
cmsoft
Posts: 1297
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina
Been thanked: 2 times

Re: Valor en ejecucion

Post by cmsoft »

Code: Select all | Expand

FUNCTION Main(cParametro)
DO CASE
   CASE cParametro= "2"
        cPath := "C:\DATOS2"
   CASE cParametro= "3"
        cPath := "C:\DATOS3"
   OTHERWISE
        MsgStop("Debe pasar el parametro","Error")
       RETURN nil  
ENDCASE
....
 

Después puedes llamar a CAJA.EXE 2 o CAJA.EXE 3 y segun el caso tener el path de tus datos.
Post Reply