t;asp:ListItem>High</asp:ListItem>
</asp:DropDownList>
<td>
</tr>
<tr>
<td align="right">CC:</td>
<td align="left"><asp:TextBox ID="txtCC" Runat="Server" /></td>
</tr>
<tr>
<td align="right">BCC:</td>
<td align="left"><asp:TextBox ID="txtBCC" Runat="Server" /></td>
</tr>
<tr>
<td align="right">Select File to Attach:</td>
<td align="left">
<INPUT type="file" id="txtAttachment" runat="server" NAME="txtAttachment">
</td>
</tr>
<tr>
<td colspan="2" align="center">
<asp:Button ID="btnSend" Text="Send" Type="Submit"
OnClick="btnSend_Click" runat="Server" />
</td>
</tr>
</table>
</form>
</asp:Panel>
</body>
</html>
Now for the code-behind file. First the NameSpace Imports. Notice that System.Web.Mail is included. Also notice that System.Web.UI.HtmlControls is also included. We must have that to work with the HtmlInput control that we use for browsing for an attachment. System.IO is needed because we must determine the full directory path for the attachment. Imports System
Imports System.Web.Mail
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.HtmlControls
Imports System.IO
Next is the declaration of the main class and declaration of the html and web controls we us in the program. Public Class SendEmail : Inherits Page

Protected txtFrom As TextBox
Protected txtTo As TextBox
Protected txtSubject As TextBox
Protected txtMessage As TextBox
Protected ddlPriority As DropDownList
Protected txtCC As TextBox
Protected txtBCC As TextBox
Protected txtAttachment As HtmlInputFile
Next is the button_click event where all the work is done. First the top of the code where we dimension the variables and objects we will need. We create both MailMessage and a SmtpMail objects. We also create a MailAttachment object. Next we get the contents of the HtmlInput control (postedFile) and dimension a variable to hold the path to the attachment. Notice that the "strPath =" line is inside a try-catch block. If you are not sending an attachment .Net chokes if you try to get the path to a null attachment object. Public Sub btnSend_Click(Sender As Object, e As EventArgs)
Dim objMail As New MailMessage
Dim objConn As SmtpMail
Dim objAttach As MailAttachment
Dim postedFile = txtAttachment.PostedFile
Dim strPath As String = &q

上一页  [1] [2] [3] 下一页

在google里搜索更多Send Email and Attachments with ASP.Net...

	Web www.51ec.org

上一篇信息学院： asp.net中的多語言使用

下一篇信息学院： Securing an ASP.Net application...…