(10點)想要ASP透過Jmail線上寄信的語法

Question

順便請問用Jmail要有哪些條件呢
如果我擁有POP3跟STMP是不是就可以用?
請給我能用的語法!感激

Answer 1

Jmail 是 ASP 用來發送線上信件的組件模組，應該是要付費的，

然後裝在你跑 ASP 的 Server 上，透過類似留言版或一般網站新

聞轉送信件分享的方式發送，當然這種能發送訊息的組件不只一

種，但是大多都是要付費的，如果你是承租網站空間的話，大部

份的 ISP 應該都會有提供支援才是，詢問一下就知道了。

以下是語法節錄：



..
一般使用範例
<%@LANGUAGE="VBSCRIPT" %>


<%
Set jmail = Server.CreateObject("JMail.Message")
' 在此鍵入收件人信箱、姓名。此語法可重複使用以同時寄送給更多收件者
jmail.AddRecipient "[e-mail]", "Name"
' 在此鍵入寄件人信箱
jmail.From = "[e-mail]"
' 在此鍵入主旨
jmail.Subject = "JMail測試"
jmail.Body = ""
jmail.Charset = "big5"
jmail.ContentTransferEncoding = "base64"
jmail.Encoding = "base64"
jmail.ISOEncodeHeaders = false
' 在此鍵入HTML內容
jmail.HTMLBody = " color=""red"">恭喜！JMail測試成功！
"
jmail.appendHTML "

智邦生活館客服中心"
' 在此鍵入純文字內容（收信者無法檢視HTML時的備案）
jmail.Body = ""
jmail.appendText " 很遺憾您無法閱讀HTML內容"
' 在此鍵入SMTP伺服器IP，此處以HiNet為例
jmail.Send( "168.95.4.211" )
%>
寄件成功！




發信驗證使用範例
<%
dim username, e_mail, tel, memo
username=Trim(request("username"))
e_mail=Trim(request("e_mail"))
tel=Trim(request("tel"))
memo=Trim(request("memo"))
%>

<%
Set msg=Server.CreateObject("Jmail.Message")
msg.silent=true
msg.Logging = true
msg.Charset = "BIG5"
msg.ContentType = "text/html"
msg.MailServerUserName = "[e-mail]"'SMTP 帳號
msg.MailServerPassword = "password"'SMTP密碼
msg.From = "[e-mail]"'寄件人
msg.FromName = "陳先生"'寄件人名稱
msg.AddRecipient e_mail'收件人
msg.Subject = "智邦生活館jmail測試"'主旨
Body= "連 絡 人：" & username & "
連絡電話：" & tel & "
電子郵件：" & e_mail & "
連絡事項：" & memo '郵件主要內容
msg.Body = Body
msg.Send ("abc.url.tw")'請設定本公司提供的SMTP Server
set msg = nothing
%>
<%
session.abandon
response.write ""
Response.End
%>



..
http://www.humenad.com/asp_jmailhtml.htm

http://www.ravs.ntct.edu.tw/know/show.asp?questionid=50

http://www.hldjzone.com/read-htm-tid-5389310.html