cplawyer

用了，谢谢

X-Force

呵呵。。。才发现截图是偶的站站的。。。

edisonwu

好东西,支持,试试

〖梦不落〗

喂什么我加上了

还有是 乱码 腻?

mingelz

好东东哦～

夏之雨

复制内容到剪贴板

代码:

'**********************************************
'用户面板
'**********************************************
function userPanel()
userPanel=""
if memName<>Empty then userPanel=userPanel&" <b>"&memName&"</b>，欢迎你! 你的权限: "&stat_title&"<br/><br/>"

if stat_AddAll=true or stat_Add=true then userPanel=userPanel+"<a href=""blogpost.asp"" class=""sideA"" accesskey=""N"" target=""_blank""> 发表日志+</a>"
if stat_Admin=true then userPanel=userPanel+"<a href=""control.asp"" class=""sideA"" accesskey=""3"" target=""_blank""> 系统管理</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"" target=""_blank""><strong> 编辑草稿["&session(CookieName&"_draft_"&memName)&"]</strong></a>"
   else
      userPanel=userPanel+"<a href=""default.asp?display=draft"" class=""sideA"" accesskey=""D"" target=""_blank""> 编辑草稿</a>"
  end if
end if
if memName<>Empty then
  userPanel=userPanel&"<a href=""member.asp?action=edit"" class=""sideA"" accesskey=""M"" target=""_blank""> 我的资料</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

上面已经用不上了，删除也可以！！！

kby100200

郁闷 ，不行，，，弄上去 是乱马

jclser

是我写的吗？  我想不是，因为我的多了一个控件代码。

woshiwo995

为什么怎么不弄一个插件哦..

queby

我在我的上添加了`之后还是会出现乱码```
第一页和第二页的都试过了``
一样的效果
怎么回事啊~???