Send mail from Visual Basic

bukanintrik

Saturday, November 6, 2010

Baca Juga

Script VB untuk kirim email menggunakan Microsoft Outlook

Sub Kirim_Pesan      
        Set OAPP = CreateObject("Outlook.Application")
        Set msg = OAPP.CreateItem(0)
        msg.To = <e-mail  tujuan>
        msg.Subject = <judul email>
        msg.Body = <isi pesan email>
        msg.Attachments.Add (<path attachment>)
        msg.Send
        Set msg=Nothing
        Set OAPP=Nothing
End Sub

NOTE: Komputer harus terinstall Microsoft Outlook :))

Labels: Pemrograman, VB Source Code

Thanks for reading Send mail from Visual Basic. Please share...!