errore 424 da cdonts a cdosys

[datma]

Salve a tutti, sono nuovo del forum ed ho un problema con una newsletter, questa usa cdonts o jmail mentre il server (aruba) usa cdosys
credo che la parte da modificare sia questa:

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, "&nbsp;<br>")
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, "&nbsp;<br>")
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 "<b>Mail error: " & Jmail.log & ". Please contact the administrator of this site: <a href=""mailto:" & siteemail & """>" & siteemail & "</a></b><br>"
Set JMail=Nothing



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