📄 wjeditok.asp

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

💻 ASP

字号:

<!--#include file="articleconn.asp"--><!--#include file="const.asp"-->
<%if  len(request.form("other"))>100 then 
response.write("<p>出错了！文集名称长度不要超过50个字符！<p><a href=javascript:history.back()>按此返回>></a>")
response.end
end if
if  len(request.form("content"))>200 then 
response.write("<p>出错了！文集简介长度不要超过100个字符！<p><a href=javascript:history.back()>按此返回>></a>")
response.end
end if
other=request.form("other")
content=request.form("content")
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open"select * from admin where username='"&session("username")&"'",conn,3,3
rs("other")=other
rs("content")=content
rs.update
%>
<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">
  <tr> 
          <td colspan="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color=red><%=rs("username")%></font>的文集修改成功</td>
        </tr>
        <tr> 
          
    <td width="82" align="left">文集名称：</td>
          <td>&nbsp;<%=rs("other")%> </td>
        </tr>
        <tr> 
          
    <td align="left" valign="top">文集简介：</td>
          <td>&nbsp;<%=rs("content")%></td>
        </tr>
        
        
      </table>
    
</body>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -