📄 signature.asp
字号:
<!--#include file="passinc.asp" -->
<%
dim esm
set esm = server.createobject("easymail.SignManager")
esm.Load Session("wem")
allnum = esm.count
if trim(request("mode")) = "del" then
sid = trim(request("sid"))
if IsNumeric(sid) = true then
esm.DeleteByIndex CInt(sid)
esm.Save
set esm = nothing
Response.Redirect "ok.asp?" & getGRSN() & "&gourl=Signature.asp"
end if
end if
%>
<html>
<head>
<title>Corp.Email</title>
<LINK href="images\hwem.css" rel=stylesheet>
</head>
<SCRIPT LANGUAGE=javascript>
<!--
function sedit(sid) {
location.href = "editsign.asp?<%=getGRSN() %>&sid=" + sid
}
function sdel(sid) {
location.href = "Signature.asp?<%=getGRSN() %>&mode=del&sid=" + sid
}
//-->
</SCRIPT>
<body>
<br>
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF" style="border-left:1px #8CA5B5 solid; border-top:1px #8CA5B5 solid; border-right:1px #8CA5B5 solid; border-bottom:1px #8CA5B5 solid;">
<tr bgcolor="#dbeaf5" style='border:1px #8CA5B5 solid;font-size: 9pt;'>
<td width="16%" height="22"> </td>
<%
if allnum < CInt(Application("em_MaxSigns")) then
%>
<td width="30%"><a href="addsign.asp?<%=getGRSN() %>">New Signature</a></td>
<%
end if
%>
<td colspan="30"><a href="viewmailbox.asp?<%=getGRSN() %>">Return</a></td>
<td width="24%"><b>Signatures</b></td>
</tr>
</table>
<br>
<%
i = 0
do while i < allnum
esm.Get i, stitle, stext
t = server.htmlencode(stext)
t = replace(t, Chr(10), "<br>")
t = replace(t, Chr(32) & Chr(32), " ")
t = replace(t, Chr(9), " ")
response.write " <font color='#FF3333'>" & i+1 & "</font>.<table width='90%' border='0' align='center' cellspacing='0' bgcolor='#EFF7FF' style='border-left:1px #8CA5B5 solid; border-top:1px #8CA5B5 solid; border-right:1px #8CA5B5 solid; border-bottom:1px #8CA5B5 solid;'>"
response.write "<tr><td height='22' bgcolor='#dbeaf5' style='border-bottom:1px #8CA5B5 solid;'><p align='center'>" & server.htmlencode(stitle)
response.write "</td></tr><tr><td height='22'>" & t
response.write "</td></tr><tr><td align='right' bgcolor='#ffffff'><br>"
response.write "<INPUT type=button value=' Edit ' LANGUAGE=javascript onclick='sedit(" & i & ")' class='sbttn'> "
response.write "<input type=button value='Delete' LANGUAGE=javascript onclick='sdel(" & i & ")' class='sbttn'></td></tr></table><br><br>"
stitle = NULL
stext = NULL
i = i + 1
loop
if allnum < 1 and allnum < CInt(Application("em_MaxSigns")) then
%>
<br><br>
<table width="95%" border="0">
<tr><td align="center">
<INPUT type=button value="Create New Signature" onclick="javascript:location.href='addsign.asp?<%=getGRSN() %>'" class="Bsbttn">
</td></tr>
<%
end if
%>
</body>
</html>
<%
set esm = nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -