📄 bbsedit.asp

📁 这是一个文章管理的网页源程序

💻 ASP

字号:

<!--#include file="cheak.asp"-->
<!--#include file=conn.asp-->
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="images/new.css">
</head>

<body bgcolor="#FFFFFF" text="#000000"><br><br><br>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from bbs where id="&request("id")
rs.open sql,conn,1,1

%> 
<form name="form1" method="post" action="savebbs1.asp?id=<%=rs("id")%>">
  
        
  <table width="95%" border="1" cellpadding="5" cellspacing="0" bgcolor="#FFFFFF" bordercolorlight="#333333" bordercolordark="#FFFFFF" align="center" >
    <tr align="center" bgcolor="#F7FDF8"> 
            <td colspan="2">编辑首页站内文章</td>
  </tr>
  <tr> 
            <td width="20%" align="right" valign="top">文章内容:</td>
    <td>
      
              <textarea name="bbs" cols="50" rows="10" class="myin1"><%=rs("bbs")%></textarea>
              
            </td>
  </tr>
  
    <tr align="center"> 
      <td colspan="2">
              <input type="submit" name="Submit" value="  确  认  ">
              <input type="reset" name="Submit2" value="  重  设  ">
      </td>
  </tr>
</table>
<%rs.close
set rs=nothing
conn.close
set conn=nothing%>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -