17 lines
386 B
Text
17 lines
386 B
Text
----------------------------------------
|
|
--
|
|
----------------------------------------
|
|
on getAdobeHomePage ()
|
|
script("SimpleHttpGet").new("http://www.adobe.com/", #printResult)
|
|
end
|
|
|
|
----------------------------------------
|
|
-- @callback
|
|
----------------------------------------
|
|
on printResult (res, err)
|
|
if err="OK" then
|
|
put res
|
|
else
|
|
put "Network Error:" && err
|
|
end if
|
|
end
|