<%
on error resume next
usergroupid=Request.Cookies("sooopucom")("usergroupid")
if usergroupid<10 and usergroupid<>31 and usergroupid<>32 and usergroupid<>33 and usergroupid<>1 and usergroupid<>2 and usergroupid<>3 then
Response.Write ("")
Response.End
end if
if request("action")="save" then
Title=trim(request.form("Title"))
Username=trim(request.form("Username"))
Content=trim(request.form("Content"))
if Title="" then
response.Write ""
response.End()
end if
if Username="" then
response.Write ""
response.End()
end if
if Content="" then
response.Write ""
response.End()
end if
sql="select * from SP_Feedback"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
rs.addnew
rs("Title")=Title
rs("Username")=Username
rs("Content")=Content
rs("Types")=2
rs("ip")=getIPs()
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.Write ""
response.End()
end if
%>
VIP留言反馈_搜谱网
