feedbacksave.asp

狼道公司源码下载

<!--#include file="Inc/Conn.asp" -->
<!--#include file="Inc/Function.asp" -->
<%
Sex=REquest.Form("Sex")
Title=Request.Form("Title")
UserName=Request.Form("UserName")
Email=Request.Form("Email")
Phone=Request.Form("Phone")
Address=Request.Form("Address")
Content=Request.Form("Content")
Set rs=server.CreateObject("adodb.recordset")
rs.open "select * from Gbook where id is null",Conn,3,3
rs.addnew
   rs("Title")=Title
   rs("UserName")=UserName
   rs("Email")=Email
   rs("Phone")=Phone
   rs("Address")=Address
   rs("Content")=Content
   rs("Flag")=0
   rs("Sex")=Sex
   rs("UpDateTime")=now()
rs.update
Rs.close
set rs=nothing
Conn.close
set Conn=nothing
Response.Write("<script>alert('Thank You！');window.location.href='FeedBack.asp';</script>")
Response.End()
%>