Форум АНТИЧАТ - Скрипт курса валют

Скрипт курса валют

01.08.2008, 14:44

mff

Познавший АНТИЧАТ

Регистрация: 12.03.2008

Сообщений: 1,379

Провел на форуме:
5866479

Репутация: 1809

Отправить сообщение для mff с помощью ICQ

Скрипт курса валют

Помогите со скиптом курса валют! Он работает, но бывает подглючивает и тормозит загрузку страницы. Не могу найти багу

PHP код:


		
			
<?php

$content = get_content(); 

$pattern = "#<Valute ID=\"([^\"]+)[^>]+>[^>]+>([^<]+)[^>]+>[^>]+>[^>]+>[^>]+>[^>]+>[^>]+>([^<]+)[^>]+>[^>]+>([^<]+)#i"; 

preg_match_all($pattern, $content, $out, PREG_SET_ORDER); 

$dollar = ""; 

$euro = ""; 

foreach($out as $cur){ 

    if($cur[2] == 840) $dollar = str_replace(",",".",$cur[4]); 

    if($cur[2] == 978) $euro   = str_replace(",",".",$cur[4]); 

} 

echo'<table cellpadding="0" cellspacing="0">

<tr>

<td width="50%">Доллар: </td>

<td><B>'.$dollar.'</B> руб.</td>

</tr>

<tr>

<td width="50%">Евро: </td>

<td><B>'.$euro.'</B> руб.</td>

</tr></table>';

function get_content(){ 

    $date = date("d/m/Y"); 

    $link = "http://www.cbr.ru/scripts/XML_daily.asp?date_req=$date"; 

    $fd = @fopen($link, "r"); 

    $text=""; 

    if(!$fd) echo "Запрашиваемая страница не найдена"; 

    else{ 

        while(!feof ($fd)) $text .= fgets($fd, 4096); 

    }  

    fclose ($fd); 

    return $text; 

} 

?>

Спасибо!