Correo Electrónico - ENVIAR CORREO CON CDONT EN VB

HOLA.
TENGO ESTA FUNCION:
Public Sub SendMails
Dim oMail As New CDONTS.NewMail

Dim Sender as String
Dim Recipient as String
Dim titulo as String
Dim Texto as String

oMail.BodyFormat = 0
oMail.MailFormat = 0

Sender = "[email protected]" ' Email de quien envia
Recipient = "[email protected]" ' Email de destino

titulo = "Envio de mails con CDO desde ASP"
Texto = "Pruebas de envio"

oMail.Send Sender, Recipient, titulo, Texto

Set oMail = Nothing
End Sub

Y QUIERO ENVIAR CORREOS DESDE MI APLICACION EN VISUAL BASIC PARA ESTO HE CREADO UNA REFERENCIA A LA DLL CDONTS...PERO AUN NO ENVIA CORREOS...¿QUE MAS NECESITO?