Felj i send !!

Jeg er ved at lave et nyhedsbrev, der skal sendes ud til de tilmældte!

Men jeg får en fejl jeg ikke kan gannemskuge, er der nogle der kan?

Fejlkoden er:

Serverobjekt fejl 'ASP 0177 : 800401f3'

Server.CreateObject blev ikke udført

filer/nyhedsbrev/SpawnedMailerSend.asp, linje 13


Scriptet er:

<%
Dim mFrom,mTo,mSubject,mbcc,mBody,mArchive
mFrom = Request.Form("myemail")
mSubject = Request.Form("subject")
mbcc = Request.Form("users")
mBody = Request.Form("body")
mArchive = Request.Form("archive")

response.write("Emailen er blevet sendt til:<br><br>" & mbcc )

Dim eCDO
Set eCDO = Server.CreateObject("CDONTS.NewMail")

eCDO.To = zEmail
eCDO.From = mFrom
eCDO.Subject = mSubject
eCDO.Body = mBody
eCDO.Send

Set eCDO = Nothing

if mArchive = "1" then

set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("../../db/SpawnedMailer.mdb"))

ArchiveSQL = "INSERT into Archive (ArchiveSubject,ArchiveBody) VALUES ('" & mSubject & "','" & mBody & "');"
conn.Execute ArchiveSQL
response.write("<br><br><br>Posten er leveret!<br><br>")

conn.close

end if

response.write("<br><br><br><center><a href='AdminIndex.asp'>ADMIN HOME</a><center>")

%>