Tad 教材網 - 線上書籍

:::

\[1042\] XOOPS模組開發進階
====================

```
<pre class="brush:php;highlight:[62];">
<?php
include_once "header.php";

include_once $GLOBALS['xoops']->path('/modules/system/include/functions.php');
$def_city    = system_CleanVars($_REQUEST, 'city', '', 'string');
$def_cate_sn = system_CleanVars($_REQUEST, 'cate_sn', '', 'int');
$def_county    = system_CleanVars($_REQUEST, 'county', '', 'string');
$def_keyword    = system_CleanVars($_REQUEST, 'keyword', '', 'string');
$sn = system_CleanVars($_REQUEST, 'sn', '', 'int');

require_once(TADTOOLS_PATH.'/tcpdf/tcpdf.php');
$pdf = new TCPDF("P");

$pdf->setPrintHeader(true); //不要頁首
$pdf->setPrintFooter(true); //不要頁尾
$pdf->SetMargins(10, 25);
$pdf->setHeaderMargin(5); //頁首上方與頁面頂端的距離
$pdf->setFooterMargin(20); //頁尾上方與頁面尾端的距離

$pdf->setHeaderData('pdf_logo.png', 50, '我的通訊錄', '常用電話', array(0, 0, 255), array(150, 150, 150));
$pdf->setFooterData(array(0, 0, 0), array(0, 0, 0));
$pdf->setHeaderFont(array('droidsansfallback', '', 12));
$pdf->setFooterFont(array('droidsansfallback', '', 12));

$pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);  //設定自動分頁
$pdf->setFontSubsetting(true); //產生字型子集（有用到的字才放到文件中）
$pdf->SetFont('droidsansfallback', '', 10, '', true); //設定字型
$pdf->AddPage(); //新增頁面

if($sn){

$myts = MyTextSanitizer::getInstance();

$sql = "select * from `" . $xoopsDB->prefix("phone_book") . "`
  where `sn` = '{$sn}' ";
  $result = $xoopsDB->query($sql) or web_error($sql);
  $all = $xoopsDB->fetchArray($result);

//以下會產生這些變數： $sn, $cate_sn, $name, $birthday, $phone, $email, $zip, $county, $city, $addr, $note
  foreach ($all as $k => $v) {
      $$k = $v;
  }

//取得分類資料(phone_book_cate)
  //$phone_book_cate_arr = get_phone_book_cate($cate_sn);

//過濾讀出的變數值
  $name     = $myts->htmlSpecialChars($name);
  $birthday = $myts->htmlSpecialChars($birthday);
  $phone    = $myts->htmlSpecialChars($phone);
  $email    = $myts->htmlSpecialChars($email);
  $zip      = $myts->htmlSpecialChars($zip);
  $county   = $myts->htmlSpecialChars($county);
  $city     = $myts->htmlSpecialChars($city);
  $addr     = $myts->htmlSpecialChars($addr);
  $note     = $myts->displayTarea($note, 0, 1, 0, 1, 1);

$pdf->SetFont('droidsansfallback', '', 36, '', true); //設定字型

$pdf->Image(XOOPS_ROOT_PATH.'/uploads/photo.jpg', $x='', $y='', 80, 80, $type='', $link='', $align='', $resize=false, $dpi=300, $palign='', $ismask=false, $imgmask=false, $border=0, $fitbox=false, $hidden=false, $fitonpage=false, $alt=false, $altimgs=array());

$pdf->setTextShadow(array('enabled'=>true, 'depth_w'=>0.2, 'depth_h'=>0.2, 'color'=>array(196,196,196), 'opacity'=>1, 'blend_mode'=>'Normal'));
  $pdf->Cell(80, 80, $name, 1, 0, 'C','','','','','','B');
  $pdf->setTextShadow(array('enabled'=>false));

$pdf->SetFont('droidsansfallback', '', 16, '', true); //設定字型

$pdf->Cell(30, 20, '電話', 1, 0, 'C');
  $pdf->Cell(80, 20, $phone, 1, 1, 'C');

//$pdf->Cell(80, 80, '', 0, 0, 'C');
  $pdf->SetX(90);
  $pdf->Cell(30, 20, '信箱', 1, 0, 'C');
  $pdf->Cell(80, 20, $email, 1, 1, 'C');

$pdf->SetX(90);
  $pdf->Cell(30, 20, '生日', 1, 0, 'C');
  $pdf->Cell(80, 20, $birthday, 1, 1, 'C');

$pdf->SetX(90);
  $pdf->Cell(30, 20, '地址', 1, 0, 'C');
  //$pdf->Cell(80, 20, "{$zip}{$county}{$city}{$addr}", 1, 1, 'C','','',1);
  $pdf->MultiCell(80, 20, "{$zip}{$county}{$city}{$addr}", 1, 'L');

}else{

$and_name=$and_cate_sn=$and_city="";
  if(!empty($def_keyword)){
      $and_name="and (`name` like '%{$def_keyword}%' or `city` like '%{$def_keyword}%' or `county` like '%{$def_keyword}%' or `addr` like '%{$def_keyword}%')";
  }else{
      $and_cate_sn = empty($def_cate_sn) ? "" : "and `cate_sn` = '{$def_cate_sn}'";
      $and_county = empty($def_county) ? "" : "and `county` = '{$def_county}'";
      $and_city = empty($def_city) ? "" : "and `city` = '{$def_city}'";
  }

//取得分類資料
  $phone_book_cate_arr = get_phone_book_cate_arr();

$myts = MyTextSanitizer::getInstance();

$sql = "select * from `" . $xoopsDB->prefix("phone_book") . "` where 1 $and_cate_sn $and_county $and_city $and_name limit 0,100";

$result = $xoopsDB->query($sql)
  or web_error($sql);

$html='<table width="100%" border="1" cellpadding="4" cellspacing="0">';
  while ($all = $xoopsDB->fetchArray($result)) {
      //以下會產生這些變數： $sn, $cate_sn, $name, $birthday, $phone, $email, $zip, $county, $city, $addr, $note
      foreach ($all as $k => $v) {
          $$k = $v;
      }

//過濾讀出的變數值
      $name     = $myts->htmlSpecialChars($name);
      $birthday = $myts->htmlSpecialChars($birthday);
      $phone    = $myts->htmlSpecialChars($phone);
      $email    = $myts->htmlSpecialChars($email);
      $zip      = $myts->htmlSpecialChars($zip);
      $county   = $myts->htmlSpecialChars($county);
      $city     = $myts->htmlSpecialChars($city);
      $addr     = $myts->htmlSpecialChars($addr);
      $note     = $myts->displayTarea($note, 0, 1, 0, 1, 1);

$html.="
      <tr>
        <td width=\"40\" align=\"center\" bgcolor=\"yellow\">$name</td>
        <td width=\"60\" align=\"center\">$birthday</td>
        <td width=\"75\" align=\"center\">$phone</td>
        <td width=\"120\">$email</td>
        <td width=\"190\">{$zip}{$county}{$city}{$addr}</td>
        <td width=\"55\" align=\"center\">{$phone_book_cate_arr[$cate_sn]['cate_title']}</td>
      </tr>
      ";
  }

$html.="</table>";

$pdf->writeHTML($html);

}

//PDF內容設定
$pdf->Output('通訊錄.pdf', 'I');
// $pdf->Output('通訊錄.pdf', 'I');
// $pdf->Output(XOOPS_ROOT_PATH.'/uploads/contact.pdf', 'F');
```

:::