Setelah Berhasil Mengirim Email dan Attachment dengan menggunakan Bahasa Pemrograman C#.Berikut ini versi lainnya dalam Bahasa Pemrograman Visual Basic .NET, disertai contoh project.
Buat dahulu Project VB.NET baru, kemudian Tambahkan satu buah Button sehingga tampak sebagai berikut :
Tampilkan kode program, tambahkan Import berikut di bagian kode program paling atas :
Imports System.Net.Mail
Klik dua kali pada Button1, tambahkan Kode Program berikut ini yang berguna untuk mengirimkan email, bisa email teks, HTML atau disertai Attachment berupa Gambar, Dokumen ataupun ZIP.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim mail As MailMessage = New MailMessage()
Dim SmtpServer As SmtpClient = New SmtpClient("smtp.gmail.com")
mail.From = New MailAddress("mapjogja@gmail.com")
mail.To.Add("nuramijaya@gmail.com")
mail.Subject = "Halo Boss"
mail.Body = "Halo Boss, Salam Super"
Dim Attachment As System.Net.Mail.Attachment
Attachment = New System.Net.Mail.Attachment("D:\dokumen.doc")
mail.Attachments.Add(Attachment)
SmtpServer.Port = 587
SmtpServer.Credentials = New System.Net.NetworkCredential("mapjogja", "xxx")
SmtpServer.EnableSsl = True
SmtpServer.Send(mail)
MessageBox.Show("Email Terkirim")
Catch ex As Exception
MsgBox(ex.Message.ToString)
End Try
End Sub
Ganti email dengan email GMail anda, username dan passwordnya. Dan tambahkan Attachment yang anda inginkan.
Projectnya dapat didonwload disini. Klik File - Download.
Semoga bermanfaat.