ASP基础实例教程之八个小时打造新闻发布系统五

<!--#include file="conn.asp"-->
<%
exec="select * from aa where id="&request.querystring("id")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<table width="23%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#000000" bordercolordark="#FFFFFF">
<tr>
  <td width="167" height="31" align="center">修改信息</td>
</tr>
</table>
<form name="form1" method="post" action="modifyup.asp">
<table width="59%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#000000" bordercolordark="#FFFFFF">
  <tr>
    <td height="31">标题：
    <input name="title" type="text" id="title" value="<%=rs("title")%>"></td>
  </tr>
  <tr>
    <td height="26">内容：</td>
  </tr>
  <tr>
    <td height="47"><textarea name="content" cols="60" rows="20" id="content"><%=rs("content")%></textarea></td>
  </tr>
  <tr>
    <td height="25" align="center"><input type="submit" name="Submit" value="提交">
    <input type="hidden" name="id" value="<%=request.querystring("id")%>">
    <input type="reset" name="Submit2" value="取消"></td>
  </tr>
</table>
</form>

<!--#include file="conn.asp"-->
<%
exec="select * from aa where id="&request.form("id")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,3
%>
<%
rs("title")=request.form("title")
rs("content")=request.form("content")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect"admin.asp"
%>