<!--#include file="../conn.asp"-->
<%
if request.Form("title") <> "" then
	title   = trim(request.Form("title"))
	con     = toHTML(trim(request.Form("con")))
	dianhua = trim(request.Form("dianhua"))
	
	set rs_458888888 = server.CreateObject("adodb.recordset")
	rs_458888888.open "select top 1 * from tuangou_shuohua",conn,1,3
	rs_458888888.addnew
	rs_458888888("title") = title
	rs_458888888("con")   = con
	rs_458888888("dianhua")   = dianhua
	rs_458888888("shijian") = now()
	rs_458888888.update
	rs_458888888.close
	set rs_458888888 = nothing
	
	response.write "<script>alert('信息提交成功，谢谢您对本站的支持！');window.open('index.asp','_self')</script>"

end if
%>