net1.0&2.0发mail

Imports System Imports System.Web Imports System.Web.Mail Imports System.Net Imports System.Net.Mail Partial Class sendmailweb Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click '2.0发mail的方法 Dim mymail As System.Net.Mail.MailMessage = New System.Net.Mail.MailMessage("[e-mail]", "[e-mail]", "test", "yaya_test") Dim client As System.Net.Mail.SmtpClient = New System.Net.Mail.SmtpClient("mail.gemtek-ks.com.cn") client.Credentials = New NetworkCredential("yaya_xu", "flash_angle") client.Send(mymail) Response.Write("ok") ' string file = "e:/inetpub/wwwroot/Test2005All/TestXML/testXML.xml"; ' System.Net.Mail.MailMessage message = new System.Net.Mail.MailMessage("[e-mail]", "[e-mail]", "text message for you.", "Test Title"); ' System.Net.Mail.Attachment data = new System.Net.Mail.Attachment(file, System.Net.Mime.MediaTypeNames.Application.Octet); ' System.Net.Mime.ContentDisposition disposition = data.ContentDisposition; ' disposition.CreationDate = System.IO.File.GetCreationTime(file); ' disposition.ModificationDate = System.IO.File.GetLastWriteTime(file); ' disposition.ReadDate = System.IO.File.GetLastAccessTime(file); ' message.Attachments.Add(data); 'System.Net.Mail.SmtpClient client = new System.Net.Mail.SmtpClient(server); 'client.Credentials = new NetworkCredential("用户名", "密码"); 'client.Send(message); 'data.Dispose(); End Sub Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click '1.0发mail的方法 Dim mymail As System.Web.Mail.MailMessage = New System.Web.Mail.MailMessage() mymail.From = "[e-mail]" mymail.To = "[e-mail]" mymail.Subject = "test:" mymail.BodyFormat = System.Web.Mail.MailFormat.Html mymail.Body = "test yaya" ' System.Web.Mail.SmtpMail.SmtpServer = "10.4.180.37" System.Web.Mail.SmtpMail.Send(mymail) '服务器拒绝了一个或多个收件人地址。服务器响应为: 550 5.7.1 Unable to relay for [e-mail] Response.Write("send ok") '首先说一下SMTP配置。 ' (1)右键点击“SMTP虚拟服务器”选择“属性”->在“常规”选项卡中设置“IP地址(P)”，我设置的是10.4.180.37。 ' (2)选择“访问”选项卡，点击“中继”，选上“仅以下列表”(默认是被选上的)，点击“添加”，在“单台计算机”中加入10.4.180.37。 ' 提示，如果没有完成(2),则会出现大家常见的一种错误提示：服务器拒绝了一个或多个收件人地址。服务器响应为: 550 5.7.1 Unable to relay [e-mail](友情提示一下：错误中的邮件地址有所不同) 然后开始核心代码，其实和方法(一)的差不多。与(一)的主要区别在于：1.SMTP的不同，2.objMailMessage.From中本方法可以随便填写，但是(一)中别随便填写那么利用ASP.NET(C#)发送邮件的核心代码如下： End Sub End Class