PHP+ACCESS 文章管理程序代码


答案：
复制代码 代码如下:
 
<?php 
session_start(); 
//========================== 
//作者：biyuan 
//时间：2006.07 
//联系：QQ6010707 
//========================== 
?> 
<html> 
<head> 
<title>碧原网络PHP+ACCESS文章管理系统</title> 
<meta http-equiv="content-type" content="text/html; charset=gb2312" /> 
<style type="text/css"> 
body { 
margin:0px; 
text-align:center; 
font-size:12px; 
font-family:verdana; 
} 
td { 
font-size:12px; 
height:28px; 
padding:4px; 
font-family:verdana; 
} 
A:link, 
A:visited, 
A:active { 
color: #005a17; text-decoration: none; 
} 
A:hover { 
color: #ff5a00; text-decoration: underline; 
} 
</style> 
</head> 
<body> 
<?php 
//================================== 
//连接数据库 
//================================== 
@$conn = new com("ADODB.Connection"); 
$conn->Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" . realpath("article.mdb")); 
//================================== 
//文章导航 
//================================== 
function article_menu(){ 
global $conn; 
@$sql = "Select * From List"; 
@$rs = $conn->Execute($sql); 
while(!$rs->Eof){ 
echo "| <a href=>$rs->MoveNext(); 
} 
echo "| <a href=>$rs->Close(); 
if(@$_SESSION["ARTICLEADMIN"] == "BY_PHP_ARTICLE"){ 
echo "<br />管理选项-> | <a href=>} 
} 
//================================== 
//文章列表：article_list(文章分类ID) 
//================================== 
function article_list($str){ 
global $conn; 
@$sql = "Select id,by_title,by_name,by_time,by_count From Article Where by_class = " . $str . " Order By id desc"; 
@$rs = $conn->Execute($sql); 
if(!$rs->Eof){ 
echo "<table border=\"0\" cellspacing=\"1\" cellpadding=\"0\" bgcolor=\"#cccccc\">\r\n" 
. " <tr bgcolor=\"#F3F3F3\" align=\"center\">\r\n" 
. " <td>文章标题</td><td>文章作者</td><td>发表时间</td><td>浏览次数</td>\r\n" 
. " </tr>\r\n"; 
while(!$rs->Eof){ 
echo " <tr bgcolor=\"#FFFFFF\">\r\n" 
. " <td><a href=>. " </tr>\r\n"; 
$rs->MoveNext(); 
} 
echo "</table>\r\n"; 
} 
else { 
echo "<br />该分类不存在或暂时没有任何文章!"; 
} 
$rs->Close(); 
} 
//================================== 
//文章详细：article_look(文章ID) 
//================================== 
function article_look($str){ 
global $conn; 
@$sql = "Select * From Article Where id = " . $str; 
@$rs = $conn->Execute($sql); 
@$usql= "Update Article Set by_count = (by_count + 1) Where id = " . $str; 
$conn->Execute($usql); 
if(!$rs->Eof){ 
@$body = $rs->Fields[5]->value; 
$body = str_replace("[url=file://%22,%22%22,$body/]\\","",$body[/url]); 
echo "<table border=\"0\" width=\"60%\" cellspacing=\"1\" cellpadding=\"0\" bgcolor=\"#cccccc\">\r\n" 
. " <tr bgcolor=\"#F3F3F3\" align=\"center\">\r\n" 
. " <td style=\"font-size:14px;font-weight:bold\">" . $rs->Fields[1]->value . "</td>\r\n" 
. " </tr>\r\n" 
. " <tr bgcolor=\"#F3F3F3\" align=\"center\">\r\n" 
. " <td>文章作者:" . $rs->Fields[2]->value . " | 发表时间:" . date("Y-m-d H:i:s",$rs->Fields[3]->value) . " | 浏览次数:" . $rs->Fields[4]->value . "</td>\r\n" 
. " </tr>\r\n" 
. " <tr bgcolor=\"#FFFFFF\">\r\n" 
. " <td>" . $body . "</td>\r\n" 
. " </tr>\r\n" 
. " <tr bgcolor=\"#F3F3F3\">\r\n" 
. " <td align=\"right\">【 <a href=>. " </tr>\r\n" 
. " </table>\r\n" 
. " <script language=\"JavaScript\">document.title += \"--" . $rs->Fields[1]->value . "\";</script>\r\n"; 
} 
else { 
echo "<br />该文章不存在或已被管理员删除!"; 
} 
$rs->Close(); 
} 
//================================== 
//后台:分类管理 
//================================== 
function admin_class(){ 
global $conn; 
@$sql = "Select * From List"; 
@$rs = $conn->Execute($sql); 
echo "<form action=\"\" method=\"post\" name=\"frm\">\r\n"; 
while(!$rs->Eof){ 
echo "类别:<input type=\"text\" value=\"" . $rs->Fields[1]->value . "\" name=\"class_" . $rs->Fields[0]->value . "\" /> 编号:<input type=\"text\" value=\"" . $rs->Fields[2]->value . "\" name=\"class_cid_" . $rs->Fields[0]->value . "\" /> <input type=\"button\" value=\"修改\" onclick=\"frm.action='?admin=class&class=edit&id=" . $rs->Fields[0]->value . "';submit();\" /> <input type=\"button\" value=\"删除\" onclick=\"frm.action='?admin=class&class=del&id=" . $rs->Fields[0]->value . "';submit();\" /><br />\r\n"; 
$rs->MoveNext(); 
} 
echo "类别:<input type=\"text\" name=\"class_name\" /> 编号:<input type=\"text\" name=\"class_cid\" /> <input type=\"button\" value=\"增加\" onclick=\"frm.action='?admin=class&class=add';submit();\" /> <input type=\"button\" value=\"闲置\" disabled />\r\n" 
. "</form>\r\n"; 
//增加一个类别 
if(@$_GET["class"] == "add"){ 
if(@$_POST["class_name"] == "" || @$_POST["class_cid"] == ""){ 
echo "<br />填写不完整!"; 
echo "<script language=\"JavaScript\">setTimeout(\"history.back();\", 2000);</script>"; 
exit(); 
} 
else { 
@$sql = "Insert into List(by_list,by_cid) Values('" . $_POST["class_name"] . "' , '" . $_POST["class_cid"] . "')"; 
$conn->Execute($sql); 
echo "<br />添加成功!"; 
echo "<script language=\"JavaScript\">setTimeout(\"window.location.href=>} 
} 
//修改一个类别 
if(@$_GET["class"] == "edit"){ 
if(@$_POST["class_" . $_GET["id"]] == "" || @$_POST["class_cid_" . $_GET["id"]] == ""){ 
echo "<br />填写不完整!"; 
echo "<script language=\"JavaScript\">setTimeout(\"history.back();\", 2000);</script>"; 
exit(); 
} 
else { 
@$sql = "Update List Set by_list = '" . $_POST["class_" . $_GET["id"]] . "' , by_cid = '" . $_POST["class_cid_" . $_GET["id"]] . "' Where id = " . $_GET["id"]; 
$conn->Execute($sql); 
echo "<br />修改成功!"; 
echo "<script language=\"JavaScript\">setTimeout(\"window.location.href=>} 
} 
//删除一个类别 
if(@$_GET["class"] == "del"){ 
@$sql = "Delete From List Where id = " . $_GET["id"]; 
$conn->Execute($sql); 
echo "<br />删除成功!"; 
echo "<script language=\"JavaScript\">setTimeout(\"window.location.href=>} 
} 
//================================== 
//后台:发表文章(支持HTML) 
//================================== 
functi
上一个：PHP 反向排序和随机排序代码
下一个：PHP 数组排序方法总结推荐收藏
更多图片编程知识: