left.asp

蓝芒3.0A最新所有功能完整破解版

else
	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('listatt.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('listatt.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
end if

	username = NULL
	foldername = NULL

    i = i + 1
loop
%>

<%
end if
end if
%>

<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showusersetup.asp', true)"><img border="0" src="images/icon1/forward.gif" align='absmiddle'>Configurations</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('logon.asp', true)"><img border="0" src="images/icon1/pass.gif" align='absmiddle'>Password</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('findmail.asp', true)"><img border="0" src="images/icon1/search.gif" align='absmiddle'>Search</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('nb_brow.asp', true)"><img border="0" src="images/icon1/note.gif" align='absmiddle'>Notepad</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('ads_brow.asp', true)"><img border="0" src="images/icon1/address.gif" align='absmiddle'>Address Book</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('Signature.asp', true)"><img border="0" src="images/icon1/sign.gif" align='absmiddle'>Signatures</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('style.asp', true)"><img border="0" src="images/icon1/setup.gif" align='absmiddle'>Options</a><br>

<%
if Application("em_EnableBBS") = true then
	if pubfoldercount = 0 then
%>
<img border="0" src="images/midblk.gif" height="20" width="17" align="absmiddle"><a href="#" onclick="JavaScript:theright('showallpf.asp', true)"><img border="0" src="images/icon1/pubfolder.gif" align="absmiddle">Public Folders</a><br>
<% else %>
<div id="PF1Parent" class="parent"><a href="#" onClick="expandIt('PF1', 2); return false"><IMG height=20 width=17 align=absMiddle border=0 name=img_pf_folder></a><img border="0" src="images/icon1/pubfolder.gif" align="absmiddle"><a href="#" onclick="JavaScript:theright('showallpf.asp', true);">Public Folders</a></div>
<div id="PF1Child" class="child">
<%
i = 0

do while i < pubfoldercount
	pfm.GetFolderInfoByIndex i, pfilename, admin, permission, name, createTime, count, maxid, maxitem, maxsize

	if i + 1 <> pubfoldercount 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('showpf.asp?fileid=<%=Server.URLEncode(pfilename) %>', false)"><img border="0" src="images/icon1/open.gif" align="absmiddle"><%=server.htmlencode(name) %></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('showpf.asp?fileid=<%=Server.URLEncode(pfilename) %>', false)"><img border="0" src="images/icon1/open.gif" align="absmiddle"><%=server.htmlencode(name) %></a></div>
<%
	end if

	pfilename = NULL
	admin = NULL
	permission = NULL
	name = NULL
	createTime = NULL
	count = NULL
	maxid = NULL
	maxitem = NULL
	maxsize = NULL

    i = i + 1
loop

end if
end if
%>


<% if isadmin() = true then%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('right.asp', true)"><img border="0" src="images/icon1/sysset.gif" align='absmiddle'>Other Settings</a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showuser.asp', true)"><img border="0" src="images/icon1/users.gif" align='absmiddle'>Users Manager</a><br>
<%
else

if isdomainmanager = true then
%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showdomainusers.asp', true)"><img border="0" src="images/icon1/users.gif" align='absmiddle'>Users Manager</a><br>
<%
end if
%>

<%end if%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('help.asp', true)"><img border="0" src="images/icon1/help.gif" align='absmiddle'>Help</a><br>
<IMG SRC="images/lastblk.gif" BORDER=0 height='20' width='17' align='absmiddle'><a href="default.asp" target="_top"><img border="0" src="images/icon1/exit.gif" align='absmiddle'>Sign Out</a>
</font>
</body>
<INPUT NAME="temp" TYPE="hidden">
<INPUT NAME="to" TYPE="hidden">
<INPUT NAME="cc" TYPE="hidden">
<INPUT NAME="bcc" TYPE="hidden">
</html>
<%
elseif userweb.ShowIcon = 1 then
%>
<title>Corp.Email</title>
</head>
<body bgcolor="#6ba7d8" topmargin="2">
<img border="0" src="images/home.gif" align="absmiddle">&nbsp;<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/receive.gif" align="absmiddle"> <font color="#5F12BC">Check Mail</font></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/send.gif" align="absmiddle"> <font color="#5F12BC">Compose</font></a><br>
<div id="KB9Parent" class="parent"><font color="#5F12BC"><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/close.gif" align="absmiddle"></font><a href="#" onclick="JavaScript:theright('viewmailbox.asp', true);"> <font color="#5F12BC">Folders</font></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/open.gif" align="absmiddle"> <font color="#5F12BC">Inbox</font></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/open.gif" align="absmiddle"> <font color="#5F12BC">Draft</font></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/open.gif" align="absmiddle"> <font color="#5F12BC">Sent</font></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/delfolder.gif" align="absmiddle"> <font color="#5F12BC">Trash</font></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/delfolder.gif" align="absmiddle"> <font color="#5F12BC">Trash</font></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/open.gif' align='absmiddle'><font color='#5F12BC'>" & server.htmlencode(spfname) & "</font></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/open.gif' align='absmiddle'><font color='#5F12BC'>" & server.htmlencode(spfname) & "</font></a><br>"
	end if

	spfname = NULL

	i = i + 1
loop
%>
<font color="#5F12BC">
<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/mpop3.gif" align='absmiddle'> <font color="#5F12BC">POP Mail</font></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/leftfilter.gif" align='absmiddle'> <font color="#5F12BC">Sender Blocking</font></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/netsave.gif" align='absmiddle'> <font color="#5F12BC">Network Storage</font></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/filtermail.gif" align='absmiddle'> <font color="#5F12BC">Mail Filtering</font></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/sharefolder.gif" align='absmiddle'><font color="#5F12BC">Shared Folders</font></a><br>
<% else %>
<div id="FF1Parent" class="parent"><font color="#5F12BC"><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/sharefolder.gif" align="absmiddle"></font><a href="#" onclick="JavaScript:theright('ff_showall.asp', true);"><font color="#5F12BC">Shared Folders</font></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/open.gif" align="absmiddle"><font color="#5F12BC"><%=server.htmlencode(username & "\" & showfoldername) %></font></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/open.gif" align="absmiddle"><font color="#5F12BC"><%=server.htmlencode(username & "\" & showfoldername) %></font></a></div>
<%
	end if
else
	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('listatt.asp?sname=<%=Server.URLEncode(username) %>&sfname=<%=Server.URLEncode(foldername) %>', false)"><img border="0" src="images/open.gif" align="absmiddle"><font color="#5F12BC"><%=server.htmlencode(username & "\" & showfoldername) %></font></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('listatt.asp?sname=<%=Server.URLEncode(username) %>&sfname=<%=Server.URLEncode(foldername) %>', false)"><img border="0" src="images/open.gif" align="absmiddle"><font color="#5F12BC"><%=server.htmlencode(username & "\" & showfoldername) %></font></a></div>
<%
	end if
end if

	username = NULL
	foldername = NULL

    i = i + 1
loop
%>

<%
end if
end if
%>

<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showusersetup.asp', true)"><img border="0" src="images/forward.gif" align='absmiddle'> <font color="#5F12BC">Configurations</font></a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('logon.asp', true)"><img border="0" src="images/pass.gif" align='absmiddle'> <font color="#5F12BC">Password</font></a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('findmail.asp', true)"><img border="0" src="images/search.gif" align='absmiddle'> <font color="#5F12BC">Search</font></a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('nb_brow.asp', true)"><img border="0" src="images/note.gif" align='absmiddle'> <font color="#5F12BC">Notepad</font></a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('ads_brow.asp', true)"><img border="0" src="images/address.gif" align='absmiddle'> <font color="#5F12BC">Address Book</font></a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('Signature.asp', true)"><img border="0" src="images/sign.gif" align='absmiddle'> <font color="#5F12BC">Signatures</font></a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('style.asp', true)"><img border="0" src="images/setup.gif" align='absmiddle'> <font color="#5F12BC">Options</font></a><br>

<%
if Application("em_EnableBBS") = true then
	if pubfoldercount = 0 then
%>
<img border="0" src="images/midblk.gif" height="20" width="17" align="absmiddle"><a href="#" onclick="JavaScript:theright('showallpf.asp', true)"><img border="0" src="images/pubfolder.gif" align="absmiddle"> <font color="#5F12BC">Public Folders</font></a><br>
<% else %>
<div id="PF1Parent" class="parent"><font color="#5F12BC"><a href="#" onClick="expandIt('PF1', 2); return false"><IMG height=20 width=17 align=absMiddle border=0 name=img_pf_folder></a><img border="0" src="images/pubfolder.gif" align="absmiddle"></font><a href="#" onclick="JavaScript:theright('showallpf.asp', true);"> <font color="#5F12BC">Public Folders</font></a></div>
<div id="PF1Child" class="child">
<%
i = 0

do while i < pubfoldercount
	pfm.GetFolderInfoByIndex i, pfilename, admin, permission, name, createTime, count, maxid, maxitem, maxsize

	if i + 1 <> pubfoldercount 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('showpf.asp?fileid=<%=Server.URLEncode(pfilename) %>', false)"><img border="0" src="images/open.gif" align="absmiddle"><font color="#5F12BC"><%=server.htmlencode(name) %></font></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('showpf.asp?fileid=<%=Server.URLEncode(pfilename) %>', false)"><img border="0" src="images/open.gif" align="absmiddle"><font color="#5F12BC"><%=server.htmlencode(name) %></font></a></div>
<%
	end if

	pfilename = NULL
	admin = NULL
	permission = NULL
	name = NULL
	createTime = NULL
	count = NULL
	maxid = NULL
	maxitem = NULL
	maxsize = NULL

    i = i + 1
loop

end if
end if
%>


<% if isadmin() = true then%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('right.asp', true)"><img border="0" src="images/sysset.gif" align='absmiddle'> <font color="#5F12BC">Other Settings</font></a><br>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showuser.asp', true)"><img border="0" src="images/users.gif" align='absmiddle'> <font color="#5F12BC">Users Manager</font></a><br>
<%
else

if isdomainmanager = true then
%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('showdomainusers.asp', true)"><img border="0" src="images/users.gif" align='absmiddle'> <font color="#5F12BC">Users Manager</font></a><br>
<%
end if
%>

<%end if%>
<img border="0" src="images/midblk.gif" height='20' width='17' align='absmiddle'><a href="#" onclick="JavaScript:theright('help.asp', true)"><img border="0" src="images/help.gif" align='absmiddle'> <font color="#5F12BC">System Help</font></a><br>
<IMG SRC="images/lastblk.gif" BORDER=0 height='20' width='17' align='absmiddle'><a href="default.asp" target="_top"><img border="0" src="images/exit.gif" align='absmiddle'> <font color="#5F12BC">Sign Out</font></a>
</font>
</body>
<INPUT NAME="temp" TYPE="hidden">
<INPUT NAME="to" TYPE="hidden">
<INPUT NAME="cc" TYPE="hidden">
<INPUT NAME="bcc" TYPE="hidden">
</html>
<%
end if
%>


<%
set pfm = nothing
set userweb = nothing
set pf = nothing
%>