VB.NET網(wǎng)絡(luò)中如何實現(xiàn)E-mail的發(fā)送

這期內(nèi)容當(dāng)中小編將會給大家?guī)碛嘘P(guān)VB.NET網(wǎng)絡(luò)中如何實現(xiàn)E-mail的發(fā)送,文章內(nèi)容豐富且以專業(yè)的角度為大家分析和敘述,閱讀完這篇文章希望大家可以有所收獲。

成都創(chuàng)新互聯(lián)公司服務(wù)緊隨時代發(fā)展步伐,進(jìn)行技術(shù)革新和技術(shù)進(jìn)步,經(jīng)過十年的發(fā)展和積累,已經(jīng)匯集了一批資深網(wǎng)站策劃師、設(shè)計師、專業(yè)的網(wǎng)站實施團(tuán)隊以及高素質(zhì)售后服務(wù)人員,并且完全形成了一套成熟的業(yè)務(wù)流程,能夠完全依照客戶要求對網(wǎng)站進(jìn)行成都網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計、建設(shè)、維護(hù)、更新和改版,實現(xiàn)客戶網(wǎng)站對外宣傳展示的首要目的,并為客戶企業(yè)品牌互聯(lián)網(wǎng)化提供全面的解決方案。

我們常常發(fā)E-mail郵件,可是你知道我們怎么把我們寫的郵件發(fā)送給另一方的嗎?利用VB.NET網(wǎng)絡(luò)可以實現(xiàn)這個過程,下面我們就來設(shè)計E-mail的發(fā)送部分:

1.參數(shù)設(shè)置

進(jìn)入Exchange系統(tǒng),選擇新增設(shè)置文件后屏幕上會顯示所需要的信息服務(wù),選擇Internet Mail。把設(shè)置文件的名稱設(shè)為test。屏幕會顯示兩個選項,您可以選擇以Modem方式或以Network 方式連接。筆者所用的是Modem方式;假若您是使Internet專線,就要選擇Network 方式。

選擇Modem方式后,Exchange會要求我們輸入郵件服務(wù)器的IP地址。接著將Transform Message的模式設(shè)置為Automatic,這樣當(dāng)我們連接到郵件服務(wù)器時,新的信息會自動下載到本地端。接下來,將您所使用的E mail地址、全名、口令和下載路徑等一一設(shè)置好。

2.VB.NET網(wǎng)絡(luò)程序設(shè)計

在Form上加入一個MAPIMessage控件,取名為MAPIMessage1;加入一個MAPISession控件,取名為MAPISession1;并加入三個TextBox控件,取名為Subject、Content和Addr。并在三個TextBox前各加入一個Label,將Caption分別改為標(biāo)題、內(nèi)容和地址。

將MAPIMessage1的各項屬性設(shè)置如下:

·DownLoadMail=TRUE;  ·LogonUI=TRUE;  ·NewSession=FALSE;  ·UserName=“發(fā)送E mail”。

這里將DownLoadMail設(shè)置為TRUE,當(dāng)程序和郵件服務(wù)器***次連接時,會將新的郵件下載到本地端。將LogonUI設(shè)置為TRUE,則當(dāng)您程序中Logon名稱輸入錯誤時,系統(tǒng)會顯示一個Message Box來讓您輸入正確的名稱。

由于這個程序僅使用一個Session,所以可將NewSession設(shè)置成FALSE。如果您有許多Session要建立的話,則將它設(shè)置成TRUE。UserName中所填的,是我們在Exchange中所新增的設(shè)置文件名稱,如果沒有填內(nèi)容的話,系統(tǒng)將會顯示一些Message Box請您輸入文件。在Form上加入三個按鈕,Logon、Logoff和Send,并分別將它們的Caption改為登錄、離網(wǎng)和發(fā)送。

在 Logon_Click()事件中加入以下程序代碼,程序的功能是使我們登錄到郵件服務(wù)器:

MAPISession1.SignOn   MAPIMessage1.SessionID=MAPISession1.SessionID   sgBox “Your ID is” + Str   (MAPISession1.SessionID)

其中MAPISession1.SignOn是作登錄的動作。在登錄時,因為已經(jīng)將MAPIMessage1控件的DownLoadMail屬性設(shè)置為TRUE,所以可以在屏幕上看到Message Box,顯示系統(tǒng)正在下載郵件。登錄成功后,系統(tǒng)會傳回一個SessionID,將該ID填入MAPIMessage1的SessionID中,這樣就可以利用該Session來傳送E mail,同時用Message Box通知用戶發(fā)送成功。

在Logoff_Click()事件中加入以下程序代碼,程序的功能是使我們離開郵件服務(wù)器:

MAPIS1.SignOff

在Send_Click()事件中加入以下程序代碼,程序的功能是使我們發(fā)送E mail:

MAPIMessage1.Compose   MAPIMessage1.RecipDisplayName = Addr.text   MAPIMessage1.AddressResolveUI = TRUE   MAPIMessage1.MsgSubject = Subject.text   MAPIMessage1.MsgNoteText = Content.text   MAPIMessage1.Send   MsgBox “您發(fā)送成功啦!”

其中Compose命令的主要目的是使您可以改變RecipDisplayName的內(nèi)容,將所需傳送的E mail地址、主題和文章內(nèi)容分別填入RecipDisplayName、MsgSubject和MsgNoteText,接著用Send命令發(fā)送出去,VB.NET網(wǎng)絡(luò)編程還是很好用的吧。

上述就是小編為大家分享的VB.NET網(wǎng)絡(luò)中如何實現(xiàn)E-mail的發(fā)送了,如果剛好有類似的疑惑,不妨參照上述分析進(jìn)行理解。如果想知道更多相關(guān)知識,歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道。

新聞標(biāo)題:VB.NET網(wǎng)絡(luò)中如何實現(xiàn)E-mail的發(fā)送
網(wǎng)站路徑:http://muchs.cn/article26/ghiscg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供自適應(yīng)網(wǎng)站、ChatGPT、全網(wǎng)營銷推廣、電子商務(wù)、響應(yīng)式網(wǎng)站、營銷型網(wǎng)站建設(shè)

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)

外貿(mào)網(wǎng)站建設(shè)