provato il telnet (telnet out.alice.it 25) ma mi risponde con una connessione rifiutata...cambiando un po' il codice
codice:
Private WithEvents poSendMail As vbSendMail.clsSendMail
Private Sub CmdInvia_Click()
Set poSendMail = New vbSendMail.clsSendMail
poSendMail.SMTPHost = "out.alice.it"
poSendMail.From = "joshuacalandra@alice.it"
poSendMail.FromDisplayName = "Joshua Calandra"
poSendMail.Recipient = "joshuacalandra@hotmail.it"
poSendMail.RecipientDisplayName = "Hotmail"
'poSendMail.ReplyToAddress = txtFrom.Text
poSendMail.Subject = "prova email vbsendmail.dll"
'poSendMail.Attachment = txtFileName.Text 'attached file name
poSendMail.Message = "testo prova email vbsendmail.dll"
poSendMail.Send
Set poSendMail = Nothing
End Sub
Private Sub poSendMail_SendSuccesful()
' your code here …
MsgBox ("Mail Sent OK!")
End Sub
Private Sub poSendMail_SendFailed(Explanation As String)
' your code here …
MsgBox ("Mail Failed!" & vbCrLf & Explanation)
End Sub
Private Sub poSendMail_Status(Status As String)
' your code here …
LblStatus.Caption = Status
End Sub
In LblStatus.Caption, alla pressione di CmdInvia, mi riporta il messaggio "Connecting with smtp serve (out.alice.it)", e successivamente dopo un po' di secondi il messaggio "Mail Failed! Non è possibile raggiungere la rete da questo host in questo momento".
Qualche aiuto?Non capisco il perchè non debba funzionare dato che nella pagina di download della dll è presentato come esempio base per l'invio di una mail