发件人邮件地址(图)
来源：韦江代博客 责任编辑：栏目编辑 发表时间:2013-07-02 02:19 点击:次
发匿名邮件完全有益身心健康的，比如剑心那小子老是剥削我，我心里不爽就发邮件骂他，为了不让他知道我是谁就伪造一个邮件地址咯，再狠点，嗯，邮件地址就写成他老婆的，然后一边呆着看他们吵架（嘿嘿，好狠毒啊）。
基于此，写了一个利用Jmail组件发匿名邮件的ASP代码，前提是你的SMTP服务器没有验证发件人地址才是，很多虚拟主机的SMTP服务器就可以的。
代码如下：
|
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%if request("action")="send" then%>
<%
Dim strSubject,strEmail,strMailAdress,strSender,strContent,strFromer
strSubject = Request("title")
strContent = Request("content")
strSender = Request("Name")
strEmail = Request("to")
strMailAddress = Request("smtp")
strMailUser = Request("usr")
strMailPass = Request("pwd")
Set JMail = Server.CreateObject("JMail.Message")
JMail.Charset = "gb2312"
JMail.From = Request("From")
JMail.FromName = strSender
JMail.Subject =strSubject
JMail.MailServerUserName = strMailUser
JMail.MailServerPassword = strMailPass
JMail.Priority = 3
JMail.AddRecipient(strEmail)
JMail.Body = strContent
JMail.Send(strMailAddress)
%>
<Script>
alert(’没报错就可能成功啦！’);
</Script>
<%
else
%>
<style type="text/css">
<!--
body { margin-top: 0px;margin-bottom: 0px;}td {
font-size: 12px;
text-decoration: none;}--></style>
<title>JMailSpoof v0.1</title><table width="500" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#666666">
<tr><td height="40" bgcolor="#E3E3E3"><div align="center">JMailSpoof by lake2</div></td></tr>
<tr><td><table width="100%" height="392" border="0" align="center" cellpadding="1" cellspacing="1">
相关新闻>>最新推荐更多>>>
|
