Doviz blok editleme

frauenfeld · Tarih: 2005-10-17, 23:01:08 Mesaj konusu: Doviz blok editleme

Selam
Benim sitemde doviz bloku var ve assagidaki kodlarla cok iyi sekilde calisiyor, su an kodlardanda anlasilacagi gibi sadece dolar ve euro yu gosteriyor, ben isvicre frankinida buraya eklemek istiyorum ne yapabilirim, nasil olur bilgisi olan var mi?

tesekkurler

=================
KOd
=================
<?php
if (eregi("block-Tcmb_Doviz.php",$PHP_SELF)) {
Header("Location: index.php");
die();
}

global $bgcolor2;

$tcmb_today = @file("http://www.tcmb.gov.tr/kurlar/today.html");

if($tcmb_today)
{
$tcmb_today = implode("", $tcmb_today);
$tcm_today = ereg_replace("\r", "", $tcmb_today);

$USD_start = strpos($tcmb_today, "ABD DOLARI");
$EUR_start = strpos($tcmb_today, "EURO");

$USD_tcmb_today = trim(substr($tcmb_today, $USD_start+21, 35));
$EUR_tcmb_today = trim(substr($tcmb_today, $EUR_start+21, 35));

while ( ereg( "[ ]{2,}", $USD_tcmb_today)>0 )
$USD_tcmb_today = ereg_replace( "[ ]{2,}", " ", $USD_tcmb_today );
$EUR_tcmb_today = ereg_replace( "[ ]{2,}", " ", $EUR_tcmb_today );

// while ( strpos($tcmb_today, " ")>0 )
// $tcmb_today = ereg_replace(" ", " ", $tcmb_today);

$USD_tcmb_today = explode(" ",$USD_tcmb_today);
$EUR_tcmb_today = explode(" ",$EUR_tcmb_today);

$USD = array ( number_format((int)ereg_replace( ",", "", $USD_tcmb_today[0] ), 0, ",", "."), number_format((int)ereg_replace( ",", "", $USD_tcmb_today[1] ), 0, ",", "."));
$EUR = array ( number_format((int)ereg_replace( ",", "", $EUR_tcmb_today[0] ), 0, ",", "."), number_format((int)ereg_replace( ",", "", $EUR_tcmb_today[1] ), 0, ",", "."));

$content = "<table border=\"0\" width=\"95%\" cellspacing=\"1\" cellpadding=\"0\">";
$content .= "<tr>";
$content .= "<td width=\"40%\" >USD Alýþ</td>";
$content .= "<td width=\"60%\" align=\"right\" >$USD_tcmb_today[0] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\">USD Satýþ</td>";
$content .= "<td align=\"right\" >$USD_tcmb_today[1] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\" >EUR Alýþ</td>";
$content .= "<td width=\"60%\" align=\"right\" >$EUR_tcmb_today[0] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\" >EUR Satýþ</td>";
$content .= "<td align=\"right\" >$EUR_tcmb_today[1] YTL</td>";
$content .= "</tr>";
$content .= "</table>";
}
else
{
$content = "<center>Serverla Ýletiþim saðlanamadý<br>Su an icin doviz kurlari gosterilemiyor.<br> Tesekkur Ederiz.</center>";
}

?>

Bu Site Google Adsense ile Gelir Elde Ediyor · Tarih: 2024-06-02, 03:03:29 Mesaj konusu: Forum Arası Reklamlar

frauenfeld · Tarih: 2005-10-17, 23:43:38 Mesaj konusu: harika

Kendi soruma kendim cevap vereyim bari, yanlis anlamayin siz cevap vermediniz diye degil, kedi olali bir blok yakalayabildik, assagidaki kodlar calisti, ilgilenenler icin..

kolay gelsin

=================================
<?php
if (eregi("block-Tcmb_Doviz.php",$PHP_SELF)) {
Header("Location: index.php");
die();
}

global $bgcolor2;

$tcmb_today = @file("http://www.tcmb.gov.tr/kurlar/today.html");

if($tcmb_today)
{
$tcmb_today = implode("", $tcmb_today);
$tcm_today = ereg_replace("\r", "", $tcmb_today);

$USD_start = strpos($tcmb_today, "ABD DOLARI");
$EUR_start = strpos($tcmb_today, "EURO");
$CHF_start = strpos($tcmb_today, "ÝSVÝÇRE FRANGI");

$USD_tcmb_today = trim(substr($tcmb_today, $USD_start+21, 35));
$EUR_tcmb_today = trim(substr($tcmb_today, $EUR_start+21, 35));
$CHF_tcmb_today = trim(substr($tcmb_today, $CHF_start+21, 35));

while ( ereg( "[ ]{3,}", $USD_tcmb_today)>0 )
$USD_tcmb_today = ereg_replace( "[ ]{2,}", " ", $USD_tcmb_today );
$EUR_tcmb_today = ereg_replace( "[ ]{2,}", " ", $EUR_tcmb_today );
$CHF_tcmb_today = ereg_replace( "[ ]{2,}", " ", $CHF_tcmb_today );

// while ( strpos($tcmb_today, " ")>0 )
// $tcmb_today = ereg_replace(" ", " ", $tcmb_today);

$USD_tcmb_today = explode(" ",$USD_tcmb_today);
$EUR_tcmb_today = explode(" ",$EUR_tcmb_today);
$CHF_tcmb_today = explode(" ",$CHF_tcmb_today);

$USD = array ( number_format((int)ereg_replace( ",", "", $USD_tcmb_today[0] ), 0, ",", "."), number_format((int)ereg_replace( ",", "", $USD_tcmb_today[1] ), 0, ",", "."));
$EUR = array ( number_format((int)ereg_replace( ",", "", $EUR_tcmb_today[0] ), 0, ",", "."), number_format((int)ereg_replace( ",", "", $EUR_tcmb_today[1] ), 0, ",", "."));
$CHF = array ( number_format((int)ereg_replace( ",", "", $CHF_tcmb_today[0] ), 0, ",", "."), number_format((int)ereg_replace( ",", "", $CHF_tcmb_today[1] ), 0, ",", "."));

$content = "<table border=\"0\" width=\"95%\" cellspacing=\"1\" cellpadding=\"0\">";
$content .= "<tr>";
$content .= "<td width=\"40%\" >USD Alýþ</td>";
$content .= "<td width=\"60%\" align=\"right\" >$USD_tcmb_today[0] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\">USD Satýþ</td>";
$content .= "<td align=\"right\" >$USD_tcmb_today[1] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\" >EUR Alýþ</td>";
$content .= "<td width=\"60%\" align=\"right\" >$EUR_tcmb_today[0] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\" >EUR Satýþ</td>";
$content .= "<td align=\"right\" >$EUR_tcmb_today[1] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\" >CHF Alýþ</td>";
$content .= "<td width=\"60%\" align=\"right\" >$CHF_tcmb_today[0] YTL</td>";
$content .= "</tr>";
$content .= "<tr>";
$content .= "<td width=\"40%\" >CHF Satýþ</td>";
$content .= "<td align=\"right\" >$CHF_tcmb_today[1] YTL</td>";
$content .= "</tr>";
$content .= "</table>";
}
else
{
$content = "<center>Serverla Ýletiþim saðlanamadý<br>Su an icin doviz kurlari gosterilemiyor.<br> Tesekkur Ederiz.</center>";
}

?>

kadifem · Mesaj: 1+ Kayıt: Sep 22, 2005 Mesajlar: 37

Arkadas cok tsk ederim iyi calismalar kolay gelsin sevgilerimle siteme ekliyorum dedigin gibi insallah calisir tskler tekrardan

ewt msj editlemek zorunda kaldim benim sitem xoops herhalde burda calismaz ve calismadida Sad

((

frauenfeld · Tarih: 2005-10-18, 00:59:31 Mesaj konusu: Selam

Valla su an benim sitede calisiyor, ama nuke 7.6 ve diger kodlara bakarak tum doviz girdileride girilebiliniyor, ama seninkinde xopp da tabiki bilemeyecegim,

Zaten cok tecrubelide degilim, allem kader yaptik calisti..

kolay gelsin