CDO.Message error

Question

Hello

I have a problem
I have on this code,on the last line an error
CDO.message error
What can i do?


This is mine code




Dim Counter As Integer

     

        'Set the properties
        'Assign the SMTP server
        obj.SmtpServer = txtSmtpServer.Text
        'Multiple recepients can be specified using ; as the delimeter
        'Address of the recipient
        Mailmsg.To = txtTo.Text


        'Your From Address
        'You can also use a custom header Reply-To for a different replyto address
        Mailmsg.From = txtNaam.Text


       

        'If you want you can add a reply to header
        'Mailmsg.Headers.Add("Reply-To", "[e-mail]")
        'custom headersare added like this
        'Mailmsg.Headers.Add("Manoj", "TestHeader")

        'Mail Subject
        Mailmsg.Subject = txtOnderwerp.Text

        'Attach the files one by one
        For Counter = 0 To lstAttachment.Items.Count - 1
            Attachment = New MailAttachment(lstAttachment.Items(Counter))
            'Add it to the mail message
            Mailmsg.Attachments.Add(Attachment)
        Next

        'Mail Body
        Mailmsg.Body = txtBoodschap.Text
        'Call the send method to send the mail
        obj.Send(Mailmsg)

Answer 1

Svekke

 Is the error an exception? If so do you have an inner exception?

How are you authenticating the user? Is this just intended for an internal lan?

Why CDO and not System.Net.Mail?

Answer 2

This is the error i get


An unhandled exception of type 'System.Web.httpException' occured in system.web.dll

Aditional information: Have no acces to the object CDO.message


This is the error text i get

Answer 3

 

See if any of these suggestion help...

http://www.systemwebmail.com/faq/4.2.3.aspx