📄 selectadd.asp
字号:
<!--#include file="passinc.asp" -->
<%
mode = trim(request("mode"))
modestr = "opener.value"
if mode = "To" then
dispmode = "To"
elseif mode = "Cc" then
dispmode = "Cc"
elseif mode = "Bcc" then
dispmode = "Bcc"
elseif mode = "deliver" then
modestr = "opener.f1.to.value"
dispmode = "Transfer"
end if
dim ads
set ads = server.createobject("easymail.Addresses")
ads.Load Session("wem")
dim allstr
allnum = ads.EmailCount
i = 0
do while i < allnum
ads.MoveTo i
allstr = allstr & "<option value='" & server.htmlencode(replace(ads.email, """", "")) & "'>" & server.htmlencode(replace(ads.nickname, """", "")) & "</option>"
i = i + 1
loop
allnum = ads.GroupCount
i = 0
do while i < allnum
ads.GetGroupInfo i, nickname, emails
allstr = allstr & "<option value='" & server.htmlencode(replace(nickname, """", "")) & "'>" & server.htmlencode(replace(nickname, """", "")) & "</option>"
nickname = NULL
emails = NULL
i = i + 1
loop
set ads = nothing
%>
<HTML>
<HEAD>
<TITLE>WebEasyMail Addresses</TITLE>
<LINK href="images\hwem.css" rel=stylesheet>
</HEAD>
<script language="JavaScript">
<!--
function window_onload() {
var allstr = "<%=allstr %>";
var sstr = <%=modestr %>;
var sbegin = 0;
var send = 0;
var stemp = "";
while(1)
{
send = sstr.indexOf(',', sbegin);
if (send != -1)
stemp = sstr.substring(sbegin, send);
else
stemp = sstr.substring(sbegin);
if (stemp != "")
addnewaddress(stemp);
if (send == -1)
break;
sbegin = send + 1;
}
}
function addnewaddress(addstr)
{
var oOption = document.createElement("OPTION");
oOption.text = addstr;
oOption.value = addstr;
selectusers.add(oOption);
}
function addin()
{
var i = 0;
for (i; i < selectallusers.length; i++)
{
if (selectallusers[i].selected == true)
{
if (isinlist(selectallusers[i].value) == false)
{
var oOption = document.createElement("OPTION");
oOption.text = selectallusers[i].value;
oOption.value = selectallusers[i].value;
selectusers.add(oOption);
}
}
}
}
function isinlist(name)
{
var i = 0;
for (i; i < selectusers.length; i++)
{
if (selectusers[i].value == name)
{
return true;
}
}
return false;
}
function delout()
{
var i = 0;
for (i; i < selectusers.length; i++)
{
if (selectusers[i].selected == true)
{
selectusers.remove(i);
i--;
}
}
}
function gook()
{
var str = "";
var i = 0;
for (i; i < selectusers.length; i++)
{
if ( i + 1 == selectusers.length)
str = str + selectusers[i].value;
else
str = str + selectusers[i].value + ",";
}
<%=modestr %> = str;
self.close();
}
// -->
</script>
<BODY LANGUAGE=javascript onload="return window_onload()">
<br>
<table border="0" width="90%" cellpadding=2 cellspacing=0 align="center" bgcolor="#EFF7FF">
<tr bgcolor="#336699">
<td height="20" rowspan="2" width="45%">
<div align="center"><font class="fw" size=2 style=font-size:9pt color="#ffffff"><b>Addresses</b></font></div>
</td>
<td height="20" rowspan="2">
<div align="center"> </div>
<div align="center"> </div>
</td>
<td height="20" rowspan="2" width="45%">
<div align="center"><font class="fw" size=2 style=font-size:9pt color="#ffffff"><b><%=dispmode %></b></font></div>
</td>
</tr>
<tr></tr>
<tr>
<td height="94" rowspan="2" width="45%">
<div align="center"><br>
<select name="selectallusers" size="13" class="drpdwn" style="width: 180;" multiple LANGUAGE=javascript ondblclick="return addin()">
<%
response.write allstr
%>
</select>
</div>
</td>
<td height="47" width="10%">
<div align="center">
<input type="button" name="Button" value="===>" class="sbttn" language=javascript onClick="addin()">
</div>
</td>
<td height="94" rowspan="2" width="45%">
<div align="center"><br>
<select name="selectusers" size="13" class="drpdwn" style="width: 180;" multiple LANGUAGE=javascript ondblclick="return delout()">
</select>
</div>
</td>
</tr>
<tr>
<td height="47" width="10%">
<div align="center">
<input type="button" name="Submit2" value="<===" class="sbttn"' language=javascript onClick="delout()">
</div>
</td>
</tr>
<tr><td> </td>
</tr>
</table>
<table width="90%" cellpadding=0 cellspacing=0 align="center">
<tr>
<td align="right">
<br>
<hr size="1" color="#8CA5B5">
<input type="button" value=" OK " LANGUAGE=javascript onclick="gook()" class="Bsbttn">
<input type="button" value="Cancel" LANGUAGE=javascript onclick="javascript:self.close();" class="Bsbttn">
</td>
</tr>
</table>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -