do2.asp

来自「结合了某度和AH的个人主页 功能比较完整」· ASP 代码 · 共 29 行

<!--#include file="conn.asp" -->
<!--#include file="ubbcode.asp" -->
<%
if session("admin")<>"admin" then
response.Redirect("../admin/index.asp")
response.End()
end if
id=Trim(Request.Form("id"))
title=Trim(Request.Form("title"))
tianqi=Trim(Request.Form("tianqi"))
XQ=Trim(Request.Form("XQ"))
content=request.form("content")
set rs=server.CreateObject("adodb.recordset")
sql="select * from dairy where id="&id
rs.open sql,conn,1,3
rs("title")=title
rs("tianqi")=tianqi
rs("content")=content
RS("XQ")=XQ
rs.update
rs.close
response.Redirect("index.asp")
%>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>