TURL para Harbour

[MOISES]

Hola:

¿Está disponible TURL para Harbour?. ¿Dónde la puedo bajar?. Muchas gracias.

Salu2

[QAZWSX2K]

QUE ES TURL

[MOISES]

http://fivetechsoft.com/forums/viewtopi ... light=turl

[cuatecatl82]

Saludos Moises:

Si lo que deceas es una función que te permita abrir "X" página en la Web hazlo de la siguiente manera:

Internet(www.sisa.unlugar.com)

o si lo prefieres puedes enviar correos usando cualquier programa que tengas en tu pc como outlook o cualquier otro tambien puedes hacerlo de esta forma:

Internet(soporte@sisa.unlugar.com)

aqui esta la función:

//-----------------------------------------------------------------------------------------------------------------//
FUNCTION Internet( cUrl )

cUrl := IF( "@" $ cUrl, "mailto:" + cUrl, cUrl )

IF EMPTY( cUrl )
oAsis:wInfo( "Introduzca algún valor en el campo", oApp:lAsis )
ELSE
IF IsWinNT()
WinExec( "rundll32.exe url.dll, FileProtocolHandler " + cUrl, 0 )
ELSE
WinExec( "Start " + cUrl, 0 )
ENDIF
ENDIF

RETURN nil


Saludos desde Chiapas, México:

Visita: www.sisa.unlugar.com

[MOISES]

Muchas gracias, pero necesito pasar parámetros y por eso busco turl.

Salu2 desde España

[Carlos Mora]

Que tipo de parametros tienes que pasar? GET o POST?
Si son POST es suficiente con agregar al final los parametros separados por & . COmo ejemplo, mira lo que dice la linea de tu navegador en este momento, dice algo asi como:

posting.php?mode=reply&t=8111 lo que significa que ejecutará el script del servidor con las variables mode= reply y t = 8111

Saludos,
Carlos.

[MOISES]

Lo que pretendo es leer el resultado que me envía, por eso lo de shellexecute iexplore no me sirve. Muchas gracias