Jsp 用vb和asp发送邮件

以下代码表示“SendUsing”配置值无效。 注意：Set myMail=CreateObject（CDO.Message）表示不支持Let和Set

<%
Dim myMail=CreateObject("CDO.Message")
myMail.Subject="CDO Mail"
myMail.From="utilise.use@gmail.com"
myMail.To="utilise.use@gmail.com"
myMail.TextBody="Dear God"
myMail.Send
myMail=nothing

%>

---

这就是我所使用的。您可能不需要配置，但在大多数情况下，您必须指定您的服务器和发件人地址，以便邮件不会被视为垃圾邮件。127.0.0.1是邮件服务器，它可能会因您而异

set objMessage = createobject("cdo.message") 
set objConfig = createobject("cdo.configuration") 
Set Flds = objConfig.Fields 

Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="127.0.0.1" 
Flds.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 

Flds.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 0 
Flds.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") ="me@mydomain.com" 
Flds.update 
Set objMessage.Configuration = objConfig 
objMessage.To = "someone@somewhere"
objMessage.From = "me@mydomain.com" 
objMessage.Subject = "Hello"
objMessage.fields.update 

content = "Dear God"
objMessage.HTMLBody = content
objMessage.Send 

---

看看这个问题：