程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> PHP編程 >> 關於PHP編程 >> 強烈推薦靜態新聞列表自動生成程序。

強烈推薦靜態新聞列表自動生成程序。

編輯:關於PHP編程

PHP代碼:-------------------------------------------------------------------------------- /* 版權所有:日出東方XP 2004.7.17 */ function CreateShtml() { ob_start(array("callback_CreateShtml","callback_GoToShtml")); } function callback_CreateShtml($buffer) { $page = intval(@$_REQUEST["page"]); $fileName = $_SERVER[DOCUMENT_ROOT] . dirname($_SERVER[PHP_SELF]) . "/" . basename($_SERVER[PHP_SELF],".php") . ($page==0 ? "" : "_" . strval($page)) . ".htm"; $fp = fopen($fileName,"wb"); fwrite($fp,$buffer); fclose($fp); return $buffer; } function callback_GoToShtml($buffer) { $page = intval(@$_REQUEST["page"]); $fileName = basename($_SERVER[PHP_SELF],".php") . ($page==0 ? "" : "_" . strval($page)) . ".htm"; header("location:" . $fileName); return $buffer; } function GoToShtml() { $page = intval(@$_REQUEST["page"]); $fileName = basename($_SERVER[PHP_SELF],".php") . ($page==0 ? "" : "_" . strval($page)) . ".htm"; if(file_exists($fileName)) header("location:" . $fileName); } function DeleteShtml($fileName=NULL) { if(is_null($fileName)) $fileName = $_SERVER[DOCUMENT_ROOT] . $_SERVER[PHP_SELF]; if($fileName[0]=="/") $fileName = $_SERVER[DOCUMENT_ROOT] . $fileName; $path = dirname($fileName); $dir = dir($path); $patten = "/^" . basename($fileName, ".php") . "(_[0-9]+)?.htm/"; while(($entry = $dir->read())!==false) { if(is_file($path . "/" .$entry) && preg_match($patten,$entry)) unlink ($path . "/" . $entry); } }

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved