errore 424 newsletter

[datma]

Salve a tutti, sto provando a mattere una newsletter in asp sul mio sito, una di quelle già fatte ed in teoria pronte all'uso, ma ricevo come errore

Error Number: 424
Error Description: Object required
Source: Microsoft VBScript runtime error
LineNumber:

potete vederla su www.magnapizza.it/public/easylist.asp

mentre il pannello di controllo
www.magnapizza.it/public/easylistadmin.asp password: "password"

qui potete scaricare i file della newsletter www.magnapizza.it/news.zip

purtroppo non ho le competenze...se cortesemente potreste dirmi cosa devo modificare
Grazie Marco

[Roby_72]

Lo script usa "CDONTS.NewMail" o "JMail" per inviare.
Assicurati che quello che hai scelto sia presente sul tuo server.

Roby

[datma]

Il server è quello di aruba ed ho visto questa stessa newsletter che si trova su un'altro sito poggia sempre su un server aruba
come faccio a sapere quale script è presente sul server?

[Roby_72]

Su Aruba CDONTS non c'è più, si usa CDOSYS:
http://vademecum.aruba.it/start/cont...ulo_cdosys.asp

Roby

[datma]

purtroppo non conosco la programmazione...
Avreste tempo e voglia a fare questa modifica? sempre se è possibile...

tutti i files si trovano su
www.magnapizza.it/news.zip

la mia email è datma@tiscali.it

Grazie infinite...

[datma]

La newsletter usa questi script per l'invio dei messaggi avrei bisogno di trasformarlo in CDOSYS potete aiutarmi? GRAZIE 1000


Case "CDonts"
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = StrFrom
objCDOMail.To = stremail
objCDOMail.Subject = strSubject
If Request("emailhtml")="yes" Then
strbody=Replace(strbody, vbcrlf, "
")
objCDOMail.Body = strBody
objCDOMail.BodyFormat = 0 ' CdoBodyFormatHTML
objCDOMail.MailFormat = 0 ' CdoMailFormatMime
Else
objCDOMail.Body = strBody
End If
objCDOMail.Send
Set objCDOMail = Nothing
Case "JMail"
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.Sender = siteemail
JMail.Subject = strSubject
JMail.AddRecipient stremail
If Request("emailhtml")="yes" Then
strbody=Replace(strbody, vbcrlf, "
")
JMail.ContentType = "text/html"
End If
JMail.Body = strBody
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
if not JMail.Execute Then Response.write "Mail error: " & Jmail.log & ". Please contact the administrator of this site: " & siteemail & "
"
Set JMail=Nothing

[datma]

ho fatto qualche modifica cercando in rete ed ora non mi da più l'errore dice che l'email è stata spedita ma in realta non spedisce nulla
le modifiche che ho fatto sono qui:

www.magnapizza.it/news.rar

per favore aiutatemi non so dove sbattere la testa

[michele.santoro]

Prova ...

Case "CDonts" 
		Set objCDOMail = Server.CreateObject("CDO.Message")
		objCDOMail.From = StrFrom
		objCDOMail.To = stremail
		objCDOMail.Subject = strSubject
		If Request("emailhtml")="yes" Then
			strbody=Replace(strbody, vbcrlf, "
")
			objCDOMail.HtmlBody = strBody
			objCDOMail.HtmlBodyFormat = 0 ' CdoBodyFormatHTML
		Else
			objCDOMail.TextBody = strBody
		End If
		objCDOMail.Send
		Set objCDOMail = Nothing
	Case "JMail" 
		Set JMail = Server.CreateObject("JMail.SMTPMail")
		JMail.Sender = siteemail
		JMail.Subject = strSubject
		JMail.AddRecipient stremail 
		If Request("emailhtml")="yes" Then
			strbody=Replace(strbody, vbcrlf, "
")
			JMail.ContentType = "text/html"
		End If
		JMail.Body = strBody 
		JMail.Priority = 3 
		JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR") 
		if not JMail.Execute Then Response.write "Mail error: " & Jmail.log & ". Please contact the administrator of this site: " & siteemail & "
"
		Set JMail=Nothing

Più o meno ... prova (non ho modo di testarlo). Ho lasciato Case CDonts per non dover modificare anche la parte di setup.

[cavicchiandrea]

Ma perché non usi il servizio messo a disposizione da aruba http://vademecum.aruba.it/main/index.asp menu sinistro 1 voce "posta elettronica" sotto-menu mailinglist

[datma]

Grazie Michele funziona tutto

un dubbio:
dal momento che invio la newsletter al momento della ricezione passano anche 30 minuti questo da cosa puo dipendere?

Grazie ancora Marco