Tad 教材網 - 線上書籍

:::

4. XOOPS的表單Class

5. 分類管理功能

\[1011\]XOOPS 2.5 模組開發
======================

```
<pre class="brush: php;" title="code">
<?php
include 'header.php';

/*** 引入檔案 ***/

/*** 函數檔 ***/
function cate_form(){

include_once(XOOPS_ROOT_PATH."/class/xoopsformloader.php");
  
  //建立表單物件 post , get
  $form = new XoopsThemeForm('分類設定', '', 'cate.php', 'post');

//建立文字輸入框物件
  $XoopsFormText =new XoopsFormText('分類標題', 'cate_title', 40 , 255);
  $XoopsFormText->setDescription ("請設定一個分類名稱");
  $form->addElement($XoopsFormText , true);
  
  
  $form->addElement(new XoopsFormText('分類排序', 'cate_sort', 4 , 4) , true);

//建立單選物件
  $XoopsFormRadio =new XoopsFormRadio('是否使用', 'cate_enable' , '1');
  //$XoopsFormRadio->addOption('1', '是');
  //$XoopsFormRadio->addOption('0', '否');
  $options['1']='是';
  $options['0']='否';
  $XoopsFormRadio->addOptionArray($options);

$form->addElement($XoopsFormRadio);

$form->addElement(new XoopsFormHidden('op', 'insert'));
  $form->addElement(new XoopsFormButton('', '', '送出', 'submit'));

$f=$form->render();
  
  return $f;
}

//寫入函數
function insert_cate(){
  global $xoopsDB;
  $sql="insert into ".$xoopsDB->prefix("tad_note_cate")." (`cate_title` , `cate_sort` , `cate_enable`) values('{$_POST['cate_title']}' , '{$_POST['cate_sort']}' , '{$_POST['cate_enable']}')";
  $xoopsDB->queryF($sql) or redirect_header('cate.php', 3, mysql_error());
}

/*** 流程判斷 ***/
$op=isset($_REQUEST['op'])?$_REQUEST['op']:"";
switch($op){

case "insert":
  insert_cate();
  header('location:cate.php'); //轉向
  break;

default:
  $main = cate_form();
}

/*** 輸出 ***/
echo $main;

include "footer.php";
?>
```

:::