您的位置：首页 > 编程语言 > ASP

用ASP.NET构建完整E-mail发送系统

2004-08-24 16:43 465 查看

<% @Im

port Namespace="System.Web.Mail" %>
<script language="vb" runat="server">
Sub SendButton_Click(sender as Object, e as EventArgs)
'创立一个 MailMessage 对象
Dim MailObj as New MailMessage()
'以下是设定MailMessage 对象的属性，及程序的一些常规判断。
'设定邮件的发送地址
if EmailFrom.text<>"" then MailObj.From=EmailFrom.text
'设定邮件的目的地址
if EmailTo.text<>"" then MailObj.To=EmailTo.text
'设定邮件的抄送地址
if EmailCc.text<>"" then MailObj.Cc=EmailCc.text
'设定邮件的密送地址
if EmailBcc.text<>"" then MailObj.Bcc=EmailBcc.text
'设定邮件格式是文本格式，如果要设定成超文本，把MailFormat.Text改成 MailFormat.Html
MailObj.BodyFormat=MailFormat.Text
'设定邮件优先级，可为 High（高）, Low（低）, Normal（普通）
MailObj.Priority=MailPriority.Normal
'设定邮件主题
MailObj.Subject=EmailSubject.text
'设定邮件内容
MailObj.Body=EmailBody.text
'给邮件增加一个附件
Dim strFileName as string
strFileName=Emailfile.PostedFile.FileName
if strFileName<>"" then MailObj.Attachments.Add(new MailAttachment(strFileName))
'指定使用缺省的SMTP服务器
SmtpMail.SmtpServer=""
'现在开始发送邮件
SmtpMail.Send(MailObj)
panelSendEmail.Visible=false
panelMailSent.Visible=true
End Sub
</script>
<html>
<body>
<asp:panel id="panelSendEmail" runat="server">
<form Method="Post" EncType="Multipart/Form-Data" runat="server">
<h2>欢迎用ASP.NET来发送E-mail</h2>
<b>请输入邮件发送地址:</b>
<asp:textbox id="EmailFrom" size="30" runat="server" />
<p>
<b>请输入邮件目的地址:</b>
<asp:textbox id="EmailTo" size="30" runat="server" />
<p>
<b>请输入邮件抄送地址:</b>
<asp:textbox id="EmailCc" size="30" runat="server" />
<p>
<b>请输入邮件密送地址:</b>
<asp:textbox id="EmailBcc" size="30" runat="server" />
<p>
<b>请输入邮件主题:</b>
<asp:textbox id="EmailSubject" size="30" runat="server" />
<p>
<b>请输入邮件主体:</b>
<asp:textbox id="EmailBody" TextMode="MultiLine"
Columns="40" Rows="10" runat="server" />
<p>
<b>请加入附件名称:</b>
<input id="Emailfile" type="file" runat="server" size="40" />
<asp:button runat="server" id="SendButton" Text="发送"
OnClick="SendButton_Click" />
</form>
</asp:panel>
<asp:panel id="panelMailSent" runat="server" Visible="False">
您的邮件已经成功发送，欢迎您的再次使用！
</asp:panel>
</body>
</html>

内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理

标签： asp.net textbox server asp button object

相关文章推荐

新的分享

章节导航