Tuesday, December 6, 2011

Kurs BCA


Free Script Kurs BCA 
 ########################################## Copy


<?
$url = "http://www.klikbca.com/individual/silver/ind/rates.html";
$curl = curl_init();
curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);
curl_setopt($curl, CURLOPT_CONNECTTIMEOUT, 5);
curl_setopt($curl, CURLOPT_URL, $url);
$content = curl_exec($curl);
curl_close($curl);

$content = explode ('<table border="0" cellspacing="0" cellpadding="0" class="testL">', $content);
$content = explode ('</table>', $content[1]);
$periode = explode ('<font color="black" size="1" face="Arial">', $content[0]);
$periode = explode (’WIB’, $periode[1]);

$periode = str_replace("","", str_replace("\r\n","",$periode[0]));

$content = explode ("<TR BGCOLOR=#f0f0f0>", $content[0]);
$list = 0;
for($i=1;$i<=count($content);$i++){
$negara = explode ("<TR bgcolor=#e0e0e0>", $content[$i]);
if($negara[0]){
$list++;
$kurs[$list] = str_replace("&amp;amp;nbsp;","", str_replace("::","", str_replace(" ","", str_replace("",":", str_replace("\r\n","",strip_tags($negara[0]))))))."<br>";
}
if($negara[1]){
$list++;
$kurs[$list] = str_replace("&amp;amp;nbsp;","", str_replace("::","", str_replace(" ","", str_replace("",":", str_replace("\r\n","",strip_tags($negara[1]))))))."<br>";
}
}
?>

<table border="0" cellspacing="0" cellpadding="2" class="kurs" width="170">
<tr>
<td colspan="3" align="center"><? echo $periode; ?></td>
</tr>

<?
$bg = 0;
for($i=1;$i<=$list;$i++){
list($id, $jual, $beli) = split(':', $kurs[$i]);
if($bg==0){
$bg++;
$bgcolor="#f0f0f0";
}
else{
$bg=0;
$bgcolor="#e0e0e0";
}
echo $id;
echo("<tr>");
echo("<td align=\"center\" bgcolor=".$bgcolor.">".$id."</td>");
echo("<td align=\"right\" bgcolor=".$bgcolor.">".$jual."</td>");
echo("<td align=\"right\" bgcolor=".$bgcolor.">".$beli."</td>");
echo("</tr>");
}

?>
</table>


###################################

0 comments:

Post a Comment