Send E-Mail from web service

[MIchele]

Hi,
I need to send a mail message from a web service.
If i execute the code from Windows Form Application the message is sended
correctly but if i execute the same code from a web service an exception is
throwed "Could not access 'CDO.Message' object".

That's the code:

Public Sub Send()
Try
Dim i As String
Dim m As New MailMessage
m.BodyEncoding = System.Text.Encoding.UTF8
m.BodyFormat = MailFormat.Html
m.Priority = MailPriority.Normal

m.Subject = "Hello"
m.To = "us***@company.com"
m.From = "us***@company.com"
m.Body = "Hello world"
Dim ss As SmtpMail
ss.SmtpServer = "mail.company.com"
ss.Send(m)
Catch ex As Exception
Debug.Write("Error: " & ex.Message)
End Try
End Sub

Why? I need special permission? I miss something?

Thanks

[Kumar Shetgar]

This is a generic error statement, so you really need to look into the details.
Best thing would be to see what the inner exceptions contains.

It may or may not be a permissions issue. Make sure you have valid SMTP server
Check the below group discussions which solved my problem earlier...hope
this will work for you too.
http://www.dotnet247.com/247referenc...34/173906.aspx
-- Kumar Shetgar

"MIchele" wrote:

Hi,
I need to send a mail message from a web service.
If i execute the code from Windows Form Application the message is sended
correctly but if i execute the same code from a web service an exception is
throwed "Could not access 'CDO.Message' object".

That's the code:

Public Sub Send()
Try
Dim i As String
Dim m As New MailMessage
m.BodyEncoding = System.Text.Encoding.UTF8
m.BodyFormat = MailFormat.Html
m.Priority = MailPriority.Normal

m.Subject = "Hello"
m.To = "us***@company.com"
m.From = "us***@company.com"
m.Body = "Hello world"
Dim ss As SmtpMail
ss.SmtpServer = "mail.company.com"
ss.Send(m)
Catch ex As Exception
Debug.Write("Error: " & ex.Message)
End Try
End Sub

Why? I need special permission? I miss something?

Thanks