ActiveX-komponenten kan ikke oprette objektet: 'CreateObject'

hvis der er nogen der har glem et password, kan man få det tilsendt, ligesom på eksperten.
Men jeg får følgende fejl; ActiveX-komponenten kan ikke oprette objektet: 'CreateObject'
Hvorfor????

Her er noget af min kode.
    Set objMail = CreateObject("CDONTS.Newmail")
       
        objMail.Mailformat = cdoMailFormatMIME
        objMail.BodyFormat = CdoBodyFormatHTML
        objMail.From = "bla@bla.dk"
        objMail.To = strModtager
        objMail.Subject = "Your password"
        objMail.body = strbody
        objMail.Send
        Set objMail = Nothing
        Response.Redirect "bekraeft.htm"
       
    Else
    Response.Redirect "forkertEmail.htm"
    End if