ASP.NET 可以轻松的制作出寄送E-Mail 的网页。传送E-Mail 使用到的对象有两个，分别是MailMessage 对象以及SmtpMail 对象。MailMessage 对象是用来设定信件内容，而SmtpMail对象则是将设定好的信件传送出去。因为这两个对象预设并没有被使用，所以使用MailMessage对象和SmtpMail 对象之前要先宣告其名称地址，MailMessage 对象和SmtpMail 对象使用的名称地址是System.Web.Util。
MailMessage 对象的常用属性如下表所示：
SmtpMail 对象只有一个方法，如下表所示：
下列范例我们先用FrontPage 画好表格及布置对象，当按下送出钮时，程序会产生Mail 及SendMail 对象。接着送出设定好的Mail 对象后，在画面显示「信件传送成功」：
<%@ Import Namespace="System.Web.Util"%>
<Html>
<Form Runat="Server">
<Table Border="0" Width="100%">
<Tr>
<Td Width="100%" Valign="Middle" Align="Center">
<Table border="0" Width="105%">
<Tr>
<Td Width="28%" Valign="Top" Align="Right">收信人:</Td>
<Td Width="52%"><Asp:TextBox Id="txtReceiver" Runat="Server"
/></Td>
<Td Width="25%" RowSpan="2"></Td>
</Tr>
<Tr>
<Td Width="28%" Valign="Top" Align="Right">寄件人:</Td>
<Td Width="52%" Align="Left">
<Asp:TextBox Id="txtConsigner" Runat="Server" />
</Td>
</Tr>
<Tr>
<Td Width="28%" Valign="Top" Align="Right">主题:</Td>
<Td Width="52%" Align="Left"><Asp:TextBox Id="txtSubject"
Runat="Server" /></Td>
<Td Width="25%"></Td>
</Tr>
<Tr>
<Td Width="28%" Valign="Top" Align="Right">内容:</Td>
<Td Width="52%" Align="Left">
<Asp:TextBox Id="txtContent" TextMode="MultiLine"
Rows="5" Columns="36" Runat="Server"/>
</Td>
<Td Width="25%"></Td>
</Tr>
<Tr>
<Td Width="28%" Valign="Top" Align="Right">
<Asp:Button Id="btnSend" Text="送出" OnClick="btnSend_Click"
Runat="Server" />
</Td>
<Td Width="28%" Valign="Top" Align="Left">
<Input Type="Reset" Value="清除重写">
</Td>
</Tr>
</Table>
</Td>
</Tr>
</Table>
<Asp:Label Id="lblMessage" Runat="Server" />
</Form>
<Script Language="VB" Runat="Server">
Sub btnSend_Click(Sender As Object, e As EventArgs)
Dim Mail As New MailMessage
Dim SendMail As New SmtpMail
Mail.To=txtReceiver.Text
Mail.From=txtConsigner.Text
Mail.Subject=txtSubject.Text
Mail.Body=txtContent.Text
SendMail.Send(Mail)
lblMessage.Text="信件传送成功"
End Sub
</Script>
</Html>
|