Ett helv*e med att skicka mail =(

Hej!!

Jag har oerhörda problem med att skicka mail i min webbapplikation... har testat att inte skriva någon smtpserver.. då funkar applikationen jättebra förutom att inget mail skickas ;-) och det känns ju lite som att det är det som är vitsen... när jag skriver till smtpservern så får jag det kryptiska felet "Could not access 'CDO.Message' object."

Nån som har någon erfarenhet av detta?

här är koden:

Dim Mail As New MailMessage
Mail.To = "en korrekt skriven mailadress"
If tbSubject.Text.Length > 0 And tbContent.Text.Length > 0 Then
Mail.Subject = tbSubject.Text
Mail.Body = tbContent.Text
Mail.From = "xxxxxxxxxxx@xxx.se"
SmtpMail.SmtpServer = "en smtpserver som ska vara riktig"
SmtpMail.Send(Mail)

            Contactpanel.Visible = False

            lblError.Visible = True
            lblError.Text = "\<a href='contact.aspx'\>Klicka här för att skicka ytterliggare ett meddelande\</a\>"
        End If

Tusen tack på förhand ;-)