冲田杏梨av天堂一区二区三区-yy4080成人午夜私人影院-亚洲精品18在线观看-毛片无码免费无码播放

域名頻道

歡迎您來到域名頻道,開始互聯網之旅!

Jmail 發送郵件的例子1

作者:域名頻道來源:域名頻道發布時間:2017-3-6瀏覽:

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

 

<%if request("action")="send" then%>
<%

參數說明
Subject : 郵件標題
MailAddress : 發件服務器的地址,如smtp.163.com
Email : 收件人郵件地址
Sender : 發件人姓名
Content : 郵件內容
Fromer : 發件人的郵件地址

Sub SendAction(subject, email, sender, content) 
 Set JMail = Server.CreateObject("JMail.Message") 
 JMail.Charset = "gb2312" 郵件字符集,默認為"US-ASCII"
 JMail.From = strMailUser 發送者地址
 JMail.FromName = sender 發送者姓名
 JMail.Subject =subject
 JMail.MailServerUserName = strMailUser 身份驗證的用戶名
 JMail.MailServerPassword = strMailPass 身份驗證的密碼
 JMail.Priority = 3
 JMail.AddRecipient(email)
 JMail.Body = content
 JMail.Send(strMailAddress)
End Sub

調用此Sub的例子
Dim strSubject,strEmail,strMailAdress,strSender,strContent,strFromer
strSubject = Request("title")
strContent = "用戶Email:" & Request("From") & VbCrLf & "電話:" & Request("Tel") & VbCrLf & "內容:" & vbcrlf & Request("content")
strSender  = Request("Name")
strEmail = "anybody@163.com" 這是收信的地址,可以改為其它的郵箱
strMailAddress = "mail.yourdomain.com" 我司企業郵局地址,請使用 mail.您的域名
strMailUser  = "user@yourdomain.com" 我司企業郵局用戶名
strMailPass  = "mailpassword" 郵局用戶密碼

Call SendAction (strSubject,strEmail,strSender,strContent)

%>

<script language="javascript">
alert(恭喜您,發送成功!);
history.back();
</script>


<%else%>
<style type="text/css">
<!--body { margin-top: 0px;margin-bottom: 0px;}td {
 font-size: 12px;
 text-decoration: none;}--></style>
<table width="500" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#666666">
<tr><td height="40" bgcolor="#E3E3E3"><div align="center">發郵件給我們</div></td></tr>
<tr><td background="images/formmail_r2_c1.gif"><table width="100%" height="296" border="0" align="center" cellpadding="1" cellspacing="1">
<form name="form" method="post" action="?action=send">
<tr bgcolor="#FFFFFF">
<td width="110" align="center"><div align="left">郵件主題(title)*</div></td>
<td width="288"><input name="title" type="text" id="title" size="22">
姓名(name)
<input name="name" type="text" id="name" size="8">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="center"><div align="left">你的郵箱(mailaddress)*</div></td>
<td><input name="from" type="text" id="from" size="22">
電話(tel)
<input name="tel" type="text" id="tel" size="15"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="213" align="center"><div align="left">內容(content):*<br>
</div></td>
<td><textarea name="content" cols="50" rows="15"></textarea></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> </td>
<td> <input type="submit" name="Submit" value="提交"></td></tr></form></table></td>
</tr></table>
<%end if%>

收藏 】 【 打印
會員 客服 QQ 電話 充值 工單
Top

24小時客服熱線

400-670-1116

021-67820741

若400電話正忙,請撥總機 02167820741

天台县| 巴青县| 应用必备| 合江县| 岐山县| 邻水| 诸暨市| 凌源市| 黄大仙区| 从江县| 全南县| 延吉市| 云霄县| 高台县| 阜南县| 东源县| 唐山市| 铅山县| 西和县| 邯郸市| 平遥县| 茌平县| 临沂市| 栾川县| 林甸县| 枣强县| 大同市| 阳曲县| 明水县| 潞城市| 富平县| 即墨市| 博湖县| 瑞丽市| 广德县| 乌鲁木齐县| 涪陵区| 阿巴嘎旗| 治多县| 岳阳县| 磐石市|