查看: 890|回复: 3
|
如何用asp send email??我是初学者
[复制链接]
|
|
请问如何要用asp send email. 我用window xp pro..谢谢。。。 |
|
|
|
|
|
|
|
发表于 14-5-2007 03:18 PM
|
显示全部楼层
System.net.Mail
Public Sub SendMail(ByVal strToEmail As String, ByVal strToName As String, ByVal strFromEmail As String, ByVal strFromName As String, ByVal strSubject As String, ByVal strBody As String, ByVal blnIsbodyHTML As Boolean, ByVal Priority As MailPriority, Optional ByVal AttachmentFile As Attachment = Nothing)
Dim objmail = New MailMessage(New MailAddress(strFromEmail, strFromName, System.Text.Encoding.UTF8), New MailAddress(strToEmail, strToName, System.Text.Encoding.UTF8))
objmail.Subject = strSubject
objmail.SubjectEncoding = System.Text.Encoding.UTF8
objmail.Body = strBody
objmail.BodyEncoding = System.Text.Encoding.UTF8
objmail.IsBodyHtml = blnIsbodyHTML
objmail.Priority = Priority
If Not AttachmentFile Is Nothing Then
objmail.Attachments.Add(AttachmentFile)
End If
Dim smtpclient As SmtpClient
smtpclient = New SmtpClient
smtpclient.Port = Me.GetWebSettiongXmlFile("MailserverPort").ToString
smtpclient.Host = GetWebSettiongXmlFile("MailServer").ToString
smtpclient.Credentials = New System.Net.NetworkCredential(GetWebSettiongXmlFile("MailAdminID"), GetWebSettiongXmlFile("MailAdminPassword"))
smtpclient.Send(objmail)
End Sub |
|
|
|
|
|
|
|
发表于 16-5-2007 02:43 AM
|
显示全部楼层
|
|
|
|
|
|
|

楼主 |
发表于 16-5-2007 11:38 AM
|
显示全部楼层
我的问题解决了。。。谢谢大家。。。
cdont要download和configure一些setting o...害我浪费好多时间。。。T_T.而且寄hotmail都fail 的。。。
jmail我上次下载install了可是不知少了什么configure...不能叻。。。
最后我用aspmail,不错^^.
不过不知为什么,不管哪种方法它都不能马上收到。会在C:\Inetpub\mailroot\Queue里等好久才会寄。。。请问是什么原因?? |
|
|
|
|
|
|
| |
本周最热论坛帖子
|