<%
	set rs=createobject("adodb.recordset")
	sql="select * from person where uname='"&Request.Cookies("admin_person_name")&"'"
	rs.open sql,Conn
	if not rs.eof then
	changepay=rs("changepay")
	dian=rs("dian")
	fen=rs("fen")
	mmoney=rs("mmoney")
	swf_photo_user=rs("swf_photo")
	if mmoney<1 then mmoney="0"&mmoney
	if swf_photo_user="" then swf_photo_user=0
	end if
	rs.close
	set rs=nothing
%>