上課範例：admin/pdf_all.php

17-3 上課範例：admin/pdf_all.php
01<?php
02include_once "header_admin.php";
03include_once "../up_file.php";
04require_once('../class/tcpdf/config/lang/zho.php');
05require_once('../class/tcpdf/tcpdf.php');
06 
07$sn=empty($_REQUEST['sn'])?"0":intval($_REQUEST['sn']);
08 
09//實體化PDF物件
10$pdf = new TCPDF("L", PDF_UNIT, "A5", true, 'UTF-8', false);
11//$pdf->setPrintHeader(false); //不要頁首
12//$pdf->setPrintFooter(false); //不要頁尾
13 
14$pdf->SetMargins(25, 25);
15$pdf->setHeaderMargin(5);
16$pdf->setFooterMargin(10);
17 
18$pdf->setHeaderData('ck2.jpg', 40, '我的通訊錄', 'http://163.26.52.243/~tad0616/modules/contact', array(27,49,0), array(71,71,70));
19$pdf->setFooterData(array(27,49,0), array(71,71,70));
20$pdf->setHeaderFont(array('droidsansfallback','B','14'));
21$pdf->setFooterFont(array('droidsansfallback','I','16'));
22 
23$pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);  //設定自動分頁
24 
25$pdf->setLanguageArray($l); //設定語言相關字串
26 
27$pdf->setFontSubsetting(true); //產生字型子集（有用到的字才放到文件中）
28 
29$pdf->SetFont('droidsansfallback', '', 12, '', true); //設定字型
30 
31 
32 
33$sql = "select * from `".$xoopsDB->prefix("contact")."`";
34$result = $xoopsDB->query($sql) or redirect_header($_SERVER['PHP_SELF'],3, mysql_error());
35 
36$all_content="";
37$cate=get_contact_cate_all();
38 
39while($all=$xoopsDB->fetchArray($result)){
40  //以下會產生這些變數： $tel , $email , $name , $gsn , $sn , $birthday , $zip , $county , $city , $addr
41  foreach($all as $k=>$v){
42    $$k=$v;
43  }
44 
45  $pdf->AddPage(); //新增頁面
46 
47  $pdf->setTextShadow(array('enabled'=>false, 'depth_w'=>0.2, 'depth_h'=>0.2, 'color'=>array(196,196,196), 'opacity'=>1, 'blend_mode'=>'Normal'));//文字陰影
48 
49 
50  $photo_file=get_pic_file('photo' , $sn , 1);
51  $photo=empty($photo_file)?"":"<img src=\"{$photo_file}\">";
52 
53  $html="<h1>「{$name}」通訊錄</h1>
54  <table border=\"1\" cellpadding=\"4\">
55  <tr><th width=\"50\" align=\"center\" bgcolor=\"#CCFF66\">電話</th><td width=\"200\">{$tel}</td>
56  <td width=\"200\" rowspan=\"4\">$photo</td></tr>
57  <tr><th align=\"center\" bgcolor=\"#CCFF66\">信箱</th><td>{$email}</td></tr>
58  <tr><th align=\"center\" bgcolor=\"#CCFF66\">生日</th><td>{$birthday}</td></tr>
59  <tr><th align=\"center\" bgcolor=\"#CCFF66\">地址</th><td>{$zip} {$county}{$city}{$addr}</td></tr>
60  </table>";
61 
62  $pdf->writeHTML($html);
63 
64  include_once XOOPS_ROOT_PATH."/modules/tadtools/qrcode/qrcode.php";
65  $a = new QR("Email:{$email}");
66  file_put_contents(XOOPS_ROOT_PATH."/uploads/qrcode/{$sn}.gif",$a->image(2));
67 
68 
69  $pdf->Image(XOOPS_URL."/uploads/qrcode/{$sn}.gif", 170, 22 , 15, 15, 'gif');
70 
71}
72$pdf->Output('contact.pdf', 'I');
73 
74 
75 
76?>
17-3 上課範例：admin/pdf_all.php

搜尋

QR Code 區塊

快速登入

書籍目錄

線上使用者
