Script PHP Mengambil Nilai Tukar Valuta Asing dari BI Bank Indonesia

Posted by on 31 December, 2008
9 Comments
This item was filled under [ Code Snippet, PHP ]

Dapet riquest dari temen lg nih.. hehe :wink:
Mirip seperti sebelumnya yg mengambil lewat BCA dan Beacukai, akan tetapi skrg mengambil dari sumber BI (Bank Indonesia).
Berikut adalah script php untuk menampilkan kondisi mata uang valuta asing mengambil data yang bersumber dari http://www.bi.go.id

Dengan menggunakan dua metode, menggunakan curl atau juga bisa menggunakan file_get_content().
Fungsi script PHP nya adalah sbb:

<?php
/*
Ambil Nilai Valuta Kurs Dari BI Versi 1.0
Tanggal: 2008-12-31 16:31
oleh: jinbatsu (http://www.nusansifor.com) 
*/
error_reporting (E_ALL);
//
// Ubah menjadi 3600 untuk cache 1 jam, ketika semuanya sudah berjalan normal.
// Menggunakan cache berarti tidak perlu membuka koneksi ke klikbca
// setiap kali halaman dibuka << ini PENTING! menghemat waktu, dan mengurangi proses server.
//
$nkurs['cachetime'] = 3600; /* ubah jadi 3600 atau lebih */
//
// menggunakan CURL, jika file_get_contents tidak bisa dihostingan Anda, baca manual PHP untuk selengkapnya
// Untuk Cara penggunaan file get content:
// file_get_contents($url, "r")
// Untuk Cara penggunaan CURL:
// curl_get_file_contents($url)
$url = "http://www.bi.go.id/web/id/Moneter/Kurs+Bank+Indonesia/Kurs+Transaksi";	
$handle_url_metod = file_get_contents($url, "r");
//$handle_url_metod = curl_get_file_contents($url);
$header = '
			<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
			<html xmlns="http://www.w3.org/1999/xhtml">
			<head>
			<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
			<title>Nilai Valuta Kurs Dari BI Versi 1.0</title>
			<script type="text/javascript">
				function win2() {
					window.open("http://www.bi.go.id/biweb/Templates/Moneter/kode2.aspx","Window1","menubar=no,scrollbars=no,status=no,width=200,height=325,toolbar=no");
				}
			</script>
			<style type="text/css">
			#kurs_bi {
				width: 350px;
				background: #FFFFFF;
				padding: 0;
				border: 0;
				font-size: 11px;
				font-family: Verdana, Arial, Helvetica, sans-serif;
			}
			#kurs_bi table {
				border: 0 solid #ccc;
				padding: 2px 2px;
			}
			#kurs_bi table tr td table {
				border: 1px solid #ccc;
				padding: 0;
			}
			#kurs_bi .style6 {
				font-size: 13px;
			}
			</style>
			</head>
 
			<body>
 
			<div id="kurs_bi">
';
 
$footer = '
			<br />
			Sumber: <a href="http://www.bi.go.id">Bank Indonesia (BI)</a>
			</div>
			</body>
			</html>
';	
 
 
 
 
// Dari sini kebawah, ubah kalau mengerti aja.
//$nkurs['curr'] = array ('USD', 'SGD', 'HKD', 'CHF', 'GBP', 'AUD', 'JPY', 'SEK', 'DKK', 'CAD', 'EUR', 'SAR', 'MYR', 'NZD', 'NOK', 'BUK', 'INR', 'KWD', 'PKR', 'PHP', 'LKR', 'THB', 'BND', 'CNY', 'KRW');
 
 
function curl_get_file_contents($URL) {
	$c = curl_init();
	curl_setopt($c, CURLOPT_RETURNTRANSFER, 1);
	curl_setopt($c, CURLOPT_URL, $URL);
	$contents = curl_exec($c);
	curl_close($c);
	if ($contents) return $contents;
	else return FALSE;
}
 
$nkurs['scriptpath'] = dirname (__FILE__);
$nkurs['cachefile'] = $nkurs['scriptpath'] . '/cache.txt';
$output = "";
if (!file_exists ($nkurs['cachefile']) || !is_writable ($nkurs['cachefile'])){ die ('File cache.txt belum ada atau belum writable.<br />Buat file:
 
<div>::CODECOLORER_BLOCK_1::</div>
 
<br />Lalu CHMOD ke 666'); }
if (filemtime ($nkurs['cachefile']) <= ( time () - $nkurs['cachetime'] ) && $handle = $handle_url_metod)  {
	$output .= '<table cellspacing="1" cellpadding="0" border="0" bgcolor="#cccccc" align="center" width="100%">';
	function extract_unit($string, $start, $end) {
		$pos = stripos($string, $start);
		$str = substr($string, $pos);
		$str_two = substr($str, strlen($start));
		$second_pos = stripos($str_two, $end);
		$str_three = substr($str_two, 0, $second_pos);
		$unit = trim($str_three); // remove whitespaces
		return $unit;
	}
	$unit = extract_unit($handle, '<!---------------------- Kurs Transaksi Bank Indonesia ---------------------->', '<!----------------------End Kurs Transaksi Bank Indonesia ---------------------->');
	$hasil = explode("<table cellpadding=\"0\" cellspacing=\"0\" border=\"0\" align=\"center\">", $unit);
	$hasil = $hasil[0];
	$hasil = str_replace('/Biweb/', 'http://www.bi.go.id/Biweb/', $hasil);
	$hasil = str_replace('/biweb/', 'http://www.bi.go.id/biweb/', $hasil);
	//$hasil = str_replace('KodeSingkatan', '', $hasil);
	$output .= $hasil;
	$i = 0;
	/*
	foreach($hasil1 as $hasil) {
		if ($i == 30) {continue;}
		$output .= "<tr>";
		$hasil = str_replace('untuk setiap', '', $hasil);
		$hasil = str_replace('1,00', '', $hasil);
		$hasil = str_replace('100,00', '', $hasil);
		$hasil = str_replace('border="1"', 'border="0"', $hasil);
		foreach($nkurs['curr'] as $ilangan) {
			$hasil = str_replace($ilangan, '', $hasil);
		}
		$output .= $hasil;
		//$output .= "<br />" . $i;
		//$output .= "</tr>";
		$i++;
	}
	*/
	$output .= '</table>';
	$tocache = $output;
	$handle = fopen ($nkurs['cachefile'], 'w');
	fwrite ($handle, $tocache);
	fclose ($handle);
	//$output .= $hasil2;
} else {
	$handle = file ($nkurs['cachefile']);
	foreach($handle as $out) {
		$output .= $out;
	}
}
 
 
 
echo $header;
echo $output;
echo $footer;
?>

Demo: klik disini
Download file contoh script komplit nya:

  kurs_BI_v1.rar (3.3 KiB, 2,217 hits)

semoga bermanfaat :mrgreen:

Rate this topic:
1 Star2 Stars3 Stars4 Stars5 Stars (5 votes, average: 4.60 out of 5)
Loading ... Loading ...
Popularity: 7,147 views
Tagged with: [ , , , , ]
You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.

Artikel Sejenis

9 Comments on “Script PHP Mengambil Nilai Tukar Valuta Asing dari BI Bank Indonesia”

  • Andre
    Mozilla Firefox Mozilla Firefox 3.0.5 <br /> Windows Windows XP
    31 Dec 2008 19:19

    wow… semaken mantap aja :grin: Thanks atas informasi …. Berikan penghargaan. Hehe

    Teruskan karya kam punya.

    Trims

    Like or Dislike: Thumb up 0 Thumb down 0
  • Jawaad
    Mozilla Firefox Mozilla Firefox 3.0.5 <br /> Windows Windows XP
    31 Dec 2008 19:59

    iya sama2 Andre :)
    tetap semangat…

    Like or Dislike: Thumb up 0 Thumb down 0
  • Indotraffick
    Mozilla Firefox Mozilla Firefox 2.0.0.16 <br /> Windows Windows XP
    30 Jun 2009 20:21

    Thank ya… infonya.

    Like or Dislike: Thumb up 0 Thumb down 0
  • ArVandy
    Mozilla Firefox Mozilla Firefox 3.0.8 <br /> Ubuntu Linux Ubuntu Linux
    30 Aug 2009 16:06

    dengan adanya postingan ini menambah wawasan gw akan pemograman php, terimakasih atas infonya n mohon oprek source code nya.

    Like or Dislike: Thumb up 0 Thumb down 0
  • ANDIKA
    Mozilla Firefox Mozilla Firefox 2.0.0.13 <br /> Windows Windows XP
    24 Nov 2009 8:47

    aku dah buat tp kok muncul pesen “file cache tidak ada….dst” aku dah ikuti petunjukknya dah aku buat file cache nya + aku ubah 666 tp kok tetep muncul pesen itu ya..mohon pencerahan ke alamat email saya…

    Like or Dislike: Thumb up 0 Thumb down 0
  • Jawaad
    PHP PHP
    25 Nov 2009 0:39

    @ANDIKA,
    silahkan Anda coba dengan merubah ini.

    $nkurs['cachetime'] = 0;

    setelah OK, ubah kembali menjadi:

    $nkurs['cachetime'] = 3600;

    Selamat mencoba.

    Like or Dislike: Thumb up 0 Thumb down 0
  • Edwin
    Mozilla Firefox Mozilla Firefox 3.5.9 <br /> Windows Windows 7
    10 May 2010 8:43

    mas, kalo ngambil nilai / harga dari maskapai penerbangan gimana?
    Karena untuk tiap rute, harga nya selalu berbeda.

    Mohon bantuannya.

    Makasih sebelumnya.

    Like or Dislike: Thumb up 0 Thumb down 0
  • Jawaad
    Mozilla Firefox Mozilla Firefox 3.6.3 <br /> Windows Windows XP
    10 May 2010 18:57

    @Edwin, sama saja prinsipnya, tinggal gimana kita mau ambil datanya aja. Yg nilai Kurs juga beda tiap “mata uang” nya kan.

    Like or Dislike: Thumb up 0 Thumb down 0

Leave a Comment

Notify me of followup comments via e-mail. You can also subscribe without commenting.

«
»

Halaman ini di eksekusi dalam waktu 1.142 detik! (koneksi mayan bagus nih...)