ASP.NET - No se puede obtener acceso al objeto 'CDO.Message'

hola tengo un problema al intentar enviar un email
sale el siguiente error :No se puede obtener acceso al objeto 'CDO.Message'

esta es la rutina que utilizo :

Imports System.Web.Mail

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim email As New MailMessage
With email
.From = "[email protected]"
.To = "[email protected]"
.Subject = "Artículo de MSDN"
.Body = "Lea todos los artículos de MSDN, para aprovechar la tecnología al máximo."
End With
Try
SmtpMail.Send(email)
Catch ex As Exception
Label1.Text = ex.Message
End Try
end sub

Miguel<VR>