PAL.C.T MINI SHELL
<?php
include "../../konfig/koneksi.php";
// nama file
$namaFile = "list_kunjungan.xls";
// Function penanda awal file (Begin Of File) Excel
function xlsBOF() {
echo pack("ssssss", 0x809, 0x8, 0x0, 0x10, 0x0, 0x0);
return;
}
// Function penanda akhir file (End Of File) Excel
function xlsEOF() {
echo pack("ss", 0x0A, 0x00);
return;
}
// Function untuk menulis data (angka) ke cell excel
function xlsWriteNumber($Row, $Col, $Value) {
echo pack("sssss", 0x203, 14, $Row, $Col, 0x0);
echo pack("d", $Value);
return;
}
// Function untuk menulis data (text) ke cell excel
function xlsWriteLabel($Row, $Col, $Value ) {
$L = strlen($Value);
echo pack("ssssss", 0x204, 8 + $L, $Row, $Col, 0x0, $L);
echo $Value;
return;
}
// header file excel
header("Pragma: public");
header("Expires: 0");
header("Cache-Control: must-revalidate, post-check=0,
pre-check=0");
header("Content-Type: application/force-download");
header("Content-Type: application/octet-stream");
header("Content-Type: application/download");
// header untuk nama file
header("Content-Disposition: attachment;
filename=".$namaFile."");
header("Content-Transfer-Encoding: binary ");
// memanggil function penanda awal file excel
xlsBOF();
// ------ membuat kolom pada excel --- //
xlsWriteLabel(0,0,"tgl.");
xlsWriteLabel(0,1,"staff");
xlsWriteLabel(0,2,"jam awal");
xlsWriteLabel(0,3,"durasi");
xlsWriteLabel(0,4,"lokasi");
xlsWriteLabel(0,5,"pemilik");
xlsWriteLabel(0,6,"alamat");
xlsWriteLabel(0,7,"telpon");
xlsWriteLabel(0,8,"prov");
xlsWriteLabel(0,9,"kab/kota");
xlsWriteLabel(0,10,"kec");
xlsWriteLabel(0,11,"keterangan");
// -------- menampilkan data --------- //
// query menampilkan semua data
$query = "SELECT * FROM kunjungan order by id_kunjungan desc";
$hasil = mysql_query($query);
// nilai awal untuk baris cell
$noBarisCell = 1;
// nilai awal untuk nomor urut data
$noData = 1;
while ($data = mysql_fetch_array($hasil))
{
$exp_alamat = explode("|","$data[alamat]");
$alamat = $exp_alamat[0];
if ( isset($exp_alamat[1])){
$prov = $exp_alamat[1]; } else {$prov = '' ;}
if ( isset($exp_alamat[2])){
$kab = $exp_alamat[2]; } else {$kab = '' ;}
if ( isset($exp_alamat[3])){
$kec = $exp_alamat[3]; } else {$kec = '' ;}
//$newstring = substr_replace($phonex, "A", 3, 0);
//$newstring = substr_replace($newstring, "A", 7, 0);
// id_main_produk kode_barang harga diskon harga_promo keterangan
xlsWriteLabel($noBarisCell,0,$data['tanggal']);
xlsWriteLabel($noBarisCell,1,$data['username']);
xlsWriteLabel($noBarisCell,2,$data['jam_awal']);
xlsWriteLabel($noBarisCell,3,$data['durasi']);
xlsWriteLabel($noBarisCell,4,$data['lokasi']);
xlsWriteLabel($noBarisCell,5,$data['nama_pemilik']);
xlsWriteLabel($noBarisCell,6,$alamat);
xlsWriteLabel($noBarisCell,7,$data['no_ponsel']);
xlsWriteLabel($noBarisCell,8,$data['prov']);
xlsWriteLabel($noBarisCell,9,$data['kab']);
xlsWriteLabel($noBarisCell,10,$data['kec']);
xlsWriteLabel($noBarisCell,11,$data['keterangan']);
// xlsWriteLabel($noBarisCell,5,$data['comment']);
// xlsWriteLabel($noBarisCell,6,$data['source']);
// increment untuk no. baris cell dan no. urut data
$noBarisCell++;
$noData++;
}
// memanggil function penanda akhir file excel
xlsEOF();
exit();
//header('location:../../media.php?module=exim');
?>
�
y���~�or�5�J�={��E��e�u磝Qk��ᯘG{�?���+�]������ן�?w�M3X^��歌>{�7پ�K�>�o��n�\����j�y��R���g/�=��f�O��r�o��NV�v��~�Y+��NG�u���Ý����HW��y�w�[eQ�ʨ�S�b��>������>�}G�mx[o[<��{���Ϯ_��qF���vMIEND�B`�