18 lines
386 B
Text
18 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
|