Member Avatar for serag

I use the following code to send email, and strange thing that I received the message at hotmail mail, and failed to receive it at yahoo mail, could you help me and explain what happened and how to overcome this.

Regards
Serag Farag


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim msgmail As System.Web.Mail.MailMessage
Dim SmtpMail As System.Web.Mail.SmtpMail
msgmail = New System.Web.Mail.MailMessage
' SmtpMail =
msgmail.To = "elomah@yahoo.com"
msgmail.Cc = "ahmed_serageldin@hotmail.com"
msgmail.From = "ahmed_serageldin@hotmail.com"
msgmail.Subject = "subject of ggggggggggggggmsg"
msgmail.BodyFormat = System.Web.Mail.MailFormat.Html
msgmail.Body = " what u send mail ofgh ghgf ghr msgs"

SmtpMail.SmtpServer = "serag-0ivd22eow"
smtpmail.send(msgmail)
Response.Write("msg recived")
End Sub

  • 2 Contributors
  • 1 Reply
  • 74 Views
  • 3 Days Discussion Span
  • Latest Post Latest Post by Letscode
Member Avatar for Letscode

I used this code before,It worked in both yahoo and hotmail.Thought I would share it with you.But it sends emails to the bulk mail though.

Not sure Y yours did not work.

Imports Microsoft.VisualBasic
Dim Mailmsg As New System.Web.Mail.MailMessage
Dim obj As System.Web.Mail.SmtpMail

Private Overloads Sub Send_Click(ByVal sender As System.Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles Send.Click
        obj.SmtpServer = "127.0.0.1"
        Mailmsg.To = "blabla@yahoo.com"
        Mailmsg.From = “Bla@yahoo.com
        Mailmsg.Subject = “bla
        Mailmsg.Body =blabla
        obj.Send(Mailmsg)
        lblmailsent.Visible = True
    End Sub

Hope it helps

I use the following code to send email, and strange thing that I received the message at hotmail mail, and failed to receive it at yahoo mail, could you help me and explain what happened and how to overcome this.

Regards
Serag Farag


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim msgmail As System.Web.Mail.MailMessage
Dim SmtpMail As System.Web.Mail.SmtpMail
msgmail = New System.Web.Mail.MailMessage
' SmtpMail =
msgmail.To = "elomah@yahoo.com"
msgmail.Cc = "ahmed_serageldin@hotmail.com"
msgmail.From = "ahmed_serageldin@hotmail.com"
msgmail.Subject = "subject of ggggggggggggggmsg"
msgmail.BodyFormat = System.Web.Mail.MailFormat.Html
msgmail.Body = " what u send mail ofgh ghgf ghr msgs"

SmtpMail.SmtpServer = "serag-0ivd22eow"
smtpmail.send(msgmail)
Response.Write("msg recived")
End Sub

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.