FiveTech Support Forums

HOLA A TODOS ....

TENGO UN PEQUENO PROBLEMA ESTOY HACIENDO UNA APLICACION WE... Y MI DUDA ES QUE NO SE COMO RECIBIR LOS PARAMTROS DE UN HREF EN OTRO ARCHVIO

TAL COMO ESTO

ESTO ES LO QUE ENVIO TAMBIEN NO SE SI ESTA BIEN....

oOutFile:say(nContador++,0,"<TD align=right><font face='Verdana' size =1 >"+'<a href=/cgi-win/tpostatu.exe?'+ncambio+'>'+(csuc)+'</A>'+"</font> </TD>")

Y CUANDO LLEGAN AL OTRO ARCHIVO

FUNCTION Main(cArch)

LOCAL oIni := TIni():New(cArch)
LOCAL cOutFile := oIni:Get("System","Output File") // obtenemos el nombre del archivo de salida
LOCAL cInpFile := oIni:Get("System","Content File") // obtenemos el nombre del archivo d entrada
LOCAL oOutFile := TDosPRN():New(cOutFile) // no podemos utilizar la impresora, asi que utilizamos la clase TDOSPRN

LOS RECIBO ASI.. PERO NO SE COMO OBTENER EL VALOR DE LAS VARIABLES...

ESPERO Y ME PUEDAN AYUDAR... GRACIAS

la cadena que estas enviando esta mal

Tendira que ser

"/cgi-win/tpostatu.exe?variable="+nCambio

y del otro lado, en el archivo .INI hay una seccion llamada [Form Literal] donde encontraras algo asi:

[From Literal]
variable=valor

Eso si lo mandaste por el metodo post, si lo enviaste por el metodo GET entonces busca en la seccion [CGI] el valor Query String, seria algo como esto:

[CGI]
...
...
...
Query String = variable=valor&otravariable=otrovalor

DONDE YO OBTENGO LAS VARIBLES ESTA DE ESTA FORMA PERO NI AL CASO NADAMAS NADA....

ME PODRIAS AYUDAR.....


FUNCTION Main(cArch)
LOCAL oIni := TIni():New(cArch)
LOCAL cOutFile := oIni:Get("System","Output File") // obtenemos el nombre del archivo de salida
LOCAL cInpFile := oIni:Get("System","Query String") // obtenemos el nombre del archivo d entrada
LOCAL oOutFile := TDosPRN():New(cOutFile) // no podemos utilizar la impresora, asi que utilizamos la clase TDOSPRN
LOCAL nContador := 0 // para las lineas del archivo de salida
LOCAL aVars
/* tomamos variables del documento htm */
aVars := SacaVars(cInpFile)


?len(Avars)
?cInpFile SE SUPONE QUE AQUI VENDRIAN LOS VALORES DE LAS VARIBLES O NO..


OK

MUCHAS GRACIAS...

ya quedo...

ESTA LISTO ESTO PARA COSINARSE..................

LO UNICO QUE MERESTA ES COMO PASAR MAS DE UN VARIABLE... ALGUIEN ME PODRI AYUDAR....

oOutFile:say(nContador++,0,"<TD align=right><font face='Verdana' size =1 >"+'<a href="'+ndirser+'"?arch='+ncambio+'>'+(nsuc)+'</A>'+"</font></TD>")

CON ESTO SI DUNCIONA PERO NADAMAS ME PUEDE ENVIAR UNA VARIABLE.....

La cadena URL Encodede es:

archivo.exe?variable=valor&otravariable=otrovalor&otramas=otrovalormas

Separa cada valor por un & ylisto

Por cierto, tu codigo tiene cierta similitud con un codigo que yo escribi hace algunos años, del que supongo debes estar tomando como ejemplo.