You could use this code
sync on : sync rate 0
w$="http://www.google.com"
a$=download(w$)
if a$=""
print "Error Downloading"
else
print "Downloaded OK"
print "Contents:"
print a$
endif
sync
sync
wait key
function download(w$)
f$="tempfile.txt"
if file exist(f$) then delete file f$
c$=""
load dll "urlmon",1
a=CALL DLL(1,"URLDownloadToFileA",0,w$,f$,0,0)
delete dll 1
if a=0
open to read 1,f$
while file end(1)=0
read byte 1,v
c$=c$+chr$(v)
endwhile
close file 1
endif
if file exist(f$) then delete file f$
endfunction c$
With a google search.
Quote: "this is not a quote"