📄 sendmailvip.asp
字号:
<%
if session("username")="" or session("password")="" then
session.timeout=5
response.write "<script language='javascript'>"
response.write "alert('账号或密码错误!');"
response.write "history.go(-1);"
response.write "</script>"
response.end
end if
%>
<!--#include file="../conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from maildefault order by id desc"
rs.open sql,conn,1,1
%>
<html>
<head>
<title>邮件发送</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css.css" type="text/css">
</head>
<body bgcolor="#7bb5de" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="0" cellpadding="2" hspace="0" height="28" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td height="28" background="../Images/lvbg.gif">
<div align="center"><font color="#FFFFFF"><b>
<font color="#000000" style="font-size: 14px">.:: 邮件群发程序-群发正式会员 ::.</font></b></font></div>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="50"> </td>
</tr>
</table>
<form name="sendmail" action="sendmailtovip.asp" method="post" >
<div align="center">
<center>
<table border="1" cellspacing="0" cellpadding="4" bgcolor="#000000" width="80%" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td height="30" bgcolor=#C9D8AD align="right" width="160">
<font style="font-size: 14px; font-weight: 700">发信人地址:</font></td>
<td height="30" bgcolor=#C9D8AD width="578">
<input type="text" name="frommail" value="<%=rs("frommail")%>" size="20">
</td>
</tr>
<tr>
<td height="76" bgcolor=#AEC38D align="right" width="160">
<font style="font-size: 14px; font-weight: 700">收信人地址:</font></td>
<td height="75" bgcolor=#AEC38D width="578">
<input type="text" name="tomail" size="20"><p><font style="font-size: 14px">
(如果为空,从数据库取地址群发!^&^) </font></td>
</tr>
<tr>
<td height="30" bgcolor=#C9D8AD align="right" width="160">
<font style="font-size: 14px; font-weight: 700">信件标题:</font></td>
<td height="75" bgcolor=#C9D8AD width="578">
<input type="text" name="mailsubject" size="50"><p><font style="font-size: 14px">(如果为空,则显示“<%=rs("mailsubject")%>”!^&^)</font></td>
</tr>
<tr>
<td height="186" bgcolor=#AEC38D align="right" width="160">
<font style="font-size: 14px; font-weight: 700">信件内容:</font></td>
<td height="186" bgcolor=#AEC38D width="578">
<textarea name="mailbody" cols="67" rows="10"></textarea><br>
</td>
</tr>
<tr bgcolor=#0080C0>
<td height="53" bgcolor="#C9D8AD" width="160"> </td>
<td height="53" bgcolor="#C9D8AD" width="578">
<input type="submit" name="Submit" value=" 发送 " class="lkbtn">
<input type="reset" name="Submit" value=" 取消 " class="lkbtn">
<input type="hidden" name="action" value="我发">
</td>
</tr>
</table></center>
</div>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -