<%@ LANGUAGE = VBScript CodePage = 936%>
<!--#include file="conn.asp"-->
<!--#include file="inc/class_sys.asp"-->
<!--#include file="inc/md5.asp"-->
<!-- #include file="API/Class_API.asp" -->
<%
Dim t,tName,nowurl,cssfile,actiontype,url

url=request.QueryString("url")
t=Request("t")
actiontype=request("actiontype")
nowurl=lcase(Request.ServerVariables("PATH_INFO"))
dim oblog,uurl
set oblog=new class_sys
oblog.start

G_P_PerMax=20
'退出系统
If request("t")="logout" Then

    If API_Enable Then 
		oblog.CheckUserLogined
		Dim strUrl,j
		For j=0 To UBound(aUrls)
			strUrl=Lcase(aUrls(j))
			If Left(strUrl,7)="http://" Then
				response.write("<script language=JavaScript src="""&strUrl&"?syskey="&MD5(oblog.l_uName&oblog_Key)&"&username="&oblog.l_uName&"&password=""></script>")&vbcrlf
			End If
		Next
	End If 

	If cookies_domain <> "" Then
        response.Cookies(cookies_name).domain = cookies_domain
    End If
	Response.Cookies(cookies_name)("username")=oblog.CodeCookie("")
	Response.Cookies(cookies_name)("password")=oblog.CodeCookie("")
	Response.Cookies(cookies_name)("userurl")=oblog.CodeCookie("")
	If API_Enable Then
		response.write "<script language=JavaScript>setTimeout(""window.location='index.asp'"",1000);</script>"
	Else 
		if request("re")="1" then
			response.Write("<script language=JavaScript>top.location='"&oblog.comeurl&"';</script>")
		else
			response.Write("<script language=JavaScript>top.location='index.asp';</script>")
		End If
	End if
	Set oBlog=Nothing
	response.End()
End If

Select Case t
    Case 0, ""
    	t = 0
        tName = "日志"
    Case 1
        tName = "相册"
    Case 2
        tName = "通讯录"
    Case 3
        tName = "订阅"
    Case 10
	tName = "视频"
    Case Else
        t = 0
        tName = "日志"
End Select
if not oblog.checkuserlogined() then
	response.Redirect("login.asp?fromurl="&replace(oblog.GetUrl,"&","$"))
else
	if oblog.l_ulevel=6 then
		oblog.adderrstr("您未通过管理员审核，不能进入后台")
		oblog.showerr
	end if
end if
'服务器端控制禁止页面单独出现
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=oblog.l_uname%>-用户管理后台</title>
<link rel="stylesheet" href="oBlogStyle/style.css" type="text/css" />
<script src="inc/main.js" type="text/javascript"></script>
<script src="oBlogStyle/menu.js" type="text/javascript"></script>