<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../../Include/Connect.asp"-->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
Username=session("username")
sql="select * from Show5_ALLUser where Username='"&Username&"'"
rs.open sql,cn,1,3
rs("ThemeID")=request.form("theme")
rs.update
rs.close
set rs=nothing
response.write "<script>window.parent.parent.location.reload();</script>"
%>