如果将指定内容发送到指定邮箱中？(vb.net)

[JJY1982]

比如，在一个WEBFORM中,有一个TEXTBOX和一个BUTTON，在点击BUTTON之后，将TEXTBOX中的内容发送到[e-mail]这个邮箱中，应该怎么实现这样的功能？

[simon8181]

你可以在csdn中搜索一下，很多发邮件的例子。
<%@ page Language = "C#" debug = "true" Explicit="True" %>
<%@ Import Namespace = "System.Web.Util" %>
<%@ Import Namespace = "System.Web.Mail" %>
<script language = "C#" runat = "server">

public void SendMail (Object Obj, EventArgs E) {
labelSendMailResult.Text = "";
if (Page.IsValid) {
MailMessage mailObj = new MailMessage();

// 设置email的'from'和'to'的地址
mailObj.From = inputMailFrom.Value;
mailObj.To = inputMailTo.Value;

mailObj.Subject = inputMailSubject.Value;
mailObj.Body = textBoxMailBody.Text;
mailObj.BodyFormat = MailFormat.Html;
// mailObj.BodyEncoding = MailFormat.Base64;
mailObj.Priority = MailPriority.High;
if (inputMailAttachment.PostedFile.ContentLength > 0) {
mailObj.Attachments.Add(new MailAttachment(inputMailAttachment.PostedFile.FileName));
}
SmtpMail.Send(mailObj);
labelSendMailResult.Text = "邮件发送成功 From: " + inputMailFrom.Value + "; To: " + inputMailTo.Value;
if (inputMailAttachment.PostedFile.ContentLength > 0) {
labelSendMailResult.Text += "<br/>邮件包含附件: " + inputMailAttachment.PostedFile.FileName + ", 附件大小: " + (inputMailAttachment.PostedFile.ContentLength / 1024).ToString() + " K Byte(s)";
}
}
}
</script>

[saucer]

see
Sending Email from an ASP.NET Web Page
http://www.4guysfromrolla.com/webtech/080801-1.shtml

[JJY1982]

SmtpMail.Send(mailObj);

这个SmtpMail是什么对象啊？

[JJY1982]

SendUsing”配置值无效。
说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。

异常详细信息: System.Runtime.InteropServices.COMException: “SendUsing”配置值无效。



代码是这样的：
Dim myEmail As New System.web.Mail.MailMessage
Dim mySmtp As Mail.SmtpMail

myEmail.To = "[e-mail]"
myEmail.From = "[e-mail]"
myEmail.BodyFormat = Mail.MailFormat.Text
myEmail.Priority = Mail.MailPriority.Normal
myEmail.Subject = "New Sale's lead"
myEmail.Body = "Hi!" & vbCrLf & vbCrLf & "How are you doing?"

System.Web.Mail.SmtpMail.SmtpServer = "SmtpServerName"
System.Web.Mail.SmtpMail.Send(myEmail)


有人指点一下吗？急啊！

[JJY1982]

修改了一下，错误又变了！

与服务器的传输连接失败。
说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。

异常详细信息: System.Runtime.InteropServices.COMException: 与服务器的传输连接失败。

源错误:


行 105：
行 106： System.Web.Mail.SmtpMail.SmtpServer = "SmtpServerName"
行 107： System.Web.Mail.SmtpMail.Send(myEmail)
行 108：
行 109： 'mySmtp.Send("[e-mail]", "[e-mail]", "Hello", "Hello")

[JJY1982]

Dim myEmail As New Mail.MailMessage
myEmail.To = "[e-mail]"
myEmail.From = "[e-mail]"
myEmail.BodyFormat = Mail.MailFormat.Text
myEmail.Priority = Mail.MailPriority.Normal
myEmail.Subject = "New Sale's lead"
myEmail.Body = "Hi!" & vbCrLf & vbCrLf & "How are you doing?"

我的代码是这样的，为什么我的信箱里收不到啊！

[renyu732]

Jmail

[renyu732]

http://www.orcsweb.com/articles/send_email_from_dotnetv2.aspx

[glory_sql]

up