1. Почему нет форума "Корпоративный портал (клиентский форум)" ?
2. Неплохо бы иметь для портала гаджет курсов валют ЦБ
если кому интересно вот что быстренько сделал
index.php :
2. Неплохо бы иметь для портала гаджет курсов валют ЦБ
если кому интересно вот что быстренько сделал
index.php :
| Код |
|---|
<?
if (!defined("B_PROLOG_INCLUDED") || B_PROLOG_INCLUDED!==true)die();
$cache = new CPageCache();
$life_time = 3600*12;
$url = date("d/m/Y");
if ($cache->StartDataCache($life_time , 'cbr'.$url)) {
$ob = new CHTTP();
$ob->http_timeout = 10;
$ob->Query(
"GET",
"www.cbr.ru",
80,
"/scripts/XML_daily.asp?date_req=".$url,
false,
"",
"N"
);
$errno = $ob->errno;
$errstr = $ob->errstr;
$content = $ob->result;
// код взят отсюда: http://www.softtime.ru/scripts/valute.php
$pattern = "#<Valute ID=\"([^\"]+)[^>]+>[^>]+>([^<]+)[^>]+>[^>]+>[^>]+>[^>]+>[^>]+>[^>]+>([^<]+)[^>]+>[^>]+>([^<]+)#i";
preg_match_all($pattern, $content, $out, PREG_SET_ORDER);
foreach($out as $cur)
{
if($cur[2] == 840) $dollar = str_replace(",",".",$cur[4]);
if($cur[2] == 978) $euro = str_replace(",",".",$cur[4]);
}
echo "Доллар США : ".$dollar."<br>";
echo "Евро : ".$euro."<br>";
$cache->EndDataCache();
}
?>
|
