Como pasar parametros a un exe externo

Como pasar parametros a un exe externo

Postby J. Ernesto » Sat Oct 22, 2011 9:05 pm

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
User avatar
J. Ernesto
 
Posts: 152
Joined: Tue Feb 03, 2009 10:08 pm
Location: Bogotá D.C. Colombia

Re: Como pasar parametros a un exe externo

Postby luisduque » Sun Oct 23, 2011 12:03 am

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
luisduque
 
Posts: 133
Joined: Mon May 12, 2008 4:13 pm
Location: Venezuela

Re: Como pasar parametros a un exe externo

Postby servicomver » Sun Nov 22, 2020 5:52 pm

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
servicomver
 
Posts: 179
Joined: Fri Nov 18, 2005 7:34 pm

Re: Como pasar parametros a un exe externo

Postby puenteda » Sun Nov 22, 2020 6:35 pm

Ernesto:

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

Saludos,
Daniel Puente
Santa Cruz, Argentina
puenteda
 
Posts: 24
Joined: Thu Oct 02, 2014 3:51 am

Re: Como pasar parametros a un exe externo

Postby servicomver » Sun Nov 22, 2020 8:02 pm

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
servicomver
 
Posts: 179
Joined: Fri Nov 18, 2005 7:34 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 34 guests