asp mysql数据 修改数据_ASP编程入门进阶（二十）：ADO组件之修改数据记录

id=request.querystring("id")

%>

whattitle=request.form("title")

whoauthor=request.form("author")

whatcontent=request.form("content")

id=request.form("id")

Set rs = Server.CreateObject ("ADODB.Recordset")

sql = "Select * from cnarticle where cn_id="&id

rs.Open sql,conn,3,2

rs("cn_title")=whattitle

rs("cn_author")=whoauthor

rs("cn_content")=whatcontent

rs.update

rs.close

Set rs = Nothing

conn.close

set conn=Nothing

response.redirect("showit.asp")

response.end

%>

if id<>"" then

Set rs = Server.CreateObject ("ADODB.Recordset")

sql="select * from cnarticle where cn_id="&id

rs.Open sql,conn,1,1

whattitle=rs("cn_title")

whoauthor=rs("cn_author")

whatcontent=rs("cn_content")

end if

%>

Title:>

Author:>

Content: