mailsave.asp

夏茂政府网站

<!--#include file="include/setting.asp" -->
<!--#include file="include/Function.asp" -->
<!--#include file="include/Conn_User.asp" -->
<!--#include file="other/zf11_md5.asp" -->
<!--#include file="include/Conn.asp" -->

<% 
If Request("name")="" Then
	Response.Write"<br><center><font color=#ff0000>数据意外丢失！</font></center>"
	Response.End
End If
%>

<%
name=Request("name")
Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM zf11_mail"
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"
%>