作者:网络 来源:佚名 更新时间:2008-01-21 06:42:37 点击:
click here to copy the code to your clipboard (only for ie users)

'declare variables
dim cdontsobj, messagebody

'create the cdonts object
set cdontsobj = server.createobject("cdonts.newmail")

'to address = "[email protected]"

'from address
cdontsobj.from = "[email protected]"

'cc email addresses seperated by a comma = "[email protected],[email protected]"

'your email message
messagebody = "sending a email using asp was never so easy ! "

'subject of the email message
cdontsobj.subject = "send a email"

'assigning the value of your message to the object
cdontsobj.body = messagebody

'send the email

'set the cdonts object to nothing
set cdontsobj = nothing

技术交流 永无止境 ,欢迎访问网页设计爱好者web开发。