文章导航PC6首页软件下载单机游戏安卓资源苹果资源

pc软件新闻网络操作系统办公工具编程服务器软件评测

安卓新闻资讯应用教程刷机教程安卓游戏攻略tv资讯深度阅读综合安卓评测

苹果ios资讯苹果手机越狱备份教程美化教程ios软件教程mac教程

单机游戏角色扮演即时战略动作射击棋牌游戏体育竞技模拟经营其它游戏游戏工具

网游cf活动dnf活动lol周免英雄lol礼包

手游最新动态手游评测手游活动新游预告手游问答

您的位置:首页精文荟萃软件资讯 → ASP进阶之文章在线管理更新13

ASP进阶之文章在线管理更新13

时间:2004/10/7 19:18:00来源:本站整理作者:蓝点我要评论(0)

ASP进阶之文章在线管理更新--管理员&栏目管理篇



作者:沙滩小子



    前面的章节已经基本实现了文章管理系统的大部分功能,但是在本系统中,管理员姓名和密码以及栏目的更新都要自己在数据库中操作,这样并没有完全实现系统的完全在线管理更新,所以我最近对管理系统进行了进一步的完善,对其增加了相关功能,实现的真正意义上的文章管理系统在线管理更新!



    实现这些功能也是通过对数据库的更新甚至新增内容来实现的,在这里活用数据库操作命令updata和addnew是关键,那些地方该用UPDATA,那些地方该用ADDNEW在这里都可以体现出来,下面就为大家介绍其详细的实现过程!



    文件changepass.asp



    "打开数据库连接文件

处理 SSI 文件时出错


<%

    "限制管理用户才能进入

if request.cookies("adminok")="" then

  response.redirect "login.asp"

end if

%>







修改密码栏目信息











动网文章管理管理员页面


bordercolordark="#FFFFFF">

<%

dim rs,tsql

dim rst

    "打开记录集ADMIN,并显示其内容

set rs=server.CreateObject("ADODB.RecordSet")

set rst=server.CreateObject("ADODB.RecordSet")

    rs.open "select * from admin",conn,1

%>

  

    

    

  

  

    

  

  

    

  

  

    

  



    "当返回的method值为提示修改密码的chan,chan在填写管理员名称和密码的from里面用value定义,所以当返回的是chan则提示为修改密码,可以进行数据库更新,否则将不执行UPDATA命令

<%

rs.close

if request("method")="chan" then

  if request("change")="修改" then

rs.open "select * from admin where id="+request("id"),conn,1,3

    "利用返回的管理员ID指定记录集中的记录并对其进行更新

rs("username")=request("name")

rs("password")=request("pass")

rs.Update

  end if

end if

rs.close

%>

  

    

    

  



修改管理员信息
* 如点击修改后仍显示原来密码不用理会,密码已经按照您输入的修改,您可以用新密码登陆看看,或者点刷新选择重试,这时显示将正常! 






    "在输入栏内显示原来的管理员名称和密码,可以在这里直接输入新的用户名和密码

">

名字:">

 
密码:">

 


 


<%

    "打开显示文章栏目记录集

rst.open "select * from type",conn,1

if rst.EOF then

response.write "没有栏目:("

else

%>




文章栏目管理


<%do while NOT rst.EOF%>



    "依次显示文章的栏目,并可通过点击删除,修改进行相关操作

<%=rst("type")%>

&name=del">删除

   &name=edit">修改




<%

rst.MoveNext

loop

end if

rst.close

%>



    "假如返回的NAME为DEL则提示用户点击了删除连接,那么将对数据库指定记录集进行删除操作

<%

  if request("name")="del" then

rst.open "delete * from type where typeid="+request("typeid"),conn,1

rst.close

  end if

%>



   "假如返回的NAME为EDIT则提示用户点击了修改按钮,这时候会利用返回的栏目ID(TYPEID)显示相关栏目的操作信息,并可在里面填写你想要修改的栏目名称

<%if request("name")="edit" then

rst.open "select * from type where typeid="+request("typeid"),conn,1

%>





">

">





<%

end if

rst.close



    "当显示了相关栏目信息后,利用已经在修改的from里面定义的method和changetype判定用户是否点击了修改按钮,并利用UPDATA对数据库进行更新

if request("method")="modified" then

  if request("changetype")="修改" then

rst.open "select * from type where typeid="+request("typeid"),conn,1,3

rst("type")=request("typename")

rst.Update

  end if

end if

rst.close

%>

 

增加栏目


    

    "在输入栏内输入想要新增的栏目名称



   








*在增加栏目以后必须刷新才能出现新增的栏目,但是刷新了以后要是选择重试就会重新增加一个栏目,所以建议大家这时候点击别的地方连接,比如修改栏目里面的修改,这样新增的栏目就会出来了!



    "假如从from传来的信息method为added,则对指定记录集进行新增记录操作,栏目名称为从增加栏目的FROM处返回的addtype

<% if request("method")="added"  then

rst.open "select * from type",conn,3,2

rst.addnew

rst("type")=request("addtype")

rst.update

rst.close

end if  %>

  










    好了,关于怎样利用ASP做文章的在线更新管理系统到这里就全部完成了,相信你看到这里一定可以感觉到它的易用性和功能的强大性,那么怎么还不赶快自己回去研究研究,自己弄一个来看看:)

相关阅读 Mac访问Windows共享文件夹Windows 7正版系统验证方法windows 8.1系统版本号查看方法Windows 8.1系统电话激活时无法输入微软返回代码解决方法Windows 8如何调整屏幕分辨率windows8.1磁盘占用100%解决方法Mac双系统如何删除Boot Camp安装的Windows分区Apple教你如何在Mac 上运行 Windows

文章评论
发表评论

热门文章 360随身Wifi 4G版什么怎样提高origin下载速百度收购PPS已敲定!3

最新文章 伊森卡特的消失通关流千牛怎么设置自动回复 增加新功能,S版Moto G喜获Android 4.4.4更鸡肋?谷歌Play Music发布更新版本千牛怎么设置自动回复​千牛云盘怎么用

人气排行 xp系统停止服务怎么办?xp系统升级win7系统方office2013安装教程图解:手把手教你安装与同步推是什么?同步推使用方法介绍QQ2012什么时候出 最新版下载VeryCD镜像网站逐个数,电驴资料库全集利用PHP程序设定防止MySQL注入或HTML表单滥web服务器和应用服务器的区别安卓android 系统支持什么视频格式