Update VB6 to VB.NET 2.0 Email Send

G

Guest

Hi,
I have following codes in VB6 for sending the email on a server installed
SMTP. It works fine. Now I want to update it with VB.NET 2.0 by using
..NET.Mail object.
VB6 code:
Dim myMail
Set myMail=CreateObject("CDO.Message")
myMail.Subject = "Sending email with CDO"
myMail.From = "Testing"
myMail.To = "(e-mail address removed)"
myMail.TextBody = "This is a message."
myMail.Send
Set myMail = Nothing

VB.NET codes:
Dim myMail As New MailMessage
myMail.From = New MailAddress("Testing")
myMail.To.Add("(e-mail address removed)")
myMail.Subject = "Sending email with Net.Mail"
myMail.Body = "This is a message."
Dim client As New SmtpClient()
client.Host = [myservername]
client.Send(myMail)

I had an error when fetched .From property which is omited in VB6, I want to
know what I have to put there? If I run it from server, do I need to set host
property?
How to make it work properly?
Thanks in advance
 
G

Guest

I find the solution by myself.
From must be a valid email address
Host is server DSN name
and more important is the following line
client.DeliveryMethod = SmtpDeliveryMethod.PickupDirectoryFromIis
 
R

Rick

Yes, you need to specify Host because you could use any SMTP server so the
control needs to know specifically which one you want to use.

Same for From.

Rick
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads


Top