Server.CreateObject Failed

[Okocha]

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/newsletter/subscribeNewsletter.asp, line 41

800401f3


ho scaricato lo script asp "mynewsletter" ho seguito le istruzioni e l'ho installato.
Quando però inserisco un indirizzo mail mi da l'errore di cui sopra.

il codice è:

set newMailObj = server.createObject("CDONTS.NewMail")
newMailObj.BodyFormat = 1
newMailObj.MailFormat = 0

dove la riga i rosso è quella che da l'errore.

Qual'è il problema?

[Roby_72]

Forse è la riga prima che ti da errore...
Comunque vuol dire che l'oggetto non è installato sul server e devi usarne un altro per inviare le email, ad esempio CDOSYS.

Roby

[Okocha]

immaginavo. ho risolto grazie anche ad alcune discussioni che prima non avevo trovato.

GRAZIE.

[Okocha]

Visto che ad oggi mi sono di nuovo trovato davanti al problema scrivo, sperando che sia utile a qualcuno, quanto c'è da modificare.

Lo script in questione è in cdonts ma se lo usate su aruba avrete bisogno di cdosys.

Per trasformarlo è sufficiente andare qui:
http://vademecum.aruba.it/start/cont...ulo_cdosys.asp

a fondo pagina.


Inserisco anche le pagine ed il codice da modificare.

Le pagine sono due:

sendNewsletter.asp
subscribeNewsletter.asp

sono pochi parametri da cambiare.
Trovare nelle suddette pagine il codice che va da - a

'Process mail sending using local SMTP server
...
...
...
set newMailObj = nothing

e sostituitelo interamente con questo:

'Process mail sending using local SMTP server
		set newMailObj =  server.createObject("CDO.Message")
	
		newMailObj.from = postmasterEmail
		newMailObj.to = rs("Email")
		newMailObj.subject = Subject
		newMailObj.TextBody = Message & vbCrLf & "To remove yourself off our mailing list, please visit " & vbCrLf & "http://"&DomainName&"/newsletter/remove.asp?email="&rs("Email")
		newMailObj.Fields("urn:schemas:httpmail:importance").Value = 2
		newMailObj.Fields.Update()
		newMailObj.send()
		set newMailObj = nothing

sperando che le mie ricerche e fatiche, visto che non so nulla di asp, servano a qualcunaltro.