先请确定安装了SMTP服务﹐
然后找到网域
把ConfigurationSettings.AppSettings["SmtpServer"]设为默认值。'以下是完整的代码Dim email As New System.Web.Mail.MailMessage
email.To = "[email protected]"
email.From = "[email protected]"
email.Body = "MessageText"
email.Subject = "SubjectText"
email.BodyFormat = Web.Mail.MailFormat.Textemail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1")
'将以下三行中中的,第2个参数,设为你的smtp相应值,即可
email.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserver", "smtp.163.net")
email.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", "smtpuser")
email.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "password")System.Web.Mail.SmtpMail.Send(email)