LiveCode Forums.

Code: Select all

on mouseUp
               
put url "http://www.ilfattoquotidiano.it" into field "fHtml"

end mouseUp

Code: Select all

on mouseUp
               
put url "http://www.ilfattoquotidiano.it" into myData --- put your other url here for test! ;)
          
            
-- set Header (it's an example of User Agent, I have tried many other... win, mac, linux etc...!
set the HTTPHeaders to "User-Agent: Firefox 20/Linux: Mozilla/5.0 (X11; Linux x86_64; rv:20.0) Gecko/20100101 Firefox/20.0"  \
   & return & "Connection: Keep-Alive"
            
            
            
put uniencode(myData,"UTF8") into myData

-- put in my Human Viewer field (fHtml) ;)
set the unicodeText of fld "fHtml" to myData

 -- view Header in field fHeader
put  libUrlLastRHHeaders() into field "fHeader"
   
 -- 5. view the UserAgent in field fUserAgent
put libURLLastHTTPHeaders() into field "fUserAgent"

end mouseUp

Code: Select all

put decompress(url "http://www.ilfattoquotidiano.it")

Code: Select all

put decompress(url "http://forums.runrev.com") into mydata

Code: Select all

   put "http://www.ilfattoquotidiano.it" into vURL --- compressed site
  -- put "http://forums.runrev.com" into vURL --- not compressed site
   
   put URL vUrl into myData
   
  if myData contain compress data THEN put decompress(url vUrl) into field "Compressed" 
  if myData NOT contain compress data THEN put vUrl into field "NOT Compressed"

Code: Select all

put url "http://forums.runrev.com" into myData
-- First, check for errors in the download:
if the result is not empty then
   answer the result
   exit to top
end if 
-- Now try to decompress the data:
try
  put decompress(myData) into myData
catch tErr -- this param contains a string containing error lookup info which can sometimes be useful, 
   -- but we won't use it here since we already know the download was successful; if decompress
   -- fails we're probably just dealing with uncompressed data, so we do nothing special to handle
   -- the decompression error.
end try
DoSomethingWith myData

Code: Select all

put (url "http://www.ilfattoquotidiano.it") into tData -- grab the data
--EDIT, Seems to need a "wait with messages" line to make it reliable so..
wait 0 with messages 

if liburllastRHHeaders() contains "gzip" then -- look for gzip as part of the headers
put decompress(tData) into tResult -- if gzip was found, decompress
else
put tData into tResult -- otherwise just use the data
end if
put tResult -- puts the result into msg box