關(guān)于vb.net 發(fā)送郵件附件的問題，大家?guī)兔Γ。。?/h2>

相當(dāng)多的郵件服務(wù)器不支持大附件，一般為32MB，網(wǎng)易的是50MB。參照鏈接：

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

所以發(fā)送失敗未必是你代碼的問題。很有可能是你服務(wù)器的問題。請(qǐng)找一個(gè)支持大附件的郵箱試一試，找不到的話看能不能把附件拆到32M以下，然后多次發(fā)送。

vb.net ftp上傳文件

Dim OpenFileDialog As New OpenFileDialog

OpenFileDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments

OpenFileDialog.Filter = "文本文件(*.jpg)|*.jpg|所有文件(*.*)|*.*"

If (OpenFileDialog.ShowDialog(Me) = System.Windows.Forms.DialogResult.OK) Then

Dim FileName As String = OpenFileDialog.FileName

' TODO: 在此處添加打開文件的代碼。

textbox1.Text = FileName

End If

第一個(gè)按鈕 上傳

Dim filelast As String = fileaddbefore.Text.Substring(fileaddbefore.Text.LastIndexOf("."), fileaddbefore.Text.Length - fileaddbefore.Text.LastIndexOf("."))

MessageBox.Show(filelast)

My.Computer.Network.UploadFile(textbox1.Text, "" 文件名.Text filelast, "登錄名1", "登錄密碼", True, 100)

第二個(gè)按鈕

vb.net如何上傳文件

My.Computer.Network.UploadFile

比如上傳到FTP

My.Computer.Network.UploadFile("d:\1.txt", "“, "FTP賬號(hào)", "FTP密碼", True, 100)

新手路過。

要一段VB.NET發(fā)郵件的代碼

'創(chuàng)建發(fā)件連接,根據(jù)你的發(fā)送郵箱的SMTP設(shè)置填充

Dim smtp As New System.Net.Mail.SmtpClient("smtp.163.com", 25)

'發(fā)件郵箱身份驗(yàn)證,參數(shù)分別為 發(fā)件郵箱登錄名和密碼

smtp.Credentials = New System.Net.NetworkCredential("用戶名", "密碼")

'創(chuàng)建郵件

Dim mail As New System.Net.Mail.MailMessage()

'郵件主題

mail.Subject = "郵件主題"

'主題編碼

mail.SubjectEncoding = System.Text.Encoding.GetEncoding("GB2312")

'郵件正文件編碼

mail.BodyEncoding = System.Text.Encoding.GetEncoding("GB2312")

'發(fā)件人郵箱

mail.From = New System.Net.Mail.MailAddress("example@163.com")

'郵件優(yōu)先級(jí)

mail.Priority = System.Net.Mail.MailPriority.Normal

'HTML格式的郵件,為false則發(fā)送純文本郵箱

mail.IsBodyHtml = True

'郵件內(nèi)容

mail.Body = "郵件正文內(nèi)容"

'添加收件人,如果有多個(gè),可以多次添加

mail.To.Add("收件人地址")

'定義附件,參數(shù)為附件文件名,包含路徑,推薦使用絕對(duì)路徑

'如果不需要附件,下面三行可以不要

Dim a As New System.Net.Mail.Attachment("附件文件")

'附件文件名,用于收件人收到附件時(shí)顯示的名稱

a.Name = "附件文件名"

'加入附件,可以多次添加

mail.Attachments.Add(a)

'發(fā)送郵件

Try

smtp.Send(mail)

MessageBox.Show("發(fā)送成功")

Catch

MessageBox.Show("發(fā)送失敗")

Finally

mail.Dispose()

End Try

網(wǎng)頁標(biāo)題：vb.net上傳附件 vbnet ftp
當(dāng)前網(wǎng)址：http://www.chinadenli.net/article24/dddjece.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站改版、電子商務(wù)、網(wǎng)站內(nèi)鏈、品牌網(wǎng)站設(shè)計(jì)、響應(yīng)式網(wǎng)站、標(biāo)簽優(yōu)化

廣告

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