Merkez bankasından bir kod parçası ile doviz bilgilerinizi alarak sitenize eklemenizi sağlayan kısa bir php kod parçası. Uygulama sisteme bağlanma ve bilgi çekme konularında dikkat edilmesi gereken bilgiler içeriyor.
Kod:
<?php
$fp = pfsockopen("
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.80, $errno, $errstr);
if (!$fp)
{
echo "$errstr ($errno)<br/>\n";
echo $fp;
} else {
fputs($fp, "GET /kurlar/today.html HTTP/1.1\r\n");
fputs($fp, "Host: tcmb.gov.tr\r\n");
fputs($fp, "Authorization: Basic ".base64_encode("username:password")."\r\n");
fputs($fp, "Connection: close\r\n\r\n");
fwrite($fp, $out);
$i = 0;
while (!feof($fp))
{
$yaz = fgets($fp, 128);
if($sonuc = eregi("^[(usd/try)(eur/try)]+([[:space:]]+)1([[:space:]]+)",$yaz) AND ($i<2))
{
$sonuc1[$i]=explode(" ",$yaz);
$j=0;
foreach($sonuc1[$i] as $_sonuc1)
{
if($_sonuc1!="")
{
$sonuc2[$i][$j] = $_sonuc1;
$j++;
}
}
$i++;
}
}
fclose($fp);
}
?>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9">
<title>Döviz Kurları</title>
</head>
<body bgcolor="#ffffff">
<table width="200" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="61" height="20">Dolar / Alış,</td>
<td width="83" align="right"><?=$sonuc2[0][4];?> YTL</td>
</tr>
<tr>
<td height="20">Dolar / Satış,</td>
<td align="right"><?=$sonuc2[0][5];?> YTL</td>
</tr>
<tr>
<td height="20" valign="top">Euro / Alış,</td>
<td align="right" valign="top"><?=$sonuc2[1][3];?> YTL</td>
</tr>
<tr>
<td height="20" valign="top">Euro / Satış,</td>
<td align="right" valign="top"><?=$sonuc2[1][4];?> YTL</td>
</tr>
</table>
</body>
</html>