📄 left.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>
<style type="text/css">
<!--
p {font-size: 9pt}
td {font-size: 9pt ; line-height:normal; }
A{text-transform: none; text-decoration: none; color: #e8e8e8; font-family:tahoma,sans-serif; font-size:11px}
a:hover {text-decoration:underline; color: #0000a0; font-family:tahoma,sans-serif; font-size:11px}
body {font-family:tahoma,sans-serif; font-size:13px}
-->
</style>
</head>
<script language="JavaScript">
<!--
NS4 = (document.layers) ? 1 : 0;
IE4 = (document.all) ? 1 : 0;
ver4 = (NS4 || IE4) ? 1 : 0;
img_minus="images/midplus1.gif";
img_plus="images/midplus.gif";
expd=1;
expd_ff = 1;
expd_pf = 1;
if (ver4) {
with (document) {
write("<STYLE TYPE='text/css'>");
if (NS4) {
write(".parent {position:absolute; visibility:visible}");
write(".child {position:absolute; visibility:visible}");
write(".regular {position:absolute; visibility:visible}")
}
else {
write(".child {display:none}")
}
write("</STYLE>");
}
}
function getIndex(el) {
ind = null;
for (i=0; i<document.layers.length; i++) {
whichEl = document.layers[i];
if (whichEl.id == el) {
ind = i;
break;
}
}
return ind;
}
function arrange() {
nextY = document.layers[firstInd].pageY +document.layers[firstInd].document.height;
for (i=firstInd+1; i<document.layers.length; i++) {
whichEl = document.layers[i];
if (whichEl.visibility != "hide") {
whichEl.pageY = nextY;
nextY += whichEl.document.height;
}
}
}
function initIt(){
if (!ver4) return;
if (NS4) {
for (i=0; i<document.layers.length; i++) {
whichEl = document.layers[i];
if (whichEl.id.indexOf("Child") != -1) whichEl.visibility = "hide";
}
arrange();
}
else {
divColl = document.all.tags("DIV");
for (i=0; i<divColl.length; i++) {
whichEl = divColl(i);
if (whichEl.className == "child") whichEl.style.display = "none";
}
}
expandIt('KB9', 0);
<%
if expandFolder = false then
%>
expandIt('KB9', 0);
<%
end if
%>
<%
if Application("em_Enable_ShareFolder") = true then
if friendfoldercount > 0 then
%>
expandIt('FF1', 1);
<%
if expandShareFolder = false then
%>
expandIt('FF1', 1);
<%
end if
end if
end if
%>
<%
if pubfoldercount > 0 and Application("em_EnableBBS") = true then
%>
expandIt('PF1', 2);
<%
if expandPublicFolder = false then
%>
expandIt('PF1', 2);
<%
end if
end if
%>
}
function expandIt(el, id) {
if (!ver4) return;
if (IE4) {
whichEl = eval(el + "Child");
if (whichEl.style.display == "none") {
whichEl.style.display = "block";
}
else {
whichEl.style.display = "none";
}
}
else {
whichEl = eval("document." + el + "Child");
if (whichEl.visibility == "hide") {
whichEl.visibility = "show";
}
else {
whichEl.visibility = "hide";
}
arrange();
}
if (id == 0)
{
if (expd==1) {img_folder.src=img_minus;expd=2;}
else {img_folder.src=img_plus;expd=1;}
}
else if (id == 1)
{
if (expd_ff == 1) {img_ff_folder.src=img_minus;expd_ff = 2;}
else {img_ff_folder.src=img_plus;expd_ff = 1;}
}
else if (id == 2)
{
if (expd_pf == 1) {img_pf_folder.src=img_minus;expd_pf = 2;}
else {img_pf_folder.src=img_plus;expd_pf = 1;}
}
}
onload = initIt;
function theright(rurl, onlyone) {
var mrstr = String(Math.random());
if (onlyone == true)
parent.f2.window.location.href = rurl + "?GRSN=" + mrstr.substring(2, 10);
else
parent.f2.window.location.href = rurl + "&GRSN=" + mrstr.substring(2, 10);
}
//-->
</script>
<%
if userweb.ShowIcon = 0 then
%>
<title>Corp.Email</title>
</head>
<body bgColor="#6f91ab" topmargin="2">
<img border="0" src="images/icon1/home.gif" align="absmiddle"> <font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif"><b>Corp.Email</b></font><br>
<img border="0" src="images/midblk.gif" height="20" width="17" align="absmiddle"><a href="#" onclick="JavaScript:theright('listmail.asp?mode=in', false)"><img border="0" src="images/icon1/receive.gif" align="absmiddle">Check Mail</a><br>
<img border="0" src="images/midblk.gif" height="20" width="17" align="absmiddle"><a href="#" onclick="JavaScript:theright('wframe.asp', true)"><img border="0" src="images/icon1/send.gif" align="absmiddle">Compose</a><br>
<div id="KB9Parent" class="parent"><a href="#" onClick="expandIt('KB9', 0); return false"><IMG height=20 width=17 align=absMiddle border=0 name=img_folder></a><img border="0" src="images/icon1/close.gif" align="absmiddle"><a href="#" onclick="JavaScript:theright('viewmailbox.asp', true);">Folders</a></div>
<div id="KB9Child" class="child">
<img src="images/line.gif" border=0 align="absmiddle" height="20" width="17"><IMG SRC="images/midblk.gif" BORDER=0 align="absmiddle" height="20" width="17"><a href="#" onclick="JavaScript:theright('listmail.asp?mode=in', false)"><img border="0" src="images/icon1/open0.gif" align="absmiddle">Inbox</a><br>
<img src="images/line.gif" border=0 align="absmiddle" height="20" width="17"><IMG SRC="images/midblk.gif" BORDER=0 align="absmiddle" height="20" width="17"><a href="#" onclick="JavaScript:theright('listmail.asp?mode=out', false)"><img border="0" src="images/icon1/open1.gif" align="absmiddle">Draft</a><br>
<img src="images/line.gif" border=0 align="absmiddle" height="20" width="17"><IMG SRC="images/midblk.gif" BORDER=0 align="absmiddle" height="20" width="17"><a href="#" onclick="JavaScript:theright('listmail.asp?mode=sed', false)"><img border="0" src="images/icon1/open2.gif" align="absmiddle">Sent</a><br>
<%
pfNumber = pf.FolderCount
if pfNumber = 0 then
%>
<img src="images/line.gif" border=0 align="absmiddle" height="20" width="17"><IMG SRC="images/lastblk.gif" BORDER=0 align="absmiddle" height="20" width="17"><a href="#" onclick="JavaScript:theright('listmail.asp?mode=del', false)"><img border="0" src="images/icon1/delfolder.gif" align="absmiddle">Trash</a></div>
<%
else
%>
<img src="images/line.gif" border=0 align="absmiddle" height="20" width="17"><IMG SRC="images/midblk.gif" BORDER=0 align="absmiddle" height="20" width="17"><a href="#" onclick="JavaScript:theright('listmail.asp?mode=del', false)"><img border="0" src="images/icon1/delfolder.gif" align="absmiddle">Trash</a><br>
<%
end if
i = 0
do while i < pfNumber
spfname = pf.GetFolderName(i)
if i + 1 = pfNumber then
response.write "<img src='images/line.gif' border=0 align='absmiddle' height='20' width='17'><IMG SRC='images/lastblk.gif' BORDER=0 align='absmiddle' height='20' width='17'><a href=""#"" onclick=""JavaScript:theright('listmail.asp?mode=" & spfname & "', false)""><img border='0' src='images/icon1/open.gif' align='absmiddle'>" & server.htmlencode(spfname) & "</a></div>"
else
response.write "<img src='images/line.gif' border=0 align='absmiddle' height='20' width='17'><IMG SRC='images/midblk.gif' BORDER=0 align='absmiddle' height='20' width='17'><a href=""#"" onclick=""JavaScript:theright('listmail.asp?mode=" & spfname & "', false)""><img border='0' src='images/icon1/open.gif' align='absmiddle'>" & server.htmlencode(spfname) & "</a><br>"
end if
spfname = NULL
i = i + 1
loop
%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showuserpop.asp', true)"><img border="0" src="images/icon1/mpop3.gif" align='absmiddle'>POP Mail</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showuserkill.asp', true)"><img border="0" src="images/icon1/leftfilter.gif" align='absmiddle'>Sender Blocking</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('listatt.asp', true)"><img border="0" src="images/icon1/netsave.gif" align='absmiddle'>Network Storage</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('userfiltermail.asp', true)"><img border="0" src="images/icon1/filtermail.gif" align='absmiddle'>Mail Filtering</a><br>
<%
if Application("em_Enable_ShareFolder") = true then
if friendfoldercount = 0 then
%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('ff_showall.asp', true)"><img border="0" src="images/icon1/sharefolder.gif" align='absmiddle'>Shared Folders</a><br>
<% else %>
<div id="FF1Parent" class="parent"><a href="#" onClick="expandIt('FF1', 1); return false"><IMG height=20 width=17 align=absMiddle border=0 name=img_ff_folder></a><img border="0" src="images/icon1/sharefolder.gif" align="absmiddle"><a href="#" onclick="JavaScript:theright('ff_showall.asp', true);">Shared Folders</a></div>
<div id="FF1Child" class="child">
<%
i = 0
do while i < friendfoldercount
userweb.GetFriendFolderInfo i, username, foldername
if foldername = "att" then
showfoldername = "Network Storage"
else
showfoldername = foldername
end if
if foldername <> "att" then
if i + 1 <> friendfoldercount then
%>
<img src="images/line.gif" border=0 align="absmiddle" height="20" width="17"><IMG SRC="images/midblk.gif" BORDER=0 align="absmiddle" height="20" width="17"><a href="#" onclick="JavaScript:theright('listmail.asp?sname=<%=Server.URLEncode(username) %>&sfname=<%=Server.URLEncode(foldername) %>', false)"><img border="0" src="images/icon1/open.gif" align="absmiddle"><%=server.htmlencode(username & "\" & showfoldername) %></a><br>
<%
else
%>
<img src="images/line.gif" border=0 align="absmiddle" height="20" width="17"><IMG SRC="images/lastblk.gif" BORDER=0 align="absmiddle" height="20" width="17"><a href="#" onclick="JavaScript:theright('listmail.asp?sname=<%=Server.URLEncode(username) %>&sfname=<%=Server.URLEncode(foldername) %>', false)"><img border="0" src="images/icon1/open.gif" align="absmiddle"><%=server.htmlencode(username & "\" & showfoldername) %></a></div>
<%
end if
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -