saveedit.asp

广东交友源程序

<!--#include file="security.asp"-->
<!--#include file="../../book/inc/articlechar.inc"-->
<!--#include file="articleconn.asp"-->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
%>
<%
if request.form("title")="" then 
response.write "错误提示:请输入文章标题!"
response.end
end if
if request.form("content")="" then 
response.write "错误提示:请输入文章内容!"
response.end
end if
%>
<%
title=htmlencode2(request.form("title"))
content=htmlencode2(request.form("content"))
 
articleid=request("id")

sql="select * from learning where articleid="&articleid

rs.open sql,conn,3,3
rs("typeid")=Request.Form("typeid")
rs("title")=title
rs("content")=content
rs("content")=content
rs.update
rs.close

response.redirect "manage.asp"
%>