📄 editinfo.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="func.asp"-->
<%
logchk session("userid"),session("password")
if session("userid")="" or session("password")="" or session("manbid")="" then
errmsg="您的用户ID与PASSWORD错误！请重新登录！"
errshow(errmsg)
else
id=request.querystring("id")
method=request.querystring("method")
if session("manbid")<>"" and id="" and method="" then
set reco=server.createobject("adodb.recordset")
sqlstr="select * from manboard where userid='" & session("userid")& "' and password='" &session("password")& "'"
reco.open sqlstr,conn,1,1
id=reco("id")
username=reco("username")
userid=reco("userid")
password=""
homepage=reco("homepage")
email=reco("email")
jj=reco("jj")
set reco=nothing
end if
if session("manbid")=0 and id<>"" and method<>"new" then
set reco=server.createobject("adodb.recordset")
sqlstr="select * from manboard where id=" &id
reco.open sqlstr,conn,1,1
id=reco("id")
username=reco("username")
userid=reco("userid")
password=reco("password")
homepage=reco("homepage")
email=reco("email")
manbid=reco("manbid")
jj=reco("jj")
set reco=nothing
end if
if session("manbid")=0 and method="new" and id="" then
username=""
password=""
userid=""
homepage="http://"
email=""
manbid=1
jj=""
end if
%>
<html>
<head>
<title>资料修改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body bgcolor="#FFFFFF" background="images/bg.gif">
<form method="post" action="saveinfo.asp">
<table width="600" border="0" cellspacing="2" cellpadding="2" class=buinput>
<tr>
<td width="90">网上大名：</td>
<td width="233">
<input type="text" name="username" size="30" maxlength="30" class=input value="<%=username%>">
</td>
<td width="257">您的网上大名，用来显示的名字。</td>
</tr>
<tr>
<td width="90">用 户 ID：</td>
<td width="233">
<input type="hidden" name="id" value=<%=id%>>
<%if session("manbid")=0 and id="" and method="new" then%>
<input type="text" name="userid" size="30" maxlength="10" class=input value="<%=userid%>">
<input type="hidden" name="method" value="new">
<%else%>
<div><%=userid%></div>
<%end if%>
</td>
<td width="257">用于登录管理的用户名称。</td>
</tr>
<tr>
<td width="90">登录密码：</td>
<td width="233">
<input type="password" name="password" size="30" maxlength="10" class=input value="<%=password%>">
</td>
<td width="257">用登录管理的密码！</td>
</tr>
<tr>
<td width="90">重复密码：</td>
<td width="233">
<input type="password" name="passagain" size="30" maxlength="10" class=input value="<%=password%>">
</td>
<td width="257">重复一次密码！</td>
</tr>
<tr>
<td width="90">个人主页：</td>
<td width="233">
<input type="text" name="homepage" size="30" maxlength="50" value="<%=homepage%>" class=input>
</td>
<td width="257">您主页的网址！</td>
</tr>
<tr>
<td width="90">电子信箱：</td>
<td width="233">
<input type="text" name="email" size="30" maxlength="50" class=input value="<%=email%>">
</td>
<td width="257">您的EMAIL地址！</td>
</tr>
<%if session("manbid")=0 then%>
<tr>
<td width="90">管理版面：</td>
<td width="233">
<input type="text" name="manbid" size="30" maxlength="3" class=input value=<%=manbid%>>
</td>
<td width="257">设置版主管理的版面！</td>
</tr>
<%end if%>
<tr>
<td width="90" valign=top>自我简介：</td>
<td width="233">
<textarea name="jj" rows="5" cols="40" class=txtinput><%=jj%></textarea>
</td>
<td width="257" valign=top>您的自我介绍，为了让大家都能认识您。</td>
</tr>
<tr>
<td width="90"> </td>
<td width="233">
<input type="submit" name="send" value=" 发 送 " class=buinput>
</td>
<td width="257"> </td>
</tr>
</table>
</form>
<%if session("manbid")=0 then%>
<table width="600" border="0" cellspacing="2" cellpadding="2" class=buinput>
<tr>
<td align="center">版 面 列 表</td>
</tr>
<%
set bidreco=server.createobject("adodb.recordset")
sqlstr="select * from board"
bidreco.open sqlstr,conn,1,1
if bidreco.eof then
response.write "<tr><td align='center'>尚 未 有 版 面</td></tr>"
else
do while not bidreco.eof
%>
<tr>
<td align='center'>版面号：<b><%=bidreco("bid")%></b> 版面名：<%=bidreco("cname")%></td>
</tr>
<%
bidreco.movenext
loop
end if
%>
</table>
<%end if%>
</body>
</html>
<%
end if
set bidreco=nothing
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -