📄 edituser.asp

📁 文学网采用飞翔网的内核和界面作了较大程度的修改和美化主要功能有： 1、界面美化 2、增加网文周榜和推荐作品 3、增加每个栏目图片和栏目的导读 4、增加推荐作品和会员文集 5、增加会员个人管理中心 6

💻 ASP

字号:

<!--#include file="articleconn.asp"-->

<!--#include file="const.asp"-->
 <%
IF not(Session("KEY")="super") THEN
	response.redirect "error.asp?id=065"
	response.end
END IF
%>
<%
name=request("name")
%>
<%dim rs,name,tsql, rst
      username=Session("userName")
	set rs=server.CreateObject("ADODB.RecordSet")
	set rst=server.CreateObject("ADODB.RecordSet")
	    rs.open "select * from admin where username='"&name&"'",conn,1,1
	    if rs.eof then
response.redirect "usermanage.asp"
response.end
end if
%> 
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=fly_user%>--作者信息修改</title>
<style>
<!--
a:link       { text-decoration: underline; color: #000000; font-family: 宋体 }
a:visited    { text-decoration: underline; color: #000000; font-family: 宋体 }
a:hover      { text-decoration: underline; color: #cc0000 }
body {font-family: "宋体"; font-size: 9pt;line-height: 12pt;}
table {font-family: "宋体"; font-size: 9pt;line-height: 12pt;}
-->
</style>
</head>

<body bgcolor="#C0C0C0" text="#000000">
<TABLE cellSpacing=0 borderColorDark=#ffffff cellPadding=0  width="90%" align=center border=1 bordercolor="#454545">
        <TBODY>
        <TR>
          <TD>
            <form name=pass method="post" action="edituserok.asp">
            <TABLE class=font1 cellSpacing=0 cellPadding=5 width="98%" 
            align=center border=0>
              <TBODY>
              <TR>
                <TD colSpan=2><%=rs("username")%>的用户资料修改</TD></TR>
              <TR>
                  <TD width=82>用户名：</TD>
                <TD >&nbsp; <INPUT TYPE="hidden" name=username value="<%=rs("username")%>" size="15"> 
                    <%=rs("username")%></TD> 
                </TR>
				              <TR>
                <TD>用户权限：</TD>
                <TD>&nbsp; <select name="select" > 
                      <option value="super">系统管理员</option>
                      <option value="check">系统审核员</option>
                      <option value="input" selected>系统录入员</option>
                    </select></TD></TR>
              
              <TR>
                  <TD>密 码：</TD>
                <TD>&nbsp; <INPUT TYPE="password" class=kuang NAME="passwd"  value="<%=rs("passwd")%>" > 
                    <FONT color=#ff0000>* </FONT></TD> 
                </TR>
              <TR>
                <TD>地 区：</TD> 
                  <TD>&nbsp;  
                    <input name=addr2 class=kuang  maxlength="10"  value="<%=rs("addr")%>">
                  </TD>
                </TR>
              <TR>
                <TD>ＯＩＣＱ：</TD>
                <TD>&nbsp; <INPUT class=kuang   TYPE="text" NAME="oicq"  value="<%=rs("oicq")%>"></TD></TR> 
              <TR>
                  <TD>E-mail：</TD>
                  <TD>&nbsp;  
                    <INPUT TYPE="text" size=20 NAME="email" class=kuang value="<%=rs("email")%>">
                    <FONT  
                  color=#ff0000>*</FONT></TD>
                </TR>
              <TR>
                <TD>密码提示问题：</TD>
                  <TD>&nbsp;  
                    <INPUT TYPE="text" size=20 NAME="ask" class=kuang value="<%=rs("ask")%>">
                    <FONT  
                  color=#ff0000>*</FONT> </TD>
                </TR>
              <TR>
                <TD>密码提示答案：</TD>
                <TD>&nbsp; <INPUT TYPE="text" size=20 NAME="answer" class=kuang value="<%=rs("answer")%>"> <FONT  
                  color=#ff0000>*</FONT> </TD></TR>
              
              <TR>
                <TD height=75>个人签名：</TD>
                  <TD>&nbsp;  
                    <textarea INPUT TYPE="text"  NAME="infor"   class=kuang1  rows=4 cols=40><%=rs("infor")%></textarea>  <FONT  
                  color=#ff0000>*</FONT> 
                </TD></TR>
              <TR>
                <TD>&nbsp;</TD>
                <TD><INPUT class=button4 type=submit value=修改 name=Submit> 
            </TD></TR></TBODY></TABLE></FORM></TD></TR></TBODY></TABLE>
      
      <%
rs.close
set rs=nothing
 conn.close
set conn=nothing
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -