小弟的源代码:
编辑的源代码:
<%  set rs=server.CreateObject("ADODB.RecordSet")
    sql="select * from news where id='"&Request("id")&"'"
    rs.open sql,conn,3,3
 if rs.eof then
     response.Write("<font style='color:red'> 目前没有记录。</FONT>")
else
  %>
      <form method="post" action="E_save.asp?id=<% =rs("id") %>" >
          <table>
   <tr>
             <td>标题:<input type="text" name="title" value="<% =rs("title") %>"></td>
</tr>
<tr>
<td>登记人:<input type="text" name="person" value="<% =rs("person") %>"></td>
</tr>
<tr>
<td>内容:<textarea name="message" cols="40" rows="10"><% =rs("message") %>
</textarea></td>
</tr>
   <tr>
      <td><input type="submit" value="提交">&nbsp;&nbsp; <input type="reset" value="重填">
   </tr>
</table>
</form>
<% end if %>

解决方案 »

  1.   

    E—SAVE.ASP的源代码:
    <%  N_title=Request("title")
         N_person=Request("person")
         N_message=Request("message")
          set rs=server.CreateObject("ADODB.RecordSet")
          sql="select * from news where id="&Request("id")
      rs.open sql,conn,1,3
    rs("title")=N_title
    rs("pubtime")=now()
    rs("person")=N_person
    rs("message")=N_message
    rs.update
    rs.close
    set rs=nothing
    Response.Write"list.asp?id="&request("id")
    %>
      

  2.   

    问题1:当sql="select * from news where id='"&Request("id")&"'"有WHERE判断时,后报“目前没有记录”的错误:
    问题2:当没有where判断时,总是把数据写入同一条数据。
      

  3.   

    这个问题楼主最好放到html/xml版去问啊-_-b