home *** CD-ROM | disk | FTP | other *** search
/ Enter 2004 June / ENTER.ISO / files / xampp-win32-1.4.5-installer.exe / xampp / weather.com-basic.php < prev    next >
Encoding:
PHP Script  |  2004-03-24  |  2.5 KB  |  60 lines
  1. <?php
  2. /* vim: set expandtab tabstop=4 shiftwidth=4: */
  3. // +----------------------------------------------------------------------+
  4. // | PHP version 4                                                        |
  5. // +----------------------------------------------------------------------+
  6. // | Copyright (c) 1997-2004 The PHP Group                                |
  7. // +----------------------------------------------------------------------+
  8. // | This source file is subject to version 2.0 of the PHP license,       |
  9. // | that is bundled with this package in the file LICENSE, and is        |
  10. // | available through the world-wide-web at                              |
  11. // | http://www.php.net/license/2_02.txt.                                 |
  12. // | If you did not receive a copy of the PHP license and are unable to   |
  13. // | obtain it through the world-wide-web, please send a note to          |
  14. // | license@php.net so we can mail you a copy immediately.               |
  15. // +----------------------------------------------------------------------+
  16. // | Authors: Alexander Wirtz <alex@pc4p.net>                             |
  17. // +----------------------------------------------------------------------+
  18. //
  19. // $Id: weather.com-basic.php,v 1.5 2004/03/28 13:19:39 eru Exp $
  20.  
  21. require_once "Services/Weather.php";
  22.  
  23. // Object initialization - error checking is important, because of
  24. // handling exceptions such as missing PEAR modules
  25. $weatherDotCom = &Services_Weather::service("WeatherDotCom", array("debug" => 2, "httpTimeout" => 30));
  26. if (Services_Weather::isError($weatherDotCom)) {
  27.     die("Error: ".$weatherDotCom->getMessage()."\n");
  28. }
  29.  
  30. // Set weather.com partner data
  31. $weatherDotCom->setAccountData("<PartnerID>", "<LicenseKey>");
  32.  
  33. /* Erase comments to enable caching
  34. $weatherDotCom->setCache("file", array("cache_dir" => "/tmp/cache/"));
  35. if (Services_Weather::isError($weatherDotCom)) {
  36.     echo "Error: ".$weatherDotCom->getMessage()."\n";
  37. }
  38. */
  39.  
  40. $weatherDotCom->setUnitsFormat("metric");
  41. $weatherDotCom->setDateTimeFormat("d.m.Y", "H:i");
  42.  
  43. // First get code for location
  44. $search = $weatherDotCom->searchLocation("Bonn, Germany");
  45. if (Services_Weather::isError($search)) {
  46.     die("Error: ".$search->getMessage()."\n");
  47. }
  48.  
  49. // Now iterate through available functions for retrieving data
  50. foreach (array("getLocation", "getWeather", "getForecast") as $function) {
  51.     $data = $weatherDotCom->$function($search);
  52.     if (Services_Weather::isError($data)) {
  53.         echo "Error: ".$data->getMessage()."\n";
  54.         continue;
  55.     }
  56.  
  57.     var_dump($data);
  58. }
  59. ?>
  60.