I am trying to get a text file from a website and parse it.
I thought this worked in the past, but now it doesn’t seem to get me any text:
[code] dim h as new HTTPSocket
dim z as string
call h.get (“http://www.ursasoftware.com/allok.htm” ,6)
z = h.Read (3000,nil)
if h.HTTPStatusCode = 200 and z > “” then
msgbox z
end if[/code]
I know the file exists (although its currently unused by the actual site)
This should get the text synchronously, waiting up to 6 seconds.
The status code should be 200 if the data is received: it is, but the READ call gets no bytes,
and the CONTENTS of the httpsocket in the debugger is empty.