zoukankan
html css js c++ java
ASP通过SMTP发邮件
<
%
Const
SMTPServerIP
=
"
mail.idg-rbi.com.cn
"
Dim
strFrom, strTo,strSuject, strBody
strFrom
=
"
webmaster@idg-rbi.com.cn
"
strTo
=
"
kong123@citiz.net
"
strSubject
=
"
test
"
strBody
=
"
test
"
Dim
sch, cdo, cdoConfig
sch
=
"
http://schemas.microsoft.com/cdo/configuration/
"
Set
cdoConfig
=
Server.CreateObject(
"
CDO.Configuration
"
)
cdoConfig.Fields.Item(sch
&
"
sendusing
"
)
=
2
cdoConfig.Fields.Item(sch
&
"
smtpserver
"
)
=
SMTPServerIP
cdoConfig.Fields.Item(sch
&
"
smtpauthenticate
"
)
=
1
cdoConfig.Fields.Item(sch
&
"
sendusername
"
)
=
strFrom
cdoConfig.Fields.Item(sch
&
"
sendpassword
"
)
=
"
8888
"
cdoConfig.Fields.Update
Set
cdo
=
Server.CreateObject(
"
CDO.Message
"
)
Set
cdo.Configuration
=
cdoConfig
cdo.From
=
strFrom
cdo.To
=
strTo
cdo.subject
=
strSubject
cdo.TextBody
=
strBody
'
session.Timeout=600
cdo.Send
Set
cdoConfig
=
Nothing
Set
cdo
=
Nothing
%
>
查看全文
相关阅读:
CF 1114D(538,div2) Flood Fill
UVA 1640 The Counting Problem
UVA 11971 Polygon
UVA 1639 Candy
CCPC 2019 秦皇岛 Angle Beats
UVA1153-Keep the Customer Satisfied(贪心)
UVA1613-K-Graph Oddity(贪心)
UVA11925-Generating Permutations(贪心)
UVA11491-Erasing ans Winning(贪心)
UVA12545-Bits Equalizer(思维)
原文地址:https://www.cnblogs.com/goodspeed/p/316264.html
最新文章
软件工程——理论、方法与实践 之 面向对象设计
软件工程——理论、方法与实践 之 面相对象分析
面向对象基础
今日课堂
读书计划
《人月神话》读后总结
第十一章
第十章
第九章
第八章
热门文章
第七章
第六章
第五章
XML读取
sql 五大对象的应用
BZOJ 2038 小Z的袜子
CH#46A 磁力块
Violet 6 杯省选模拟赛 蒲公英
POJ 2482 Stars in Your Window
POJ 2182 Lost Cows
Copyright © 2011-2022 走看看