Pobieranie danych z NBP Opcje

[stoklosa]

Nie mogę sobie poradzić z skryptem, którego zadaniem było by pobieranie danych z kursu walut NBP. Jeśli mógłby ktoś nanieś poprawki i rozbudować o pobieranie więcej niż jednego kursu, by później można było wstawiać do tekstu za pomocą ziemnych. Oto on:

Kod

<?
//otwarcie strony zrodlowej
$file=fopen("http://www.nbp.pl/Kursy/KursyA.html","r");
//sprawdzenie poprawnosci otwarcia pliku
if (!$file) {
  echo "Blad otwarcia strony zrodlowej\n";
  exit;
}
do {
  $line = fgets($file,82);
} while ((!feof($file)) and
  (!eregi('^.*$', $line,$out)));

fclose($file);
echo $out[1];
?>

Pozdrawiam, Łukasz Stokłosa!

[hispano]

Witam,

Kiedyś napisałem skrypcik dla telfonów IP Cisco. Mała przeróbka i gra. Może wydać się toprne, bo bardziej operuje na tekście niż na xml'u. Ale cóż po nitce do kłębka.
Powodzenia (IMG:http://forum.php.pl/style_emoticons/default/winksmiley.jpg)

[PHP] pobierz, plaintext 
<?php
$adres = &#092;"http://www.nbp.pl/Kursy/\";
$plik = fopen (&#092;"http://www.nbp.pl/Kursy/KursyA.html\", \"r\");
//$plik = str_replace( '\"', ' ', $plik );
while (!feof ($plik)) {
   $bufor = fgets($plik, 4096);
   $pos = strpos($bufor,'xml');
   if (!$pos === false)
	   {
		$bufor = str_replace( '\"', ' ', $bufor );
		$pl=substr($bufor, strpos($bufor,'xml'), strpos($bufor,'.')-strpos($bufor,'xml')+4);
		$adres .= $pl;   //doklejanie
		//echo $adres;
		//echo '<br>';
	}
}
fclose ($plik);
$lines = file($adres);
 
$i = 0;
 header(&#092;"Content-type: text/xml\");
 header(&#092;"Connection: close\");
 header(&#092;"Expires: -1\");
/* print \"<?xml version='1.0' encoding='ISO-8859-1'?>\";*/
 print \"<CiscoIPPhoneText>\";
while (strstr($lines[$i],'/tabela_kursow') === false)
   {
if (!strstr($lines[$i],'numer_tabeli') === false)
	 {		 
		 preg_match(\"/<numer_tabeli>(.*?)</numer_tabeli>/\", $lines[$i],$subj);
		 print\"<Title>NBP nr.$subj[1]</Title>\";
	 }
if (!strstr($lines[$i],'data_publikacji') === false)
	 {		 
		 preg_match(\"/<data_publikacji>(.*?)</data_publikacji>/\", $lines[$i],$subj);
		 print\"<Prompt>Kursy walut z $subj[1]</Prompt>\";
		 print\"<Text>\";
	 }
if (!strstr($lines[$i],'<pozycja>') === false)
	 {
		/* preg_match(\"/<nazwa_waluty>(.*?)</nazwa_waluty>/\", $lines[$i+1],$subj);print\"$subj[1] \";
		 $subj[1]=str_replace(chr(241),chr(110),$subj[1]);
		 $subj[1]=str_replace(chr(234),chr(101),$subj[1]);
		 $subj[1]=str_replace(chr(179),chr(108),$subj[1]);*/
		 preg_match(\"/<przelicznik>(.*?)</przelicznik>/\", $lines[$i+2],$subj);print\"$subj[1]\";
		 preg_match(\"/<kod_waluty>(.*?)</kod_waluty>/\", $lines[$i+3],$subj);print\"$subj[1]\";
		 preg_match(\"/<kurs_sredni>(.*?)</kurs_sredni>/\", $lines[$i+4],$subj);print\" $subj[1]n\";
		 
	 }
	   $i++; //a może nie co jeden byłoby szybciej??;)
   };
 print\"</Text>n\";
 print\"</CiscoIPPhoneText>\";
?>
[PHP] pobierz, plaintext 

Ten post edytował hispano 7.10.2004, 10:03:00