vb.net怎么通過exchange server發(fā)送郵件

需要引用 SmtpClient 和 MailMessage類生成郵件，然后發(fā)送即可。

成都創(chuàng)新互聯(lián)主營湖口網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營網(wǎng)站建設(shè)方案,成都App定制開發(fā),湖口h5微信小程序開發(fā)搭建,湖口網(wǎng)站營銷推廣歡迎湖口等地區(qū)企業(yè)咨詢

如果非要通過exchange server，可以用微軟提供的sdk寫入vb.net的代碼中。

請教vb.net高手一個關(guān)于發(fā)送郵件的問題

將Catch這一段改寫成

Catch

MessageBox.Show("郵件發(fā)送失?。? + Exception.Message)

檢查一下出錯的原因。

怎么在VB.net中編寫發(fā)送郵件?

知道了 是你是用自己的郵箱做發(fā)信人的吧一定是你的郵箱沒有開smtp服務(wù)權(quán)限，你到你的郵箱的設(shè)置里把“容許通過smtp發(fā)送郵件”選上就行了

如何用VB.Net收發(fā)郵件

在Identity2.0里面封裝了IIdentityMessageService接口，可以用來發(fā)送接收郵件。

看看

Imports System.Threading.Tasks

Imports System.Security.Claims

Imports Microsoft.AspNet.Identity

Imports Microsoft.AspNet.Identity.EntityFramework

Imports Microsoft.AspNet.Identity.Owin

Imports Microsoft.Owin

Imports Microsoft.Owin.Security

public function SendAsync(message as IdentityMessage) as task

dim credentialUserName = "郵箱登錄名"

dim sentFrom = "你的郵箱地址"

dim pwd= "郵箱登錄密碼";

dim client as new System.Net.Mail.SmtpClient("smtp服務(wù)器地址")

client.Port = 25'mtp郵件服務(wù)器端口

client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network

client.UseDefaultCredentials = false

dim credentials as new System.Net.NetworkCredential(credentialUserName, pwd)

client.EnableSsl = true

client.Credentials = credentials

dim mail as new System.Net.Mail.MailMessage(sentFrom, message.Destination)

mail.Subject = message.Subject

mail.Body = message.Body

return client.SendMailAsync(mail)

end function