PHPaccess简单实用的文章管理程序代码(1/7)-PHP源码

session_start();
//==========================
//作者：biyuan
//时间：2006.07
//联系：qq6010707
//==========================
?>







//==================================
//连接数据库教程
//==================================
@$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 "| fields[2]->value . "">" . $rs->fields[1]->value . " ";
$rs->movenext();
}
echo "| 后台管理 ";
$rs->close();
if(@$_session["articleadmin"] == "by_php_article"){
echo "
管理选项-> | 分类管理 | 发表文章 | 文章列表 | 退出登陆";
}
}
//==================================
//文章列表：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 "

"
. " "
. " "
. " ";
while(!$rs->eof){
echo " "
. " "
. " ";
$rs->movenext();
}
echo "

文章标题	文章作者	发表时间	浏览次数
fields[0]->value . "">" . $rs->fields[1]->value . "	" . $rs->fields[2]->value . "	" . date("y-m-d h:i:s",$rs->fields[3]->value) . "	" . $rs->fields[4]->value . "

";
}
else {
echo "
该分类不存在或暂时没有任何文章!";
}
$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 " "
. " "
. " "
. " "
. " "
. " "
. " "
. " "
. " "
. " "
. " "
. " "
. " "
. "

" . $rs->fields[1]->value . "

文章作者:" . $rs->fields[2]->value . " | 发表时间:" . date("y-m-d h:i:s",$rs->fields[3]->value) . " | 浏览次数:" . $rs->fields[4]->value . "

" . $body . "

【 返 回 】 【 打 印 】 【 关 闭 】

"
. " ";
}
else {
echo "
该文章不存在或已被管理员删除!";
}
$rs->close();
}

首页 1 2 3 4 5 6 7 末页