Invio e-mail in Visual Basic 6

[tattu]

Salve a tutti, questo è il mio primo post.
Vorrei inviare in automatico delle e-mail tramite un programma scritto in visual Basic 6, ma ancora non ci sono riuscito, questo è il codice che ho scritto, chi mi sa aiutare ?

Private Sub Command1_Click()
Dim objMail
Set objMail = CreateObject("CDONTS.Newmail")
objMail.From = "**.**@telecomitalia.it"
objMail.To = "**.**@telecomitalia.it"
objMail.Subject = "Subject Line"
objMail.Body = "Hello World!"
objMail.AttachFile "C:\Documents and Settings\Oem\Desktop\a.xls"
objMail.Send
Set objMail = Nothing
Unload Form1
End Sub


Grazie a tutti

[tattu]

Help please
Chi mi sa aiutare ?

[DilanDog]

Dovresti darmi tu prima un aiutino dicendomi qualcosa in più: ad esempio, qual è il problema o l'errore che ti da utilizzando il codice che hai postato?