saveback.asp

来自「一个非常好的旅游网站程序.」· ASP 代码 · 共 27 行

<% 
If Request("name")="" Then
	Response.Write"<br><center><font color=#ff0000>数据意外丢失！</font></center>"
	Response.End
End If
%>
<!--#include file="conn.asp"-->
<%
name=Request("name")
Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM fankui"
rs.Open sql,conn,1,3
rs.Addnew
rs("title")=Request("title")
rs("leixing")=Request("leixing")
rs("name")=Request("name")
rs("email")=Request("email")
rs("area")=Request("area")
rs("address")=Request("address")
rs("phone")=Request("phone")
rs("content")=Request("content")
rs("datetime")=now()
rs.Update
rs.Close
Set rs=Nothing
Response.Redirect"ok.asp?name="&name
%>