Meget mærkelig fejl

Hvordan kan det være at dette ikke virker??
-------
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")'70
Do While Not Record2.EOF
Mailer.AddBCC "NameLess", Record2.fields("mail")Record2.MoveNext
Loop
Mailer.Subject    = "LFS: " & Request("Head")'75
Mailer.BodyText  = rbody
Mailer.FromName  = "AutoSender"
Mailer.FromAddress= "robot@tigerwebdesign.dk"
Mailer.RemoteHost = "mail.tigerwebdesign.dk"
if Mailer.SendMail then '80
  Response.Write "Mail sent..."
else
  Response.Write "Mail send failure. Error was " & Mailer.Response
end if ' 85
--------------
Fejlen er :"Server.CreateObject blev ikke udført, linie 70"