Mail con cdosys

[Daisyland]

Invio una mail con Cdosys con il codice sotto.
L'ho preso on line, lancio il file con questo codice (ovviamente con gli indirizzi mail diversi), non dà nessun tipo di errore, come se tutto funzionasse.
Però la mail non viene inviata e non va a destinazione.

<%
Dim Destinatario, Mittente, Oggetto, Testo
Destinatario = "destinatario@dominio.it"
Mittente = "mittente@dominio.it"
Oggetto = "Oggetto della mail..."
Testo = "Testo della mail..."
Dim eMail
Set eMail = CreateObject("CDO.Message")

eMail.From = Mittente
eMail.To = Destinatario
eMail.Subject = Oggetto

eMail.TextBody = Testo

eMail.Fields("urn:schemas:httpmail:importance").Value = 2
eMail.Fields.Update()

eMail.Send()

Set eMail = Nothing
%>

[Daisyland]

Nessuno sa rispondere ?

[Vincent.Zeno]

il codice scritto è tutto?

hai invocato le librerie secondo le direttive microsoft?
hai invocato il server (verosimilmente smtp)?

[Daisyland]

il codice scritto è tutto?

hai invocato le librerie secondo le direttive microsoft?
hai invocato il server (verosimilmente smtp)?

In effetti era incompleta.
E' che con esempi tipo questo

http://it.aspmine.com//asp/scripts/e...oggetto-cdosys

specificando i parametri corretti, o con esempi simili, quando chiama Send per inviare la mail
mi dà l'errore:

Impossibile modificare o eliminare un oggetto che è stato aggiunto utilizzando COM+ Admin SDK

[Vincent.Zeno]

credo sia il caso che tu fornisca il codice completo da te utilizzato

[Daisyland]

credo sia il caso che tu fornisca il codice completo da te utilizzato

Questo è un esempio

<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D" NAME="CDO for Windows 2000 Type Library" -->
<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library" -->
<%

DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")

Set iConf = CreateObject("CDO.Configuration")

Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort

Flds(cdoSMTPServer) = "nome server smtp" 

Flds(cdoSMTPServerPort) = 25

Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0

Flds.Update

With iMsg
   Set .Configuration = iConf
   .To = "mail destinatario"
   .From = "mail mittente"
   .Send
End With

Qui mancano messaggio, oggetto, ma tutto lo prendo poi da una pagina di form, compreso indirizzo mittente e destinatarrio.
E' solo per capire che cosa manca qui

[Daisyland]

E' tutto a posto così, nel dominio, con l'smtp corretto funziona, i problemi sono in locale.

[cavicchiandrea]

E' tutto a posto così, nel dominio, con l'smtp corretto funziona, i problemi sono in locale.

Chiaramente in locale* hai installato sia l'oggetto CDO che le librerie giusto, tutto questo nel pc dove hai installato/attivo
IIS?

*che motivo hai di eseguire tale operazione in locale (cioè offline) quando la mail viene invia comunque online (in presenza di una connessione internet)

[Daisyland]

Chiaramente in locale* hai installato sia l'oggetto CDO che le librerie giusto, tutto questo nel pc dove hai installato/attivo
IIS?

*che motivo hai di eseguire tale operazione in locale (cioè offline) quando la mail viene invia comunque online (in presenza di una connessione internet)

Forse era sbagliato l'smtp utilizzato per i test in locale.
Appena ho utilizzato un dominio settando l'smtp corretto per quel dominio tutto a posto.