[quote]
Sono andato a finire in un campo in cui ci capisco poco..
Per la registrazione mi chiede un file .ocx, che non saprei dove trovare, sempre ammesso che non sia già attivo!
Nell'elenco dei controlli ActiveX già registrati in Access, quello che si avvicina al nome "CDO", è "CDDB Control class"..
Non so proprio che fare..
Ciao
Gianluca
Ciao
Ho avuto i tuoi stessi problemi.
Non so se ormai è troppo tardi comunque potresti provare questa roba qua:
Set imsg = CreateObject("cdo.message")
Set iconf = CreateObject("cdo.configuration")
Set Flds = iconf.Fields
With Flds
.Item("
http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtp.tuoserver.it
.Item("
http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 '( o altra porta: basta controllare l'account del tuo gestore di Email)
.Item("
http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Update
End With
With imsg
Set .Configuration = iconf
.To = ""
.From = ""
.CC = "che ti pare"
.Subject = "Dai che ce la fai"
.TextBody = "Incredibile ma funziona""
.AddAttachment "ciaoMondo.txt" ' (attenzione non ti fare fregare: l'uguale dopo .AddAttachment non ci deve stare)
.Fields.Update
.Send
End With
potrebbe finire qui ma ho aggiunto questa seconda parte perché la utilizzo come una sorta di ricevuta dell'invio
With imsg
Set .Configuration = iconf
.To = ""
.From = ""
.CC = ""
.Subject = "Dai che ce la fai" & " per " & ""
.TextBody = "Ricevuta invio"
.Fields.Update
.Send
End With
Set imsg = Nothing
Set iconf = Nothing
Nostro