CDONTS mail

Heysa jeg skal lave en CDONTS sender, da B-one ikke understøtter jMail som jeg normalt bruger.

Jeg får denne fejl:

CDONTS.NewMail.1 error '80020009'

Unable to connect to server

/oves/sendtilbud.asp, line 42


Min kode ser sådan her ud:

n = request.form("n")
a = request.form("a")
p = request.form("p")
b = request.form("b")
e = request.form("e")
t = request.form("t")
f = request.form("f")
til = request.form("til")
fra = request.form("fra")
fd = request.form("fradato")
hd = request.form("hjem")
antal = request.form("antal")
andet = request.form("andet")
firma = request.form("firma")

if request.form("handi") = "ON" then
handi = "Ja"
else
handi = "Nej"
end if

email = "u_zetn@hotmail.com"

emne = "Tilbuds bestilling"

text = "<font face='Tahoma' size='2'><b>Tilbudsbestilling</b><br><br>Bestillingsdato: " & now & "<br><br>Navn: " & n & "<br>Firmanavn: " & firma & "<br>Adresse: " & a & "<br>Postnr: " & p & "&nbsp;&nbsp;&nbsp;By: " & b & "<br>Email: " & e & "<br>Telefon: " & t & "<br>Fax: " & f & "<br><br><b>Kørsel</b><br>Til: " & til & "<br>Fra: " & fra & "<br>Afrejsedato: " & fd & "<br>Hjemkomstdato: " & hd & "<br><br><b>Medrejsende</b><br>Antal: " & antal & "<br>Gamle: " & gamle & "<br>Handicappede: " & handi & "<br>Småbørn: " & kids & "<br><br><b>Beskriv rejsen</b><br>" & andet & ""


        ' importance = 0        ' lav
        importance = 1        ' normal
        ' importance = 2        ' høj
   
Dim objMail, text
Set objMAil = server.CreateObject("CDONTS.newmail")
text = text
objmail.from = "mig"
objmail.to = email
objmail.subject = emne
objMail.body = text
objmail.send


set objmail = Nothing

Nogen der kan hjælpe??


Med venlig hilsen
Jacob Wulff