[VB6] Invio di email tramite modulo

[nerokufu]

ciao ragazzi,
da tempo mi trovo dinanzi ad un annoso problema.....fin quando lavoravo su nt avevo moduli access o macro di excel vb che alla fine del lavoro inviavano una mail in automatico....

appena passato vs xp, i maledetti blocchi di protezione (che non c'è di eliminarli del tutto....) fanno comparire il fatidico messaggio....un programma esterno sta tentando di utilizzare la posta elettronica per l'invio di un messaggio.... inviare? si o no?.... io vorrei che questa domanda non mi venga posta visto che l'oggetto deve essere inviato anche in orari dove non sono presente a lavoro....

c'è la possibilità di utilizzare magari un altro applicativo che "sorpassi" questo limite?

grazie a tutti

[alka]

A quale versione di VB fai riferimento? :master:
Va indicata nel titolo, come da Regolamento.

Comunicamela così provvedo a correggerlo.

[nerokufu]

vb6

[oregon]

Puoi provare ad usare la DLL VbSendMail ed utilizzare il tuo server SMTP ...

[nerokufu]

ho provato comunque a compilare il modulo in questo modo per
prova....sembra andare senza errori però la mail non arriva.....chissà
cosa ho combinato...)) grazie ancora

ps il server di posta è aziendale


Dim oSM As clsSendMail
Set oSM = New clsSendMail
With oSM
.SMTPHostValidation = VALIDATE_NONE ' Optional,
default =VALIDATE_HOST_DNS
.SMTPHost = "mail.wind.it"
.from = "lucio.zanchetta@mail.wind.it"
.FromDisplayName = "Lucio.Zanchetta"
.Recipient = "lucio.zanchetta@mail.wind.it"
.RecipientDisplayName = "Lucio.zanchetta"
.ReplyToAddress = .from
.Subject = "prova"
.Message = "pippo"
'.Attachment = "Elenco files da allegare, separati da ;"
.Send
End With


End Sub

[oregon]

Prova a chiedere al sistemista che gestisce i server della posta che fine hanno fatto i messaggi inviati dal tuo PC ...