Página 1 de 1

TInternet ???

Publicado: Vie Nov 09, 2007 11:04 am
por pjmfelix
Hi all,
i try to do a request to a web server with this sample code, but in the
server logfile that register the requests, nothing happens.
My sample is !
WITH OBJECT TInternet():New()
IF :Open()
:Connect( "http://pc_mario/" )
hData := :PostRequest( "//Displays.asmx/SendToDisplaysCPC" ,
" GroupID=1&ServiceID=1&ClientID=1&Ticket=A22& Description= " )
:CloseRequest( hData )
:Close()
ENDIF
END