System.Web.Mail 是 namespace 名字啊,怎么会用作 Dim As New 呢?System.Web.Mail namespace 下面有 3 个类:
MailAttachment
MailMessage
SmtpMail
你应该用 SmtpMail:Dim _SMTP As SmtpMail
Dim _MailMessage As New MailMessage()_MailMessage.Cc = "[email protected]"
_MailMessage.To = "[email protected]"
_SMTP.SmtpServer = "smtp.some.org"_MailMessage.BodyFormat = MailFormat.Html
_MailMessage.From = "[email protected]"
_MailMessage.Subject = "Stock Quotes for you!"_HtmlBody = "<html>" & vbCrLf
_HtmlBody &= "<head>" & vbCrLf
_HtmlBody &= "</head>" & vbCrLf
_HtmlBody &= "<body><h1>HTML Content</h1>" & vbCrLf
_HtmlBody &= "</html>" & vbCrLf_MailMessage.Body = _HtmlBody_SMTP.Send(_MailMessage)
MailAttachment
MailMessage
SmtpMail
你应该用 SmtpMail:Dim _SMTP As SmtpMail
Dim _MailMessage As New MailMessage()_MailMessage.Cc = "[email protected]"
_MailMessage.To = "[email protected]"
_SMTP.SmtpServer = "smtp.some.org"_MailMessage.BodyFormat = MailFormat.Html
_MailMessage.From = "[email protected]"
_MailMessage.Subject = "Stock Quotes for you!"_HtmlBody = "<html>" & vbCrLf
_HtmlBody &= "<head>" & vbCrLf
_HtmlBody &= "</head>" & vbCrLf
_HtmlBody &= "<body><h1>HTML Content</h1>" & vbCrLf
_HtmlBody &= "</html>" & vbCrLf_MailMessage.Body = _HtmlBody_SMTP.Send(_MailMessage)
解决方案 »
- DataSet里返回单值存储过程问题
- session 无法存储到aspstate
- iis设置,域名加端口访问网站
- 新手问题 请问:获取GridView当前行 是怎么获取的? 在线等 谢谢
- 请各位前辈帮忙看一下ASP.NET问题
- asp.net做的B/S结构软件与串口通讯
- 如何执行父页面里的一个Javascript函数。
- between A and B, 不能得到 A和B,怎么才能取到 A,B在内的所有符合的值?
- 请问如何把MultiView中的其中几个view同时显示?
- ASP.NET Fileupload控件 获取路径问题
- 求救!!!"Error: Unable to Start Debugging on the Web Server"
- 急:在TreeView中如何在其节点中增加控件呢?比如:Label、TextBox....
Dim _MailMessage As New MailMessage()这两句声明为什么不一样?第一句为什么不用Dim _SMTP As New SmtpMail()
第二句为什么不用Dim _MailMessage As MailMessage
他们不是都是3种类其中的两种吗?
send方法是静态方法吗?
<%@ Import NameSpace="System.Web.Mail"%>
可以直接使用smtpmail()
先要<%@ Import NameSpace="System.Web.Mail"%>
在 Dim mail As MailMessage = New MailMessage()
mail.To = mailTo.Value
mail.From = mailFrom.Value
mail.Subject = mailSubject.Value
If Format.SelectedItem.Text = "纯文字格式" Then
mail.BodyFormat = MailFormat.Text
Else
mail.BodyFormat = MailFormat.Html
End If
mail.Body = mailBody.Value
SmtpMail.Send(mail)
Label1.Text = "信件已经成功发送出!"