H_encod = "gb2312"; //设置字符编码(wap页的编码) $H_wml -> H_head(); //设置头信息 $H_wml -> H_nocah(); //无缓存(是否缓存)需要缓存则不需要写该行 $H_wml -> H_card("cd1","叶绿辉香"); //设定card标签 $H_wml -> H_img("image/logo.wbmp","Logo"); //设定图片(图片路径,注释) $H_wml -> H_br(); //换行 $H_wml -> H_link("index.php","去首页"); //超链接(连接地址,文字) $H_wml -> H_str(" "); //空格 $H_wml -> H_br(); //换行 $H_wml -> H_str("QQ:273642232;Email:yin273642232@163.com"); //字符串 $H_wml -> H_disp(); //显示*************************************///Start Classclass H_wml{ public $H_debug = false; public $H_desce; //描述 public $H_ROOT_DIR; //文件地址路径 public $H_str; //字符 public $H_encod; //字符编码 public $H_bqi=0; public $H_gbary; public function __construct(){ //当实例化一个对象的时候，这个对象的这个方法首先被调用 return ''; } public function __destruct(){ //当删除一个对象或对象操作终止的时候，调用该方法 return ''; } public function __get($key){ //当试图读取一个并不存在的属性的时候被调用 return '['.$key.'] Variable not find'; } public function __set($key,$val){ //当试图向一个并不存在的属性写入值的时候被调用 return '['.$key.'] Variable not find'; } public function __call($key,$args){ //当试图调用一个对象并不存在的方法时，调用该方法 return '['.$key.'] Function not find'; } public function __toString(){ //当打印一个对象的时候被调用 return $this -> H_desce(); } public function __clone(){ //当对象被克隆时，被调用 return "clone"; } public function H_desce(){ //返回描述 $this -> H_desce .= '类名:H_wml-WML处理;'; $this -> H_desce .= '函数:H_head(),返回:这是wml头部,参数:无;'; $this -> H_desce .= '函数:H_endbq($val),返回:记录结束标签,参数:$val-被记录的标签;'; $this -> H_desce .= '函数:H_card($id,$title),返回:设置卡片,参数:$id-该卡片的id.$title-该卡片的title;'; $this -> H_desce .= '函数:H_nocah(),返回:设置缓存,参数:无;'; $this -> H_desce .= '函数:H_p($str,$align="left"),返回:设置一行,参数:$str-改行字符串.$align-显示模式(默认居左 left);'; $this -> H_desce .= '函数:H_link($link,$str),返回:设置连接,参数:$link-连接地址.$str连接字符;'; $this -> H_desce .= '函数:H_img($src,$alt),返回:设置图片,参数:$src-图片文件路径.$alt-图片描述;'; $this -> H_desce .= '函数:H_input($name,$type="text",$format="",$maxlength="10",$emptyok="false"),返回:设置输入框,参数:$name-名字.$type-类型(默认text).$format-格式,$maxlength-最大长度.$emptyok-是否记录(默认不记录);'; $this -> H_desce .= '函数:H_br(),返回:设置换行,参数:无;'; $this -> H_desce .= '函数:H_str($str),返回:设置字符,参数:$str-字符串;'; $this -> H_desce .= '函数:H_disp(),返回:输出信息(wml内容),参数:无;'; return $this -> H_desce; } public function H_head(){ //设置头信息 $this -> H_gbary=""; $this -> H_bqi = 0; $H_head = header('Content-type:text/vnd.wap.wml'.($this -> H_encod == '' ? '' : ';charset='.$this -> H_encod)); $H_head .= "\n"; $H_head .= " H_encod == '' ? '' : ' encoding="'.$this -> H_encod.'"')."?>"; $H_head .= "\n"; $H_head .= ''; $H_head .= "\n"; $H_head .= ' '; $H_head .= "\n"; $this -> H_endbq(' '); $this -> H_str = $H_head; return true; } public function H_endbq($val){ $this -> H_gbary[$this -> H_bqi] = $val; ++$this -> H_bqi; return true; } public function H_card($id,$title){ //设置卡片 $H_card = " "; $H_card .= "\n"; $this -> H_endbq(' '); $this -> H_str .= $H_card; return true; } public function H_nocah(){ //设置缓存 $H_nocah = " "; $H_nocah .= "\n"; $this -> H_str .= $H_nocah; return true; } public function H_p($str,$align="left"){ //设置一行 $H_p = "".$str.'
'; $H_p .= "\n"; $this -> H_str .= $H_p; return true; } public function H_link($link,$str){ //设置连接 $H_link = "".$str.""; $H_link .= "\n"; $this -> H_str .= $H_link; return true; } public function H_img($src,$alt){ //设置图片 $H_img = '
'; $H_img .= "\n"; $this -> H_str .= $H_img; return true; } public function H_input($name,$type="text",$format="",$maxlength="10",$emptyok="false"){ //设置输入框 $H_input = ''; $H_input .= "\n"; $this -> H_str .= $H_img; return true; } public function H_br(){ //设置换行 $this -> H_str .= ''; return true; } public function H_str($str){ //设置字符 $this -> H_str .= $str; return true; } public function H_disp(){ //输出信息 while($this -> H_bqi > 0){ $val .= "\n".$this -> H_gbary[$this -> H_bqi -1 ]; --$this -> H_bqi; } echo $this -> H_str.$val; return true; } public function text2wml($content){ // 将 WML 变量前缀"$"转义 $content = str_replace('$', '$$', $content); // 转换特殊字符，并将 Windows/DOS 换行符（\r\n）转化为 Unix 换行符（\n） $content = str_replace("\r\n", "\n", htmlspecialchars($content)); // 通过换行符来将各行分开进行处理（过滤空行） $content = explode("\n", $content); for ($i = 0; $i < count($content); $i++) { // 过滤首尾空格 $content[$i] = trim($content[$i]); // 如果去掉全角空格为空行，则设为空行，否则不对全角空格过滤。 if (str_replace(" ", "", $content[$i]) == "") $content[$i] = ""; } //合并各行，转化为 WML，并过滤掉空行 $content = str_replace("\n", "", implode("\n", $content)."\n"); return $content; } public function html2wml($content,$H_p="",$H_str=""){ // 过滤掉样式表和脚本 $content = preg_replace("/