標題標題  顯示論壇會員列表名單  搜索論壇搜索  HelpHelp
  注冊注冊  登入登入
ASP教學區
 DoReMe : ASP教學區
主題 話題: 一個用jmail發信的過程,及使用方法 回復發表新主題
作者
貼子內容 << Prev Topic下一個主題 >>
gigigo
Groupie
Groupie


加入: 2004/5月/31
Online Status: Offline
回復: 42
Posted: 2004/5月/31 10:30上午 | IP記錄 引用 gigigo

發信時,直接調用這個過程就行了。
<%
dim str,HtmlBody
HtmlBody="<html><body bgcolor='red' topmargin='40'><p align='center'>I Love 2Yup!</p></html>"
str=JmailSend( "2yup","ILoveYou",true,HtmlBody,"2yup@2yup.com","suercool@si na.com","suercool","smtp.sina.com.cn","suercool","Password")

if str="Y" then
response.write("發送成功")
else
response.write("發送失敗!請重試!")
end if
'=================================================
'函數名:JmailSend
'作 用:用Jmail發送郵件
'參 數:Subject 郵件標題
' Body 郵件內容
' Body 郵件內容
' isHtml 是否發送Html格式郵件 (true 是)
' HtmlBody Html格式郵件內容
'    MailTo 收件人Email
' From 發件人Email
' FromName 發件人姓名
' Smtp smtp服務器
' Username 郵箱使用者名
' Password 郵箱密碼
'返回值:JmailSend="N" 發送失敗 JmailSend="Y" 發送成功
'~~~~~~~~~~suercool~~~~~

'=================================================

function JmailSend(Subject,Body,isHtml,HtmlBody,MailTo,From,FromName, Smtp,Username,Password)
dim JmailMsg
set JmailMsg=server.createobject("jmail.message")
JmailMsg.mailserverusername=Username
JmailMsg.mailserverpassword=Password

JmailMsg.addrecipient MailTo
JmailMsg.from=From
JmailMsg.fromname=FromName

JmailMsg.charset="big5"
JmailMsg.logging=true
JmailMsg.silent=true

JmailMsg.subject=Subject
JmailMsg.body=Body
if isHtml=true then JmailMsg.htmlbody=HtmlBody

if not JmailMsg.send(Smtp) then
JmailSend="N"
else
JmailSend="Y"
end if
JmailMsg.close
set JmailMsg=nothing
end function
%>

Edited by admin 在 2004/6月/02 3:26下午
Back to Top 查看 gigigo's 資料 搜索其他貼子 gigigo 訪問 gigigo's
 
juizu
knowledge
knowledge


加入: 2005/11月/23
Online Status: Offline
回復: 1
Posted: 2005/11月/23 12:57上午 | IP記錄 引用 juizu

這是信件群發嗎
Back to Top 查看 juizu's 資料 搜索其他貼子 juizu 訪問 juizu's
 

如果你想回復的話你必須首先 login
如果你還沒有注冊的話你必須首先 注冊

  回復發表新主題
顯示可打印的頁面 顯示可打印的頁面

論壇跳轉
不能 張貼新論題在這個討論版
不能 回應論題在這個討論版
不能 刪除你的發言在這個討論版
不能 編輯你的發言在這個討論版
不能 新增投票標題在這個討論版
不能 在這個討論版投票

Edit by doreme Forums version 2004
Welcome ©2001-2004 doreme Guide

This page was generated in 0.6719 seconds.

 
保養品
保養品, Skin Care
www.elady.tw
Makeups Wholesale
Wholesale Cosmetics SkinCares
lungjyi.com
保養品批發
名牌保養品、保養品批發
www.perfume.com.tw/skincare
Wholesale Perfumes
Fragrances Perfumes Wholesale
lungjyi.net