夜的第七章

    首先，当然是配置本机SMTP服务拉，如果是采用非本机的SMTP服务则不用做这一步（废话）。先打开Internet信息服务，右击 SMTP虚拟服务器--属性--访问--中继--添加，然后输入你的ip就可以了(当然如果为了方便你也可以输入127.0.0.1),确定，配置完成。

        然后编写代码：（我的代码如下,采用VB.net编写）

        先要导入System.Web.Mail命名空间

        Imports    System.Web.Mail
 
        1.采用本机SMTP服务器

   Dim newMail As MailMessage = New MailMessage

        With newMail
            .BodyFormat = MailFormat.Html
            .From = "发送人邮件地址"
            .To = "接受人邮件地址"
            .Subject = "test"
            .Body = "test"
        End With
        
        SmtpMail.SmtpServer = "本机的ip"    '要和你刚才配置的ip一样
        SmtpMail.Send(newMail)

        2.采用其它机器SMTP服务器（以163为例）
        
       Dim newMail As MailMessage = New MailMessage
       
        With newMail
            .BodyFormat = MailFormat.Html
            .Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1") 
            .Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername","你所要使用的SMTP的账号")
            .Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "你的账号密码") 

            .From = "发送人邮件地址"
            .To = "接受人邮件地址"
            .Subject = "test"
            .Body = "test"

        End With

        SmtpMail.SmtpServer = "smtp.163.com"    '163的SMTP服务器地址
        SmtpMail.Send(newMail)