milan wrote: > ahoj vsichni, > nejak se v tom placam, potrebuju dat do php stranek aktualni kurz CNB, > nasel jsem si, kde je ulozen v txt podobe, ale nejak ho nemuzu > zformatovat a vypsat kam mam, zatim jsem spachal toto: > > <? $fd = fopen ("http://wdb.cnb.cz/CNB_TXT/KURZY.K_CURRTXT", "r"); > while (!feof ($fd)) { > $buffer = fgets($fd, 4096); > echo $buffer; > } > fclose ($fd); ?> <?php // v tomto poli jsou uvedeny kody men, ktere se ve vysledku nezobrazuji $nezobrazovatMeny = array("JPY","MYR","SGD"); $fp = fopen("http://wdb.cnb.cz/CNB_TXT/KURZY.K_CURRTXT","r"); $cisloRadku = 0; while (!feof($fp)) { $radek = fgets($fp); if (!$cisloRadku) { // jsme na prvnim radku souboru - hlavicka // vyber z hlavicky datum - ber znaky od zacatku radku po znak # $datum = substr($radek,0,strpos($radek,"#")); echo "<h1>Kurzovní lístek pro den $datum</h1>\n"; echo "<table>\n"; } else if ($cisloRadku == 1) { // vytiskne zahlavi tabulky echo "<tr><th>zemì</th><th>mìna</th><th>množství</th><th>kód</th><th>kurz</th></tr>\n"; } else { // do pole $exp uloz jednotlive casti radku oddelene od sebe znakem "|" $exp = explode("|",$radek); // a pak jednotlive polozky tohoto pole vypis zformatovane do tabulky (nejsou-li uvedeny v seznamu men, ktere se nevypisuji if (!in_array($exp[3],$nezobrazovatMeny)) { /* popis obsahu pole $exp $exp[0] - nazev zeme $exp[1] - nazev meny $exp[2] - mnozstvi meny $exp[3] - kod meny $exp[4] - kurz */ echo "<tr><td>$exp[0]</td><td>$exp[1]</td><td>$exp[2]</td><td>$exp[3]</td><td>$exp[4]</td></tr>\n"; } } $cisloRadku++; // zvys pocitadlo cisla radku o 1 } echo "</table>"; fclose($fp); ?> hrazdaReceived on Tue, 23 Aug 2005 16:16:08 +0200
This archive was generated by hypermail 2.1.8 : 23. 08. 2005, 16:15 CEST