[ Mini Kiebo ]

Server: Windows NT DESKTOP-5B8S0D4 6.2 build 9200 (Windows 8 Professional Edition) i586 Path: D:/Backup/05122024/htdocs/siakad/akademik/ajax/ [ Home ]
File: r_download_mapel_xls.php
<?php
require_once("configure_first.php");
$nmTable = "p_mapel";

$huruf = "<font face=\"Times New Roman\" size=\"2\">";

$query="select * from ".$nmTable." a left join m_kurikulum b on a.id_kurikulum = b.kurikulum_id left join m_kelas c on a.id_kelas = c.kelas_id left join m_matapelajaran d on a.id_mp = d.mp_id left join login_user e on a.id_user = e.user_id";
if(isset($sql_select)){
	$sql_select = implode(" and ",$sql_select);
	$query = $query ." where ".$sql_select;
}
$query.=" order by mapel_id asc";
$iData=sAllData($query);

$namaFile = "Laporan_Siswa_Download_Mapel.xls";
// $namaFile = "Rekap ".$jenis_nilai_nama.".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();

$baris = 0;
xlsWriteLabel($baris,0,"No.");               
xlsWriteLabel($baris,1,"Keterangan");              
xlsWriteLabel($baris,2,"Mata Pelajaran");
xlsWriteLabel($baris,3,"Kelas");               
xlsWriteLabel($baris,4,"Kurikulum");               
xlsWriteLabel($baris,5,"Unduh");               
xlsWriteLabel($baris,6,"Uploader");               

for($a=0,$b=count($iData);$a<$b;$a++) {
	$baris = $baris+1;
	xlsWriteLabel($baris,0,($a+1));               
	xlsWriteLabel($baris,1,$iData[$a]["mapel_ket"]);               
	xlsWriteLabel($baris,2,$iData[$a]["mp_nama"]);               
	xlsWriteLabel($baris,3,$iData[$a]["kelas_nama"]);               
	xlsWriteLabel($baris,4,$iData[$a]["kurikulum_nama"]);               
	xlsWriteLabel($baris,5,"http://sims.sabilillahsidoarjo.sch.id/akademik/mediamanager/".$iData[$a]["mapel_url"]);               
	xlsWriteLabel($baris,6,$iData[$a]["user_nama"]);               
}

xlsEOF();
exit();


?>
<script>window.close();</script>