📄 changepass.asp
字号:
<!--#include file="articleconn.asp"--><%
if request.cookies("adminok")="" then
response.redirect "login.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>..::味道网::..</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body>
<div align="center"><center>
<font face=楷体_gb2312 size=4>..::味道网::..网文章管理管理员页面</font>
<table border="1" width="80%" bordercolorlight="#000000" cellspacing="0" cellpadding="0"
bordercolordark="#FFFFFF">
<%
dim rs,tsql
dim rst
set rs=server.CreateObject("ADODB.RecordSet")
set rst=server.CreateObject("ADODB.RecordSet")
rs.open "select * from admin",conn,1
%>
<tr>
<td width="50%" align=center><form name=pass method="post" action="changepass.asp">
<font color=red>修改管理员信息</font></td>
<td width="50%" rowspan="4">* 如点击修改后仍显示原来密码不用理会，密码已经按照您输入的修改，您可以用新密码登陆看看，或者点刷新选择重试，这时显示将正常！ </td>
</tr>
<tr>
<td width="50%" align="center">
<INPUT TYPE="hidden" name=method value="chan">
<INPUT TYPE="hidden" name=id value="<%=rs("id")%>">
名字：<INPUT TYPE="text" size=10 NAME="name" value="<%=rs("username")%>">
</td>
</tr>
<tr>
<td width="50%" align="center">密码：<INPUT TYPE="text" size=10 NAME="pass" value="<%=rs("password")%>">
</td>
</tr>
<tr>
<td width="50%" align="center"><INPUT name="change" class=buttonface value="修改" type='submit'>
</td>
</tr>
</form>
<!----------------------修改密码---------------------------->
<%
rs.close
if request("method")="chan" then
if request("change")="修改" then
rs.open "select * from admin where id="+request("id"),conn,1,3
rs("username")=request("name")
rs("password")=request("pass")
rs.Update
rs.close
end if
end if
%>
<!---------------------------------------------------------->
<tr>
<td width="50%" valign="top">
<%
rst.open "select * from type",conn,1
if rst.EOF then
response.write "没有栏目：（"
else
%><br>
<form name=edittype method="post" action="changepass.asp">
<p align=center><font color=red>文章栏目管理</font><br>
<%do while NOT rst.EOF%>
<%=rst("type")%>
<a href="changepass.asp?typeid=<%=rst("typeid")%>&name=del">删除</a>
<a href="changepass.asp?typeid=<%=rst("typeid")%>&name=edit">修改</a>
<br>
<%
rst.MoveNext
loop
rst.close
end if
%>
</form>
<!----------------------删除修改栏目---------------------------->
<%
if request("name")="del" then
rst.open "delete * from type where typeid="+request("typeid"),conn,1
end if
%>
<%if request("name")="edit" then
rst.open "select * from type where typeid="+request("typeid"),conn,1
%>
<form name=ctype method="post" action="changepass.asp">
<INPUT TYPE="hidden" name=method value="modified">
<INPUT TYPE="hidden" name=typeid value="<%=request("typeid")%>">
<INPUT TYPE="text" size=10 NAME="typename" value="<%=rst("type")%>">
<INPUT name="changetype" class=buttonface value="修改" type='submit'>
</form>
<%
rst.close
end if
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
rst.close
end if
end if
%>
<!----------------------------------------------------------->
</td>
<td width="50%" valign="top"><br><p align=center><font color=red>增加栏目</font><br>
<form name=add method="post" action="changepass.asp">
<INPUT TYPE="hidden" name=method value="added">
<INPUT TYPE="text" size=10 NAME="addtype">
<INPUT name="way" class=buttonface value="增加" type='submit'>
</form><br>
*在增加栏目以后必须刷新才能出现新增的栏目，但是刷新了以后要是选择重试就会重新增加一个栏目，所以建议大家这时候点击别的地方连接，比如修改栏目里面的修改，这样新增的栏目就会出来了！
<!---------------------增加栏目------------------------------>
<% 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 %>
<!----------------------------------------------------------->
</td>
</tr>
</table>
..:味道网:.. 版权所有，<span style="font-family:宋体; font-size: 9pt"><a href=# title=点击些处，关于我们... style="color:blue" target="_new" onClick="javascript:alert('\t\『味道网\』 版权所有\n\n程序设计:Kinwah.CHEN \n\t 陈贤福\n\n站点美工:陈健华\n\t 陈贤福 Ai\n\n社区顾问:Kinwah.CHEN\n\n味道网(C.)2001-2003');return false;"><font color="#000000">Three-UNknown拍档组合</font></a></span>©2001-2003
All Rights Reserved
</center></div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -