📄 wjedit.asp

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

💻 ASP

字号:

<!--#include file="const.asp"-->
<!--#include file="articleconn.asp"-->
<html>
<%username=request.querystring("username")
page=request.querystring("page")
Set rs = Server.CreateObject("ADODB.Recordset")
username=session("UserName")
passwd=session("Passwd")
sql="select * from admin where username='"&UserName&"'and passwd='"&Passwd&"'"
rs.open sql,conn,3,3
if rs.eof then
key=rs("oskey")
response.redirect "login.asp"
response.end
end if
%> 
<head>
<title>个人文集</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<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">
  <form name=pass method="post" action="wjeditok.asp">
        <tr> 
          <td colspan="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color=red><%=rs("username")%></font>的文集修改</td>
        </tr>
        <tr> 
          <td width="82" align="right">文集名称：</td>
          <td>&nbsp;<INPUT TYPE="text" class=kuang NAME="other"  value="<%=rs("other")%>" >
              <font color="#FF0000">不要超过50个字符</font></td> 
        </tr>
        <tr> 
          <td align="right" valign="top">文集简介：</td>
          <td>&nbsp;<textarea INPUT TYPE="text"  NAME="content"   class=kuang1  rows=4 cols=40><%=rs("content")%></textarea>
              <font color="#FF0000">不要超过100个字符</font></td> 
        </tr>
        <tr> 
          <td>&nbsp;</td>
          <td>&nbsp;<INPUT class=button4 type=submit value=修改 name=Submit></td>
        </tr>
        </form>
      </table>
    <%rs.close
set rs=nothing
 conn.close
set conn=nothing
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -