日韩精品中文字幕一区二区-日韩精品中文字幕一区-日韩精品中文字幕视频-日韩精品在线一区二区三区-第一页在线-第一福利视频

當前位置:首頁文章首頁 IT學院 IT技術

ASP中使用CDO.Message+SMTP發送郵件的函數代碼分享

作者:  來源:  發布時間:2011-6-15 11:51:02  點擊:
 下面提供給大家分享的是關于在ASP中使用CDO.Message+SMTP發送郵件的函數代碼,希望能對大家有所幫助。
<!--發送代碼-->
<%
Const cdoSendUsingMethod="http://schemas.microsoft.com/cdo/configuration/sendusing"
Const cdoSendUsingPort=2
Const cdoSMTPServer="http://schemas.microsoft.com/cdo/configuration/smtpserver"
Const cdoSMTPServerPort="http://schemas.microsoft.com/cdo/configuration/smtpserverport"
Const cdoSMTPConnectionTimeout="http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"
Const cdoSMTPAuthenticate="http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"
Const cdoBasic=1
Const cdoSendUserName="http://schemas.microsoft.com/cdo/configuration/sendusername"
Const cdoSendPassword="http://schemas.microsoft.com/cdo/configuration/sendpassword"

Dim objConfig ' As CDO.Configuration
Dim objMessage ' As CDO.Message
Dim Fields ' As ADODB.Fields

Set objConfig = Server.CreateObject("CDO.Configuration")
Set Fields = objConfig.Fields

With Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "SMTP服務器" '改成可用的外部郵件服務器域名
.Item(cdoSMTPServerPort) = 25
.Item(cdoSMTPConnectionTimeout) = 10
.Item(cdoSMTPAuthenticate) = cdoBasic
.Item(cdoSendUserName) = "用戶名" '以上服務器的用戶名
.Item(cdoSendPassword) = "密碼" '密碼
.Update
End With

Set objMessage = Server.CreateObject("CDO.Message")
Set objMessage.Configuration = objConfig

With objMessage
.To = Trim(Request.Form("m_user")) '改成接收者的郵件地址
.From = "發件人的地址(要和上面的郵件系統相同)" '改成發送人的郵件地址
.Subject = Trim(Request.Form("m_zhuzi")) '標題
.TextBody = Trim(Request.Form("m_neirong")) '正文
'.AddAttachment "C:\Scripts\Output.txt"'郵件附件
.Send
End With

Set Fields = Nothing
Set objMessage = Nothing
Set objConfig = Nothing
%>
<!--發送代碼-->

相關軟件

相關文章

文章評論

軟件按字母排列: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
主站蜘蛛池模板: 采茶舞曲民乐合奏| 妈妈的脊背简谱| ss培养基| 日韩电影免费在线观看| angela white| 《万万没想到》电影| 木村多江| 肉丝祙挠脚心丨ⅴk| 美国伦理三颗熟樱桃| 十大高蛋白食物蔬菜| 哗鬼住正隔篱| 四川影视文艺频道| department什么意思| footjob videos| 蝴蝶视频在线观看| 诺拉·阿娜泽德尔| 02j331| jenna haze| 5g影院| 高达w| 蒙古小男孩唱哭全场| 富贵不能淫翻译| 未删减版电视剧在线观看| 教学质量分析| 漂流者| 欧美艹| 接吻摸胸视频| 美女撒尿全过程免费| 孙继海个人资料简介| 爱来的刚好演员表| 寡妇 电影| 苏晓电视剧叫什么名字的| 王思聪是谁| 我是特种兵之火凤凰演员表全部| 魔镜电影免费观看完整版高清| 阮经天新电影| 大班安全教案《教室里不乱跑》| 地老鼠| 美国派7| 奶奶的星星| 檀健次壁纸|