<? 
require('fpdf.php');
//require('thaipdfclass.php');
//include("class.mysqldb.php");
//include("connectdb.php");

function utf8_to_tis620($string) {
  $str = $string;
  $res = "";
  for ($i = 0; $i < strlen($str); $i++) {
    if (ord($str[$i]) == 224) {
      $unicode = ord($str[$i+2]) & 0x3F;
      $unicode |= (ord($str[$i+1]) & 0x3F) << 6;
      $unicode |= (ord($str[$i]) & 0x0F) << 12;
      $res .= chr($unicode-0x0E00+0xA0);
      $i += 2;
    } else {
      $res .= $str[$i];
    }
  } 
  return $res;
}
function thaidate($str) {
    if($str == "0000-00-00") { return "ไม่กำหนด"; }
    $y = substr($str, 0, 4) + 543;
    $m = substr($str, 5, 2) + 0;
    $d = substr($str, 8, 2);                      
    $month = array("ม.ค.", "ก.พ.", "มี.ค", "เม.ย.", "พ.ค.", "มิ.ย.", "ก.ค.", "ส.ค.", "ก.ย.", "ต.ค.", "พ.ย.", "ธ.ค.");
    return $d . " " . $month[$m-1] . " " . $y;
}

//---------------------------------------------------------------------- หน้าสร้างตารางแสดงชื่อผู้ใช้งาน -----------------------------------
$footer =  '';
$header = 'ตารางแสดงรายชื่อกลุ่ม';
$pdf=new ThaiPDF();
$pdf->SetThaiFont();
$pdf->SetHeader( '', 1, 'R', 1);  // กำหนดหัวกระดาษ ชิดขวา
$pdf->SetFooter($footer, 0, 'L', 1);  // กำหนดท้ายกระดาษ ชิดซ้าย
$pdf->AddPage(); // สร้างหน้าใหม่
$pdf->SetFont('FreesiaUPC','B',16);  // กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
$pdf->SetTextColor(0,0,0); // กำหนดสีตัวอักษร

foreach($_REQUEST as $key => $value) { $$key = $value; }
$end = $numadd;
$sql = "select * from pay";  //ดึงข้อมูลจากฐานข้อมูล ตารางชื่อ groups
</style>
$result = mysql_query($sql);
$data = mysql_fetch_object($result);
$gdesc = utf8_to_tis620($data->gdesc);
for($i = 0; $i < $numadd; $i++) {// page 1 File Table  กำหนดลูปในการแสดงข้อมูล ใน 1 หน้ากระดาษ
    if($i % 25 == 0) {  // สร้างบรรทัด 1 หน้ากระดาษโดยประมาณ 25 บรรทัด
        if($i != 0) {    // เริ่มแสดงข้อมูล
            $pdf->Ln(4); // ขนาดความกว้างของบรรทัดเท่ากับ 4
            $pdf->Cell(18,7,'หมายเหตุ :',0,0,'L'); // แสดงข้อความ"หมายเหตุ"  ,ตำแหน่งชิดซ้าย ตำแหน่ง cell ที่ 18,7  (อยู่ท้ายตาราง)
            $pdf->Cell(0,7,'ชื่อผู้ใช้และรหัสผ่านข้างต้นสามารถใช้งานได้ถึงวันเวลาที่กำหนด',0,0,'J'); // แสดงข้อความ"ชื่อผู้ใช้และรหัส                                     ผ่านข้างต้นสามารถใช้งานได้ถึงวันเวลาที่กำหนด"  ,ตำแหน่ง cell ที่ 0,7 และเว้นระยะ (อยู่ท้ายตาราง)
            if($select1=='WISPr-Session-Terminate-Time'){ // เงื่อนไขแบบ WISPr-Session-Terminate-Time
                $pdf->Cell(0,7,'บัตรหมดอายุ: ' . thaidate($gexpire) ,0,0,'R'); }// แสดงข้อความ"บัตรหมดอายุ" และ ค่าที่วันที่หมดอายุ                                                                                            จากฐานข้อมูล ,ตำแหน่ง cell ที่ 18,7 และชิดขวา(อยู่ท้ายตาราง)
            if($select1=='Usage-Limit'){ // เงื่อนไข แบบ Usage-Limit
                $gexpire1=$gexpire /60/60;   // คำนวณค่าที่จะแสดงให้เป็นชั่วโมง
                $pdf->Cell(0,7,'บัตรหมดอายุ : '  .$gexpire1. ' ชั่วโมง',0,0,'R');}  // แสดงข้อความ"บัตรหมดอายุ" และ ค่าชั่วโมงที่หมด                                                                                       อายุจากฐานข้อมูล ,ตำแหน่ง cell ที่ 18,7 และชิดขวา(อยู่ท้ายตาราง)
            $pdf->Ln(20);// ขนาดความกว้างของบรรทัดเท่ากับ 20
            $pdf->SetFont('FreesiaUPC','',14); // กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
            $pdf->Cell(0,0,'วิทยาเขต  .....................',0,0,'L');  //แสดงข้อความ "วิทยาเขต ......................" ตำแหน่งชิดซ้าย
            $pdf->Cell(0,0,'ลงชื่อ........................',0,0,'R'); //แสดงข้อความ "ลงชื่อ ........................." ตำแหน่งชิดขวา
            $pdf->Ln(12);// ขนาดความกว้างของบรรทัดเท่ากับ 12
            $pdf->Cell(0,0,'(..................................)',0,1,'R');   //แสดงข้อความ ".........................." ตำแหน่งชิดขวา
            $pdf->Ln(12);// ขนาดความกว้างของบรรทัดเท่ากับ 12
            $pdf->Cell(0,0,'........../............../.............',0,1,'R');  //แสดงข้อความ " ......../.........../..........." ตำแหน่งชิดขวา
            $pdf->Ln(1);// ขนาดความกว้างของบบรทัดเท่ากับ 1
            $pdf->Cell(0,9,'ผู้ขออนุมัติ',0,0,'R');   //แสดงข้อความ "ผู้ขออนุมัติ" ตำแหน่งชิดขวา
            $pdf->Ln(12);// ขนาดความกว้างของบรรทัดเท่ากับ 12
            $pdf->Cell(0,0,'ฝ่ายวิศวกรรมเครือข่าย : สำนักวิทยบริการและเทคโนโลยีสารสนเทศ',0,0,'L');
            $pdf->AddPage();  // สร้างหน้าใหม่
         }
        $pdf->SetFont('FreesiaUPC','B',18); // กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
        $pdf->Cell(0,0,'Rajamangala University of Technology Srivijaya '   ,0,1,'L');
        $pdf->SetFont('FreesiaUPC','B',14); // กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
        $pdf->Cell(0,0,'[ Srivijaya WiFi ]' ,0,1,'R');
        $pdf->Ln(7); // ขนาดความกว้างของบรรทัดเท่ากับ 7
        $pdf->SetFont('FreesiaUPC','B',12); // กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
        $pdf->Cell(0,0,'ตารางแสดงรายชื่อกลุ่ม' . $gdesc . ' ( จำนวนทั้งสิ้น ' . $end . ' คน )'   ,0,1,'L');
        $pdf->Cell(0,0,date('Y-m-d_H-i',time())  ,0,1,'R');
        $pdf->Ln(3);// ขนาดความกว้างของบรรทัดเท่ากับ 3
        $pdf->SetFont('FreesiaUPC','B',14); // กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
        $pdf->Cell(10,7,'ที่',1,0,'C');
        $pdf->Cell(30,7,'ชื่อเข้าระบบ',1,0,'C');
        $pdf->Cell(50,7,'ชื่อ - นามสกุล',1,0,'C');
        $pdf->Cell(40,7,'หมายเลขบัตร ',1,0,'C');
        $pdf->Cell(0,7,'หน่วยงาน / ที่อยู่',1,0,'C');
        $pdf->Ln(7);// ขนาดความกว้างของบรรทัดเท่ากับ 7    
    }   // row of data Table
    $pdf->SetFont('FreesiaUPC','',12); // กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
    $pdf->Cell(10,7,$i+1 . '.',1,0,'C');
    $pdf->Cell(30,7,$username[$i]  ,1,0,'C');
    $pdf->Cell(50,7,'',1,0,'L');
    $pdf->Cell(40,7,'',1,0,'L');
    $pdf->Cell(0,7,'',1,0,'L');
    $pdf->Ln(7); // ขนาดความกว้างของบรรทัดเท่ากับ 7   
}
$pdf->Ln(4);// ขนาดความกว้างของบรรทัดเท่ากับ 4
$pdf->Cell(18,7,'หมายเหตุ :',0,0,'L');
$pdf->Cell(0,7,'ชื่อผู้ใช้และรหัสผ่านข้างต้นสามารถใช้งานได้ถึงวันเวลาที่กำหนด',0,0,'J');
if($select1=='WISPr-Session-Terminate-Time'){$pdf->Cell(0,7,'บัตรหมดอายุ: ' . thaidate($gexpire) ,0,0,'R');}
if($select1=='Usage-Limit'){
    $gexpire1=$gexpire /60/60;
    $pdf->Cell(0,7,'บัตรหมดอายุ : '  .$gexpire1. ' ชั่วโมง',0,0,'R');}
$pdf->Ln(20);// ขนาดความกว้างของบรรทัดเท่ากับ 20
$pdf->SetFont('FreesiaUPC','',14);// กำหนดรูปแบบตัวอักษร,ตัวหนา,ขนาด
$pdf->Cell(0,0,'วิทยาเขต  ....................................................................',0,0,'L'); 
$pdf->Cell(0,0,'ลงชื่อ.......................................................................',0,0,'R');
$pdf->Ln(12);// ขนาดความกว้างของบรรทัดเท่ากับ 12
$pdf->Cell(0,0,'(..................................................................)',0,1,'R');
$pdf->Ln(12);// ขนาดความกว้างของบรรทัดเท่ากับ 12
$pdf->Cell(0,0,'................./........................../.......................',0,1,'R');
$pdf->Ln(1);// ขนาดความกว้างของบรรทัดเท่ากับ 1
$pdf->Cell(0,9,'ผู้ขออนุมัติ',0,0,'R');
$pdf->Ln(12);// ขนาดความกว้างของบรรทัดเท่ากับ 20    
$pdf->Cell(0,0,'ฝ่ายวิศวกรรมเครือข่าย : สำนักวิทยบริการและเทคโนโลยีสารสนเทศ',0,0,'L');