PROBLEMA URGENTE CON ARUBA E CDONT

[licantropo]

Ho un problema con la newsletter del mio sito.
Ho spostato tutto su aruba, ma scopro solo ora che non supporta CDONTS (o meglio così mi hanno detto). Fatto sta che come provo ad inviare questa newsletter compare questo messaggio di errore:

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/amministrazione/newsletter.asp, line 18

800401f3

Ho usato questo nell'ASP:

Set objCDOMail = Server.CreateObject("CDONTS.Newmail")

objCDOMail.From = MAIL_FROM

'objCDOMail.To = mailTo
objCDOMail.bcc = mailTo

objCDOMail.Subject = oggetto

objCDOMail.BodyFormat = 0

objCDOMail.Body = mail

objCDOMail.Importance = priorita

objCDOMail.Send

set objCDOMail = nothing

Potete aiutarmi?
Grazie mille

[Roby_72]

Sei un altro sistema operativo, Windows Server 2003.
Non puoi usare CDONTS ma CDOSYS. Da un'occhiata alla discussione in rilievo nel forum su Windows Server 2003.

Roby

[kluster]

1) usa CDOSYS su ARUBA:
tutorial
http://forum.imente.org/for_post_list.asp?topic=478
2) potresti usare la mia classe (almeno me la testi )
http://forum.imente.org/for_post_list.asp?topic=3048

[weppos]

Originariamente inviato da kluster
2) potresti usare la mia classe (almeno me la testi )
http://forum.imente.org/for_post_list.asp?topic=3048

azz, mi hai anticipato!

[kluster]

stavi scrivendo una classe simile? hai il source? magari ci pesco info utili per migliorare la mia

[weppos]

Originariamente inviato da kluster
stavi scrivendo una classe simile? hai il source? magari ci pesco info utili per migliorare la mia

Sì, la stavo scrivendo per ASG (ne parlai anche con imente per lasciargliela poi).

Per ora stavo creando le singole funzioni per gli oggetti email e poi avrei creato lo scheletro della clasee.

[kluster]

Che ne pensi della struttura della classe?
Te lo domando perchè anch'io avevo pensato a dei select case o flag che switchassero tra com a com poi sono arrivato alla soluzione di lasciare le implementazioni fuori con un file xml.

Il fatto che i comandi vengano parsati dall'xml permette di lasciare la struttura dei metodi della classe sempre uguale e implementare i com via comandi nei nodi

<component classid="CDonts.newMail">
 <mailfrom><![CDATA[ .from="$mailfrom$" ]]></mailfrom>  
 ......
</component>
<component classid="mycomponent.mymailer">
 <mailfrom><![CDATA[ if .version="1" then .fromMail="$from$" else .from="$mailfrom$" ]]></mailfrom>  
 ......
</component>

quindi il metodo
mailfrom ="pippo@pluto"
chiamera' con il select node
.from = "$from$"
sostituisce il valore con il parametro e lancia l'esecuzione

cosa ne pensi?

[weppos]

Gli darò uno sguardo.
A dire il vero, pensavo di usare un solo file creando 1 funzione per ogni oggetto.

In seguito, creavo la classe e gli passavo i dati della mail richimando la funzione in base all'oggetto.

[kluster]

si corretto anche questo, c'è meno margine di errore dato che l'xml è dato in pasto all'utente ma mi piace di + nell'ottica del riutilizzo, se aggiungi un oggetto devi entrare nella classe e aggiungere codice proprio dell'oggetto aggiunto.

Vabbe, nella classe cmq (per ora) ho previsto l'escamotage dell'oggetto pubblico (ma non pubblicizzato) objMail che contiene il com istallato quindi facendo

set pippo= new safemailer
if pippo.CreateObjIfExists("Cdo.Message") then
   ' da qui sai che sei in CDOSYS
   'qui hai l'oggetto a disposizione con tutti i metodi 
   'ed il programmatore lo comanda direttamente
   with pippo.objMail 
   end with
end if

altrimenti ti affidi ai metodi di porting dell'xml