成人天堂yy6080亚洲高清-欧美黄色片在线播放-在线观看免费av网-人妻无码一区二区

域名頻道

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

Jmail 發送郵件的例子2

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

<%@ Language=VBScript %>
<%
"==================================================
" 參 數 設 置
"==================================================

 

"修改收信人電子郵件地址,表單里的內容將發送到這個信箱中
myemail ="test@test.com"

"修改收信人姓名
myname ="我的公司"

"修改SMTP服務器
smtpserver ="mail.test.com"

"修改SMTP服務器的用戶名和密碼
smtpuser ="test@test.com"
smtppwd ="123456"

"與相應SMTP服務器對應的郵件地址
"很多SMTP服務器除了要驗證用戶名和密碼外,還要驗證發件人地址,
"比如163.net的SMTP服務器在檢查發信人郵件地址是不是以163.net
"結尾,否則不予發送,因此,使用相應的信箱做為發信人信箱是必要的
smtpemail ="test@test.com"

"==================================================
" 程 序 開 始
"==================================================

tname =Request("t1")
temail =Request("t2")
tother =Request("t3")
tsubject =Request("t4")
tbody =Request("t5")

if tname <> "" and temail <> "" then

set jmail=server.CreateObject ("jmail.message")
jmail.Silent =true
jmail.Charset ="gb2312"

if smtpemail <> "" then
jmail.From ="test@test.com"
else
jmail.From =temail
end if

jmail.FromName =tname
jmail.ReplyTo =temail
jmail.Subject ="網上提交:" & tsubject
jmail.Body =tbody & vbcrlf & vbcrlf & "聯系方式:" & tother
jmail.AddRecipient myemail,myname
jmail.MailServerUserName =smtpuser
jmail.MailServerPassWord =smtppwd

isgo=jmail.Send(smtpserver)
if isgo then
msg="提交成功!謝謝您的支持。"
else
msg="發送失敗!請檢查您的郵件地址是否填寫正確。"
end if

jmail.Close
set jmail=nothing
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>與我司聯系</title>
</head>
<style type="text/css">
<!--
body,input,textarea{font-size: 12px}
-->
</style>
<body>
<form action=jmail.asp><%=msg%>
<br>您的姓名:
<br><input name=T1 size=29>
<br>電子郵件:
<br><input name=T2 size=29>
<br>聯系方式:
<br><input name=T3 size=29>
<br>文章主題:
<br><input name=T4 size=29>
<br>文章正文:
<br><textarea rows=6 cols=28 name=T5>
</textarea>
<br><input type="submit" value="確定">
</form>
</body></html>

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

24小時客服熱線

400-670-1116

021-67820741

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

内黄县| 宜宾市| 南昌市| 黑河市| 鹤峰县| 巢湖市| 屯留县| 伊宁县| 沁阳市| 永仁县| 溧阳市| 资兴市| 唐海县| 威远县| 宁蒗| 襄汾县| 册亨县| 临汾市| 博兴县| 林州市| 屯昌县| 乐东| 元江| 蒲城县| 富民县| 郴州市| 东海县| 宁安市| 天气| 会泽县| 潍坊市| 卓资县| 榕江县| 江山市| 独山县| 大余县| 成安县| 临海市| 白玉县| 凤城市| 汉川市|