⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 top.asp

📁 蓝芒3.0A最新所有功能完整破解版
💻 ASP
字号:
<!--#include file="passinc.asp" -->

<%
dim pf
set pf = server.createobject("easymail.PerFolders")
pf.Load Session("wem")


dim isdomainmanager

dim eu
set eu = Application("em")

isdomainmanager = eu.IsDomainManager(Session("wem"))

set eu = nothing


dim userweb
set userweb = server.createobject("easymail.UserWeb")
userweb.Load Session("wem")

friendfoldercount = userweb.count

expandFolder = userweb.expandFolder
expandShareFolder = userweb.expandShareFolder
expandPublicFolder = userweb.expandPublicFolder
dim pfm
set pfm = server.createobject("easymail.PubFolderManager")

pubfoldercount = pfm.PubFoldersCount
%>
<html>
<head>
<META HTTP-EQUIV="Content-Type">
<style type="text/css">
<!--
p {  font-family: "宋体"; font-size: 9pt;}
td {font-size: 9pt ; line-height:normal; }
A{text-transform: none; text-decoration: none; color: #e8e8e8; font-size: 9pt;}
a:hover {text-decoration:underline; color: #0000a0; font-size: 9pt}
body {  font-size: 9pt}
-->
</style>
</head>
<body onload=show_clock() leftmargin="0" topmargin="0">
<%
if userweb.ShowIcon = 0 then
%>
<table align=center border=0 cellpadding=0 cellspacing=0 height=55
  width="100%">
  <tbody>
  <tr bgcolor="#6f91ab">
    <td valign=center width=200>
      <div align=center><img src="images/logo.gif" width="135" height="45"></div>
    </td>
    <td align=middle valign=bottom width="536" bgcolor="#6f91ab">
      <div align="right"><font color=#3399ff><font color=#3399ff><font
      size=3><b></b></font></font><font size=3><b><img height=60
      src="images/banner.gif"
  width=468 border="0"></b></font></font></div>
    </td>
    <td align=middle valign=bottom width="43">&nbsp;</td>
  </tr>
  </tbody>
</table>
<table align=center border=0 cellpadding=0 cellspacing=0 height=16
  width="100%">
  <tbody>
  <tr bgcolor=#54768F>
    <td height=20 width="48%"><font
      face="Verdana, Arial, Helvetica, sans-serif">&nbsp;<font color="#FFFFFF">your position:Corp.Email
      &gt;<%=Session("mail") %></font></font></td>
    <td height=20 width="50%">
      <div align=right>
        <script language=javascript src="images/tam.js"></script>
      </div>
    </td>
    <td height=20 width="2%"></td>
  </tr>
  </tbody>
</table>
<%
elseif userweb.ShowIcon = 1 then
%>
<table align=center border=0 cellpadding=0 cellspacing=0 height=55
  width="100%">
  <tbody>
  <tr bgcolor="#6ba7d8">
    <td valign=center width=200>
      <div align=center><img src="images/logo.gif" width="135" height="45"></div>
    </td>
    <td align=middle valign=bottom width="534" bgcolor="#6ba7d8">
      <div align="right"><font color=#3399ff><font size=3><b><img height=60
      src="images/banner.gif"
  width=468 border="0"></b></font></font><font size=3></font></div>
    </td>
    <td align=middle valign=bottom width="45">&nbsp;</td>
  </tr>
  </tbody>
</table>
<table align=center border=0 cellpadding=0 cellspacing=0 height=16
  width="100%">
  <tbody>
  <tr bgcolor=#012e33>
    <td bgcolor=#3281c0 height=20 width="48%"><font
      face="Verdana, Arial, Helvetica, sans-serif">&nbsp;<font color="#FFFFFF">your
      position:Corp.Email &gt; <%=Session("mail") %></font></font></td>
    <td bgcolor=#3281c0 height=20 width="50%">
      <div align=right>
        <script language=javascript src="images/tam.js"></script>
      </div>
    </td>
    <td bgcolor=#3281c0 height=20 width="2%"></td>
  </tr>
  </tbody>
</table>
<%
end if
%>
<%
set pfm = nothing
set userweb = nothing
set pf = nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -