<%
'#############################################################
'#      中國在線--極酷論壇 ver.2001 3.0
'#
'#  版權所有: 中國在線 (ChinaXP.Net)
'#
'#  制作人  : 周周 (SeeYa!)
'#
'#
'#  主頁地址: http://www.ChinaXP.net/    中國在線
'#	      http://www.ChinaXP.Net/bbs/    中國在線--極酷論壇
'#
'#############################################################
%>
<!--#INCLUDE FILE="config.asp" -->
<% If Session(strCookieURL & "Approval") = "15916941253" Then %>
<!--#INCLUDE file="inc_functions.asp" -->
<!--#INCLUDE file="inc_top.asp" -->
<%
if request.form("smile_id") = "" then
	response.write("Your here by mistake")
    my_conn.close
    set my_conn=nothing
    response.end
end if

Dim smile_id, smile_code, smile_url, smile_name
smile_id = request.form("smile_id")
smile_code = request.form("smile_code")
smile_url = request.form("smile_url")
smile_name = request.form("smile_name")
smile_cat = request.form("cat_id")

strsql = "UPDATE "&strTablePrefix&"smiles SET smile_code='"&smile_code&"', smile_url='"&smile_url&"', smile_name='"&smile_name&"', cat_id="&smile_cat&" WHERE id="&smile_id
my_conn.execute(strsql)

response.redirect("admin_smiles.asp")
%>
<!--#INCLUDE file="inc_footer.asp" -->
<%
else
	response.write("只有論壇管理員才能修改表情設置, 請以管理員身份登陸")
%>
<!--#include file="inc_footer.asp" -->
<%end if%>