【文章內(nèi)容簡(jiǎn)介】 種方式： i＞ 、 直接調(diào)用 對(duì)于 SmtpMail 對(duì)象 的 Send 方法只要有四個(gè)參數(shù)就可以完成調(diào)用，就是說(shuō)，只要有四個(gè)正確的參數(shù)就能夠發(fā)送電子郵件了。具體調(diào)用格式如下： (“郵件源地址 ”,”郵件目標(biāo)地址 ”,”郵件主題 ”,”郵件內(nèi)容 ”) 但是這種調(diào)用過(guò)于簡(jiǎn)單，只能滿足簡(jiǎn)單郵件的發(fā)送，對(duì)于復(fù)雜的郵件，就要用第二 種 方法來(lái)調(diào)用： ii＞ 、 把 MailMessage 對(duì)象作為參數(shù)來(lái)調(diào)用，具體調(diào)用如下： (MailMessage) 由于 MailMessage 對(duì)象屬性多，所以這種調(diào)用可以使郵件內(nèi)容更加豐富，一 般采用這種方式來(lái)發(fā)送郵件。在下面的例子里面就是用這種調(diào)用方式。 (三 )、 設(shè)計(jì)思路及步驟： 首先要說(shuō)明的是在此 程序里面我們用的程序語(yǔ)言是 Visual Basic .NET。 第一步：要包括名稱空間 ，加入在程序中使用的程序語(yǔ)言類型： 第二步：初始化 SmtpMail、 MailMessage 對(duì)象： Dim mailObj AS new MailMessage Dim smtp AS new SmtpMail ?定義 SMTP 服務(wù)器的名稱 = ?定義郵件的發(fā)送地址 = “” ?定義郵件的接收地址 =” ” ?定義郵件的暗送地址 =”” ?定義郵件的抄送地址 =”” ?定義郵件的主題 = 我的郵 件系統(tǒng)，歡迎使用！ ?定義郵件的主體 = 這里是郵件的主體！ ?郵件以 HTML 的格式發(fā)送 = ?定義郵件的有限級(jí)，在此設(shè)定為高 = ?給發(fā)送的郵件附加上一個(gè)附件 (new MailAttachment(c:\)) 第三步：發(fā)送郵件 (mailObj) (四 )、利 用 設(shè)計(jì) 郵件發(fā)送程序 的 源代碼 ＜ SCRIPT language=VB RUNAT=server＞ ＜ br＞ ＜ br＞ Sub SendMail (Obj As Object, E As EventArgs) ＜ br＞ ＜ br＞ Dim mailObj AS new MailMessage ＜ br＞ ＜ br＞ Dim smtp AS new SmtpMail ＜ br＞ ＜ br＞ 39。定義 SMTP 服務(wù)器的名稱 ＜ br＞ ＜ br＞ = ＜ br＞ ＜ br＞ 39。定義郵件的發(fā)送地址 ＜ br＞ ＜ br＞ = ＜ br＞ ＜ br＞ 39。定義郵件的接收地址 ＜ br＞ ＜ br＞ = ＜ br＞ ＜ br＞ 39。定義郵件的暗送地址 ＜ br＞ ＜ br＞ = ＜ br＞ ＜ br＞ 39。定義郵件的抄送地址 ＜ br＞ ＜ br＞ = ＜ br＞ ＜ br＞ 39。定義郵件的主題 ＜ br＞ ＜ br＞ = 我的郵件系統(tǒng)，歡迎使用！ ＜ br＞ ＜ br＞ 39。定義郵件的主體 ＜ br＞ ＜ br＞ = 這里是郵件的主體！ ＜ br＞ ＜ br＞ 39。郵件以 HTML 的格式發(fā)送 ＜ br＞ ＜ br＞ = ＜ br＞ ＜ br＞ 39。定義郵件的有限級(jí) ＜ br＞ ＜ br＞ = ＜ br＞ ＜ br＞ 39。給發(fā)送的郵件附加上一個(gè)附件，請(qǐng)確定在 C 盤(pán)的根目錄下有 文件 ＜ br＞ ＜ br＞ (new MailAttachment(c:\)) ＜ br＞ ＜ br＞ (mailObj) ＜ br＞ ＜ br＞ End Sub ＜ br＞ ＜ br＞ ＜ /SCRIPT＞ 例 3：利用 進(jìn)行文件處理 一種程序設(shè)計(jì)語(yǔ)言對(duì)文件處理的能力的大小往往 也是一種語(yǔ)言功能大小的一種表現(xiàn)。在 中，對(duì)于文件的處理主要是通過(guò) .Net FrameWork SDK 中的一個(gè) 的名稱空間來(lái)實(shí)現(xiàn)了，在 名稱空間中定義了許多關(guān)于文件處理的類（ class）、方法和屬性，這些類、方法和屬性使得在很容易在 中進(jìn)行文件處理。由于在此名稱空間中有定義了許多類、方法和屬性，而這些不可能通過(guò)本文來(lái)一一介紹。 下面主要結(jié)合 一個(gè)具體的 例子來(lái)介紹對(duì)于文件處理的基本操作。 文件基本操作也就是我們平常經(jīng)常用到的。具體說(shuō)就是對(duì)文件的讀、寫(xiě)、拷貝、 移動(dòng)、刪除。下面就這幾個(gè)操作來(lái)具體介紹一下。 (一 )、 程序設(shè)計(jì)及運(yùn)行環(huán)境 Windows 2020 Professional、 .Net FrameWork SDK Beta 2。 (二 )、 通過(guò) 頁(yè)面進(jìn)行文件的讀操作 本程序的運(yùn)行界面及運(yùn)行結(jié)果如圖 圖 4 所示： 圖 3： 通過(guò) 頁(yè)面進(jìn) 行文件的讀操作 程序的運(yùn)行界面 圖 4： 通過(guò) 頁(yè)面進(jìn)行文件的讀操作 程序的運(yùn)行結(jié)果界面 1)、 程序設(shè)計(jì)中的主要思路及步驟： 本 頁(yè)面中采用的程序語(yǔ)言是 。程序主要功能是打開(kāi)指定文件并把文件以 ASCII 碼的形式顯示出來(lái)。下面是程序設(shè)計(jì)中的一些主要步驟： i＞ 、 讀取文件中用 到的對(duì)象 StreamReader 在 中定義了一個(gè)讀取文件的對(duì)象 StreamReader，本程序就是通過(guò)這個(gè)對(duì)象完成對(duì)文件的讀取。然后以文本形式顯示出來(lái)。具體如下： Dim streamreaderobj As StreamReader file_name = 39。 讀出一個(gè)指定文件，并把他指派給 streamreader 對(duì)象 Do filecont = () ( filecont amp。 ＜ br＞ ) Loop Until filecont = 39。 一行一行讀出文件內(nèi)容，知道讀到一行內(nèi)容為空字符串的時(shí)候，才停止 39。 在讀操作完成以后，關(guān)閉 StreamReader 對(duì)象 ii＞ 、 在程序中所用到的 Form 的編碼應(yīng)該是 Multipart/FormData，不用他的缺省編碼。具體如下： ＜ form Method = Post EncType = Multipart/FormData runat = server ＞ ＜ /form ＞ 2)、 程序的源代碼： ＜ % @ Import Namespace = %＞ ＜ script language = vb runat = server ＞ Sub SendButton_Click ( sender as Object , e as EventArgs ) 39。 創(chuàng)建一個(gè) StreamReader 對(duì)象 Dim streamreaderobj As StreamReader Dim file_name as String 39。 定義一個(gè)變量來(lái)保存從文件中讀出的內(nèi)容 Dim filecont As String streamreaderobj = ( file_name ) = false 39。 一行一行讀出文件內(nèi)容，知道讀到一行內(nèi)容為空字符串的時(shí)候，才停止 Do filecont = () 39。 利用 StreamReader 對(duì)象讀取文件 ( filecont amp。 ＜ br＞ ) 39。 顯示文件內(nèi)容 Loop Until filecont = 39。 在讀操作完成以后，關(guān)閉 StreamReader 對(duì)象 ( ＜ br＞ 以上就是 amp。 file_name amp。 文件的全部?jī)?nèi)容！ ) End Sub ＜ /script＞ ＜ asp:panel id = panel1 runat = server ＞ ＜ form Method = Post EncType = Multipart/FormData runat = server ＞ ＜ p＞歡迎在 頁(yè)面對(duì)文件進(jìn)行讀操作＜ /p ＞ 請(qǐng)選擇文件名稱：＜ input type = file id = filename runat = server /＞ ＜ br ＞ ＜ asp:button id = Write Text = 讀文件 OnClick = SendButton_Click runat = server /＞ ＜ /form ＞ ＜ /asp:panel ＞ (三 )、通 過(guò) 頁(yè)面進(jìn)行文件寫(xiě)操作： 本程序的運(yùn)行界面如圖 5 所示： 圖 5： 通過(guò) 頁(yè)面進(jìn)行文件寫(xiě)操作 程序運(yùn)行界面 1)、 程序設(shè)計(jì)中的主要思路及步驟： 本 頁(yè)面中采用的程序語(yǔ)言是 。程序主要功能是建立一個(gè)文本形式的文件，這個(gè)文件名是可以讓使用者自行定義的，然后把使用者填入 的內(nèi)容保存在此文件中。下面是程序設(shè)計(jì)的主要步驟： i＞ 、 讀取文件中用到的對(duì)象 StreamWriter StreamWriter 也是由名稱空間 中定義的，主要用來(lái)寫(xiě)入文件內(nèi)容。本程序中也通過(guò)他來(lái)完成文件寫(xiě)操作的。對(duì)文件的寫(xiě)操作相比較文件的讀操作來(lái)說(shuō)較簡(jiǎn)單。具體的步驟如下： Dim strwriterobj As StreamWriter Dim contxt as String file_name = contxt = 39。 其中 是要寫(xiě)入文件的內(nèi)容 strwriterobj = ( file_name ) 39。 創(chuàng)建一個(gè)文件，并把此文本文件作為對(duì)象分派給 streamwriter 對(duì)象 ( contxt ) 39。 把文本內(nèi)容寫(xiě)入文件中 39。關(guān)閉對(duì)象 ii＞ 、 上面主要完成的是對(duì)建立一個(gè)新文件，并寫(xiě)入內(nèi)容。此時(shí)要寫(xiě)入的文件如果已經(jīng)存在，程序就會(huì)清空原文件，然后再寫(xiě)入新內(nèi)容。如果你所要完成的工作是對(duì)于已經(jīng)存在 的文件只是在文件尾部添加內(nèi)容，對(duì)于不存在的文件才建立和追加內(nèi)容。用以下語(yǔ)句替換，就可以了。 被替換語(yǔ)句： strwriterobj = ( file_name ) 替換成語(yǔ)句： strwriterobj = ( file_name ) 2)、 程序源代碼 ＜ % @ Import Namespace = %＞ ＜ script language = vb runat = server ＞ Sub SendButton_Click ( sender as Object, e as EventArgs ) 39。 定義一個(gè) streamwriter 對(duì)象 Dim strwriterobj As StreamWriter Dim file_name as String Dim contxt as String 39。 創(chuàng)建一個(gè)文件，并把此文本文件作為對(duì)象分派給 streamwriter 對(duì)象 file_name = contxt = strwriterobj = ( file_name ) 39。 把文本內(nèi)容寫(xiě)入文件中 ( contxt ) 39。關(guān)閉對(duì)象 ( 成功的進(jìn)行了文件寫(xiě)操作！ ) = false End Sub ＜ /script＞ ＜ asp:panel id=panel1 runat=server ＞ ＜ form id=form1 runat=server ＞ ＜ p＞歡迎在 頁(yè)面對(duì)文件進(jìn)行寫(xiě)操作＜ /p ＞ 請(qǐng)?zhí)钊胛募Q：＜ asp:textbox id = filename size = 40 runat = server /＞＜ br ＞ 請(qǐng)?zhí)钊雽?xiě)入內(nèi)容：＜ asp:textbox id = Body TextMode = MultiLine Columns = 40 Rows = 10 runat = server /＞＜ br ＞ ＜ asp:button runat = server id = Write Text = 寫(xiě)入文件 OnClick = SendButton_Click /＞ ＜ /form ＞ ＜ /asp:panel ＞ (四 )、 在 頁(yè)面中完成文件的拷貝、移動(dòng)和刪除操作 在 中完成文件的拷貝、移動(dòng)和刪除操作就更簡(jiǎn)單了。這是因?yàn)樵诿? 稱空間 中就定義了對(duì)文件進(jìn)行拷貝和移動(dòng)的方法。直接調(diào)用這些方法就可以完成以上操作。下面給出文件拷貝、移動(dòng)和刪除例子。 1） .文件拷貝操作 ＜ % @ Import Namespace = %＞ ＜ % 39。 下面語(yǔ)句完成文件拷貝工作 ( c:\ , c:\ ) ( 文件