<%dbdns="../../"%>
<!--#include file="../main.asp"-->
<%
username=request.Form("username")
userid=request.form("user_id")
msg=request.form("msg")
club=request.Form("club")
if msg="" or len(msg)<5 or len(msg)>300 then
response.write "<script>alert('反馈出错，下面是产生错误的可能原因：\n\n·请输入 10-300 位字符的反馈内容！');window.close();</Script>"
response.End()
end if
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from message_club"
rs.open sql,conn,1,3
rs.addnew
rs("username")=username
rs("message")=msg
rs("user_id")=userid
rs("club")=club
rs("key1")=9
rs.update
rs.close
set rs=nothing
response.Redirect("../club.asp?id="&request("club")&"")
response.End()
%>