No me funciona CDONTS

Intente usar la .dll CDONTS en un formulario de Visual basic 6.0 en una máquina con windows XP, pero no me funciona. Agregué la referencia a la librería y luego adapté el siguiente código
Private Sub Command1_Click()
Dim MyMail As CDONTS.NewMail
Set MyMail = CreateObject("CDONTS.NewMail")
MyMail.To = "[email protected]"
MyMail.Subject = "Osita preciosa, esta es una prueba"
MyMail.BodyFormat = 0
MyMail.MailFormat = 0
MyMail.Body = "123"
MyMail.Send
Set MyMail = Nothing
End Sub
Al ejecutar la línea Set MyMail = Nothing ocurre un error. Que debo hacer?