'**********************************************
'用户面板
'**********************************************
function userPanel()
userPanel=""
if memName<>Empty then userPanel=userPanel&" <b>"&memName&"</b>,欢迎你!<br/>你的权限: "&stat_title&"<br/><br/>"
if stat_Admin=true then userPanel=userPanel+"<a href=""control.asp"" class=""sideA"" accesskey=""3"">系统管理</a>"
if stat_AddAll=true or stat_Add=true then userPanel=userPanel+"<a href=""blogpost.asp"" class=""sideA"" accesskey=""N"">发表新日志</a>"
if (stat_AddAll=true or stat_Add=true) and (stat_EditAll or stat_Edit) then
if isEmpty(session(CookieName&"_draft_"&memName)) then
session(CookieName&"_draft_"&memName)=conn.execute("select count(log_ID) from blog_Content where log_Author='"&memName&"' and log_IsDraft=true")(0)
SQLQueryNums=SQLQueryNums+1
end if
if session(CookieName&"_draft_"&memName)>0 then
userPanel=userPanel+"<a href=""default.asp?display=draft"" class=""sideA"" accesskey=""D""><strong>编辑草稿 ["&session(CookieName&"_draft_"&memName)&"]</strong></a>"
else
userPanel=userPanel+"<a href=""default.asp?display=draft"" class=""sideA"" accesskey=""D"">编辑草稿</a>"
end if
end if
if memName<>Empty then
userPanel=userPanel&"<a href=""member.asp?action=edit"" class=""sideA"" accesskey=""M"">修改个人资料</a><a href=""login.asp?action=logout"" class=""sideA"" accesskey=""Q"">退出系统</a>"
else
userPanel=userPanel&"<a href=""login.asp"" class=""sideA"" accesskey=""L"">登录</a><a href=""register.asp"" class=""sideA"" accesskey=""U"">用户注册</a>"
end if
end function