Como pasar parametros a un exe externo

Post Reply
User avatar
J. Ernesto
Posts: 140
Joined: Tue Feb 03, 2009 10:08 pm
Location: Bogotá D.C. Colombia
Contact:

Como pasar parametros a un exe externo

Post by J. Ernesto »

Antonio, Daniel, Compañeros del foro.

Con cual función se puede llamar a un programa ejectable externo desde fivewin y pasar una serie de párametros de diferentes tipo.

Resulta que el primer parametro en una descripcion de un producto y cada palabra va separada por un espacio en blanco, y el programa que lo recibe intepreta cada palabra como un parametro, la pregunta esta en como pasar este tipo de string en una sola variable.

Gracias
Last edited by J. Ernesto on Tue Oct 25, 2011 4:05 pm, edited 1 time in total.
J. Ernesto Pinto Q.
Fivewin 1905 + BCC++ 700 + Harbour 3.20 + LopeEdit 5.8 + UEstudio 26.0
jepsys@hotmail.com, jepsys@gmail.com, jepsys@yahoo.com
luisduque
Posts: 133
Joined: Mon May 12, 2008 4:13 pm
Location: Venezuela
Contact:

Re: Como pasar parametros a un exe externo

Post by luisduque »

Hola



cPara := " " + P1 + " " + P2 + " " + P3
cExec := cFilePath(GetModuleFileName(GetInstance()))+"Programa.exe"
ShellExecute( 0, "Open", cExec, cPara, 0, 1 )


Espero te sirva asi lo uso y funciona perfecto
Fivewin 16.11
Harbour 3.2.0
Visual Studio 2015 community
MariaDb/MySql

Ing. MSc. Luis Duque
http://www.accasoft.net
servicomver
Posts: 159
Joined: Fri Nov 18, 2005 7:34 pm

Re: Como pasar parametros a un exe externo

Post by servicomver »

No me quedó muy claro, por ejemplo de un inicio:
CAJA.EXE 2 ---->¿Que debo de hacer para que ese 2 se guarde en algún lado o lo pueda recoger después dentro del mismo programa CAJA.EXE ?

debo declararla como algún tipo de variable ?

Gracias
puenteda
Posts: 19
Joined: Thu Oct 02, 2014 3:51 am

Re: Como pasar parametros a un exe externo

Post by puenteda »

Ernesto:

winexec( (wPathB)+"\PFBATCH /c:1 /i:"+cticket+'.cmd'+' /o:'+cticket+'.sal',0)

Saludos,
Daniel Puente
Santa Cruz, Argentina
servicomver
Posts: 159
Joined: Fri Nov 18, 2005 7:34 pm

Re: Como pasar parametros a un exe externo

Post by servicomver »

Gracias por su apoyo, creo que en realidad era mas fácil de lo que imagine..
necesitaba que el cliente ejecutara CAJA.EXE 1, CAJA.EXE 2 o CAJA.EXE 3
lo que hice fué en el programa principal

FUNCTION TESTIT(Parametros)
Set Date USA
wRuta:=Trim(Parametros)
IF Empty(Parametros)=.F.
wRutaPh:="C:\Datos" + wRuta + "\"
Else
wRuta:=""
wRutaPh:="C:\Datos\"
Endif
..........
solo resta validar que lo que escriba el usuario sea valido..

Muchas gracias, por el momento con eso la libro
Post Reply