Send email from windows app using vb.net

Question

2.54/5 (3 votes)

See more:

i have the following code,i'm trying to send an email from my windows application but it's not working... any help ? note that i'm using vb.net and i'm not getting any errors.. i'm just not receiving any emails !

VB

 Private Sub senemail()
    'create the mail message
    Dim mail As New MailMessage()

    'set the addresses
    mail.From = New MailAddress("jocelyne_elkhoury@inmobiles.net")
    mail.To.Add("jocelyne_el_khoury@hotmail.co.uk")

    'set the content
    mail.Subject = "This is an email"
    mail.Body = "this is a sample body"

    'send the message
    Dim smtp As New SmtpClient("127.0.0.1")
    smtp.Send(mail)
End Sub

Posted 9-Sep-13 4:25am

Jocelyne El Khoury

Updated 28-Apr-16 20:14pm

Add a Solution

Comments

[no name] 9-Sep-13 10:27am

Do you actually have an email server setup and running on the computer that you are running this code on?

Joezer BH 9-Sep-13 10:29am

5ed!

3 solutions

Add a Solution

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Sergey Alexandrovich Kryukov · Answer 1 · 2013-09-09T05:01:00

Solution 1

This is very unlikely that you have an SMTP server up and running on this address, which is local. You need to use some external server; and it also very likely that you will need to be registered with that server and use authentication.

—SA

Posted 9-Sep-13 5:01am

Sergey Alexandrovich Kryukov

Comments

Espen Harlinn 10-Sep-13 5:46am

True, unless he installed one for development purposes ...

Sergey Alexandrovich Kryukov 10-Sep-13 10:28am

Exactly. But in that case it would probably work somehow... :-)
Thank you, Espen.
—SA

basurajkumbhar · Answer 2 · 2013-09-13T02:33:00

VB

Dim mail As New MailMessage()
        Dim SmtpServer As New SmtpClient("smtp.gmail.com")
        mail.From = New MailAddress(txtid.Text)
        mail.[To].Add("Email Id to send@rediffmail.com")
        mail.Subject = txtsub.Text
        mail.Body = txtmess.Text
        mail.Attachments.Add(New Attachment(OpenFileDialog1.FileName))
        SmtpServer.Port = 587
        SmtpServer.Credentials = New System.Net.NetworkCredential(txtid.Text, txtpass.Text)
        SmtpServer.EnableSsl = True
        SmtpServer.Send(mail)
        mail.From = New MailAddress(txtid.Text)
        MsgBox("E-mail Has Been Send Successfully !")

Its very simple to send email in vb.net please check this code or use directly.
If you are send attachment then use the openfiledialogbox control.

Espen Harlinn · Answer 3 · 2013-09-09T10:29:00

Solution 2

Have a look at Sending an Email in C# with or without attachments: generic routine.[^]

Best regards
Espen Harlinn

Posted 9-Sep-13 10:29am

Espen Harlinn

Send email from windows app using vb.net

3 solutions

Solution 1

Solution 3

Solution 2

Add your solution here

Preview 0

Send email from windows app using vb.net

3 solutions

Solution 1

Solution 3

Solution 2

Add your solution here

Preview 0

Existing Members

...or Join us