Hi all,
I have tried with no success to use http addresses that look like this:
http://forum.thegamecreators.com/&m=forum_view&t=203769&b=41&msg=2436767#m2436767
but the problem that I am running into is what do I use for the server file.
rem
rem AGK Application
rem
rem A Wizard Did It!
rem
rem AGK Application 1.08B8
rem MR
rem HTTP example
rem Landscape App
SetDisplayAspect( 4.0/3.0 )
MainLoop()
end
function MainLoop()
Response$=GetFromWeb("http://forum.thegamecreators.com/&m=forum_view&t=203769&b=41","") // what goes in the second param?
do
Print("hello internet")
Print(Response$)
if getpointerpressed()=1 then exit
Sync()
loop
endfunction
function GetFromWeb(Host$,URLPath$)
Response$=""
if GetInternetState()=1
iHTTP=CreateHTTPConnection()
iSecure=0
szUser$=""
szPass$=""
if SetHTTPHost( iHTTP, Host$, iSecure, szUser$, szPass$ )=1
if SendHTTPRequestASync( iHTTP, URLPath$ )=1
do
ret=GetHTTPResponseReady( iHTTP )
if ret=-1 then exit //Cancel
if ret=1 then exit //Ready
print("wait ...")
sync()
loop
if ret=1
Response$=GetHTTPResponse( iHTTP )
endif
endif //Get
CloseHTTPConnection( iHTTP )
endif //Host
DeleteHTTPConnection( iHTTP )
endif //Internet
endfunction Response$
Thanks for the Help!
