editsave.asp

系统功能说明： 1 本书库系统专为以文字为主的站点设计

<%@ Language=VBScript %>
<!--#INCLUDE FILE="conn.asp" -->

<%
bookid=request("bookid")
zuozhe=request("zuozhe")
biaoti=request("biaoti")
zhengwen=request("zhengwen")
id=request("id")
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from read where id="&request("id")
rs.open sql,conn,1,3
                

rs("bookid")=bookid
rs("zuozhe")=zuozhe
rs("biaoti")=biaoti
rs("zhengwen")=zhengwen
rs.update
rs.close
response.redirect "admin_bookread.asp?bookid="&bookid&""

%>