send email with VB.NET and exchange

[Samia]

I have an application running on a single workstation (win 2000) with
Outlook installed and a profile create using and exchange server with
authentificatio n through the DNS. This user profile is the only one
using the app.

I want the app to send email using the profile's email adress.

Here is what I am doing :

Dim mail As New MailMessage()
mail.From = "my*******@mydo main.com"
mail.To = "an************ @mydomain.com"
mail.Subject = "test msg"
mail.Body = "blablabla"
mail.BodyFormat = MailFormat.Html
SmtpMail.SmtpSe rver = "mydomain.c om"
SmtpMail.Send(m ail)

The problem is that I get the error message
An unhandled exception of type 'System.Web.Htt pException' occurred in
system.web.dll
Additional information: Could not access 'CDO.Message' object.

I tried changing smtpserver to myexchangeserve r.mydomain.com and I get
the same error message.

Any ideas?

Samia.

[John Vottero]

"Samia" <sa************ *@hotmail.com> wrote in message
news:1d******** *************** ***@posting.goo gle.com...

I have an application running on a single workstation (win 2000) with
Outlook installed and a profile create using and exchange server with
authentificatio n through the DNS. This user profile is the only one
using the app.

I want the app to send email using the profile's email adress.

Here is what I am doing :

Dim mail As New MailMessage()
mail.From = "my*******@mydo main.com"
mail.To = "an************ @mydomain.com"
mail.Subject = "test msg"
mail.Body = "blablabla"
mail.BodyFormat = MailFormat.Html
SmtpMail.SmtpSe rver = "mydomain.c om"
SmtpMail.Send(m ail)

The problem is that I get the error message
An unhandled exception of type 'System.Web.Htt pException' occurred in
system.web.dll
Additional information: Could not access 'CDO.Message' object.

I tried changing smtpserver to myexchangeserve r.mydomain.com and I get
the same error message.

Any ideas?

Look at all of the messages in the exception stack, "Could not access
'CDO.Message' object" is the message in the first exception. That exception
also has an InnerException property which probably references another
exception etc, etc. Keep going until InnerException is null. When you see
all of the messages you'll have a better idea of what's going wrong.

You can also use the ToString() method on an exception and it will build a
string that contains all of the messages.

[Samia]

I tried what you suggested. Doesn't work. I don't get an error message
however. No error message, the code is executed and nothing happens.

here is the code:

Dim iMsg As New CDO.Message()

iMsg.From = "st**********@b onlalum.com"
iMsg.To = "st**********@b onlalum.com"
iMsg.HTMLBody = "samia"
iMsg.Send()

any other ideas???

Thanks

Samia.
"Darshan Mehta" <ob*****@hotmai l.com> wrote in message news:<04******* *************** ******@phx.gbl> ...

The following information was taken off the microsoft
website:

To begin building a new message, first create an instance
of the Message COM class, as shown in the following
example:

[Visual Basic]
'Reference to Microsoft ActiveX Data Objects 2.5 Library
'Reference to Microsoft CDO for Windows 2000 Library
Dim iMsg As New CDO.Message

You can create and send or post a simple message using
only the IMessage interface. To send a Simple Mail
Transfer Protocol (SMTP) message, you must at least set
the To, From and Subject properties on the IMessage
interface. To post a Network News Transfer Protocol
(NNTP) message, you must at least set the
IMessage.Newsgr oups and IMessage.Subjec t properties.

To send a message call the IMessage.Send (SMTP) or
IMessage.Post (NNTP) method

Hope this helps,
Darshan

[Thys Brits]

Samia,

I have the same problem, only doing this from an ASP.Net website. The only
reason I could find for this was the installation of Office XP, which
replaces the reference to the CDO dll on Windows with a newer version (which
in my mind might be the only problem). I haven't found anything to verify my
thoughts, though.

As for the other suggested solution, I've used it, and it works fine. You
have to set the SMTP server on the Configuration of the e-mail message
object:

Dim iMsg As New CDO.Message()

iMsg.From = "st**********@b onlalum.com"
iMsg.To = "st**********@b onlalum.com"
iMsg.HTMLBody = "samia"

iMsg.Configurat ion.Fields["http://schemas.microso ft.com/cdo/configuration/se
ndusing"].Value = 2;

iMsg.Configurat ion.Fields["http://schemas.microso ft.com/cdo/configuration/sm
tpserverport"].Value = 25;

iMsg.Configurat ion.Fields["http://schemas.microso ft.com/cdo/configuration/sm
tpserver"].Value = strMailServer;
iMsg.Configurat ion.Fields.Upda te();

iMsg.Send()

Hope this helps

Thys Brits
MCSD/MCAD

"Samia" <sa************ *@hotmail.com> wrote in message
news:1d******** *************** ***@posting.goo gle.com...

I have an application running on a single workstation (win 2000) with
Outlook installed and a profile create using and exchange server with
authentificatio n through the DNS. This user profile is the only one
using the app.

I want the app to send email using the profile's email adress.

Here is what I am doing :

Dim mail As New MailMessage()
mail.From = "my*******@mydo main.com"
mail.To = "an************ @mydomain.com"
mail.Subject = "test msg"
mail.Body = "blablabla"
mail.BodyFormat = MailFormat.Html
SmtpMail.SmtpSe rver = "mydomain.c om"
SmtpMail.Send(m ail)

The problem is that I get the error message
An unhandled exception of type 'System.Web.Htt pException' occurred in
system.web.dll
Additional information: Could not access 'CDO.Message' object.

I tried changing smtpserver to myexchangeserve r.mydomain.com and I get
the same error message.

Any ideas?

Samia.

[John Vottero]

"Samia" <sa************ *@hotmail.com> wrote in message
news:1d******** *************** ***@posting.goo gle.com...

I have an application running on a single workstation (win 2000) with
Outlook installed and a profile create using and exchange server with
authentificatio n through the DNS. This user profile is the only one
using the app.

I want the app to send email using the profile's email adress.

Here is what I am doing :

Dim mail As New MailMessage()
mail.From = "my*******@mydo main.com"
mail.To = "an************ @mydomain.com"
mail.Subject = "test msg"
mail.Body = "blablabla"
mail.BodyFormat = MailFormat.Html
SmtpMail.SmtpSe rver = "mydomain.c om"
SmtpMail.Send(m ail)

The problem is that I get the error message
An unhandled exception of type 'System.Web.Htt pException' occurred in
system.web.dll
Additional information: Could not access 'CDO.Message' object.

I tried changing smtpserver to myexchangeserve r.mydomain.com and I get
the same error message.

Any ideas?

Look at all of the messages in the exception stack, "Could not access
'CDO.Message' object" is the message in the first exception. That exception
also has an InnerException property which probably references another
exception etc, etc. Keep going until InnerException is null. When you see
all of the messages you'll have a better idea of what's going wrong.

You can also use the ToString() method on an exception and it will build a
string that contains all of the messages.

[John Vottero]

"Samia" <sa************ *@hotmail.com> wrote in message
news:1d******** *************** ***@posting.goo gle.com...

I have an application running on a single workstation (win 2000) with
Outlook installed and a profile create using and exchange server with
authentificatio n through the DNS. This user profile is the only one
using the app.

I want the app to send email using the profile's email adress.

Here is what I am doing :

Dim mail As New MailMessage()
mail.From = "my*******@mydo main.com"
mail.To = "an************ @mydomain.com"
mail.Subject = "test msg"
mail.Body = "blablabla"
mail.BodyFormat = MailFormat.Html
SmtpMail.SmtpSe rver = "mydomain.c om"
SmtpMail.Send(m ail)

The problem is that I get the error message
An unhandled exception of type 'System.Web.Htt pException' occurred in
system.web.dll
Additional information: Could not access 'CDO.Message' object.

I tried changing smtpserver to myexchangeserve r.mydomain.com and I get
the same error message.

Any ideas?

Look at all of the messages in the exception stack, "Could not access
'CDO.Message' object" is the message in the first exception. That exception
also has an InnerException property which probably references another
exception etc, etc. Keep going until InnerException is null. When you see
all of the messages you'll have a better idea of what's going wrong.

You can also use the ToString() method on an exception and it will build a
string that contains all of the messages.

[Samia]

I tried what you suggested. Doesn't work. I don't get an error message
however. No error message, the code is executed and nothing happens.

here is the code:

Dim iMsg As New CDO.Message()

iMsg.From = "st**********@b onlalum.com"
iMsg.To = "st**********@b onlalum.com"
iMsg.HTMLBody = "samia"
iMsg.Send()

any other ideas???

Thanks

Samia.
"Darshan Mehta" <ob*****@hotmai l.com> wrote in message news:<04******* *************** ******@phx.gbl> ...

The following information was taken off the microsoft
website:

To begin building a new message, first create an instance
of the Message COM class, as shown in the following
example:

[Visual Basic]
'Reference to Microsoft ActiveX Data Objects 2.5 Library
'Reference to Microsoft CDO for Windows 2000 Library
Dim iMsg As New CDO.Message

You can create and send or post a simple message using
only the IMessage interface. To send a Simple Mail
Transfer Protocol (SMTP) message, you must at least set
the To, From and Subject properties on the IMessage
interface. To post a Network News Transfer Protocol
(NNTP) message, you must at least set the
IMessage.Newsgr oups and IMessage.Subjec t properties.

To send a message call the IMessage.Send (SMTP) or
IMessage.Post (NNTP) method

Hope this helps,
Darshan

[Samia]

I tried what you suggested. Doesn't work. I don't get an error message
however. No error message, the code is executed and nothing happens.

here is the code:

Dim iMsg As New CDO.Message()

iMsg.From = "st**********@b onlalum.com"
iMsg.To = "st**********@b onlalum.com"
iMsg.HTMLBody = "samia"
iMsg.Send()

any other ideas???

Thanks

Samia.
"Darshan Mehta" <ob*****@hotmai l.com> wrote in message news:<04******* *************** ******@phx.gbl> ...

The following information was taken off the microsoft
website:

To begin building a new message, first create an instance
of the Message COM class, as shown in the following
example:

[Visual Basic]
'Reference to Microsoft ActiveX Data Objects 2.5 Library
'Reference to Microsoft CDO for Windows 2000 Library
Dim iMsg As New CDO.Message

You can create and send or post a simple message using
only the IMessage interface. To send a Simple Mail
Transfer Protocol (SMTP) message, you must at least set
the To, From and Subject properties on the IMessage
interface. To post a Network News Transfer Protocol
(NNTP) message, you must at least set the
IMessage.Newsgr oups and IMessage.Subjec t properties.

To send a message call the IMessage.Send (SMTP) or
IMessage.Post (NNTP) method

Hope this helps,
Darshan

[Thys Brits]

Samia,

I have the same problem, only doing this from an ASP.Net website. The only
reason I could find for this was the installation of Office XP, which
replaces the reference to the CDO dll on Windows with a newer version (which
in my mind might be the only problem). I haven't found anything to verify my
thoughts, though.

As for the other suggested solution, I've used it, and it works fine. You
have to set the SMTP server on the Configuration of the e-mail message
object:

Dim iMsg As New CDO.Message()

iMsg.From = "st**********@b onlalum.com"
iMsg.To = "st**********@b onlalum.com"
iMsg.HTMLBody = "samia"

iMsg.Configurat ion.Fields["http://schemas.microso ft.com/cdo/configuration/se
ndusing"].Value = 2;

iMsg.Configurat ion.Fields["http://schemas.microso ft.com/cdo/configuration/sm
tpserverport"].Value = 25;

iMsg.Configurat ion.Fields["http://schemas.microso ft.com/cdo/configuration/sm
tpserver"].Value = strMailServer;
iMsg.Configurat ion.Fields.Upda te();

iMsg.Send()

Hope this helps

Thys Brits
MCSD/MCAD

"Samia" <sa************ *@hotmail.com> wrote in message
news:1d******** *************** ***@posting.goo gle.com...

I have an application running on a single workstation (win 2000) with
Outlook installed and a profile create using and exchange server with
authentificatio n through the DNS. This user profile is the only one
using the app.

I want the app to send email using the profile's email adress.

Here is what I am doing :

Dim mail As New MailMessage()
mail.From = "my*******@mydo main.com"
mail.To = "an************ @mydomain.com"
mail.Subject = "test msg"
mail.Body = "blablabla"
mail.BodyFormat = MailFormat.Html
SmtpMail.SmtpSe rver = "mydomain.c om"
SmtpMail.Send(m ail)

The problem is that I get the error message
An unhandled exception of type 'System.Web.Htt pException' occurred in
system.web.dll
Additional information: Could not access 'CDO.Message' object.

I tried changing smtpserver to myexchangeserve r.mydomain.com and I get
the same error message.

Any ideas?

Samia.