Re: php vypis ze souboru a zformatovani help

From: Jiří Hrazdil <konference (zavinac)>
Date: 23. 08. 2005, 16:16 CEST
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);
?>

					hrazda
Received on Tue, 23 Aug 2005 16:16:08 +0200

This archive was generated by hypermail 2.1.8 : 23. 08. 2005, 16:15 CEST