JMail sender ikke mail

Hvorfor virker den her ikke:

<%
    Randomize
    pass = Int(((999 - 100) + 1) * Rnd + 100)
    pass = pass & chr(Int(((122 - 97) + 1) * Rnd + 97))
    pass = pass & chr(Int(((122 - 97) + 1) * Rnd + 97))
    pass = pass & chr(Int(((122 - 97) + 1) * Rnd + 97))
    pass = pass & chr(Int(((122 - 97) + 1) * Rnd + 97))
    pass = pass & Int(((999 - 100) + 1) * Rnd + 100)

    Set JMail = Server.CreateObject("JMail.SMTPMail")
    JMail.ServerAddress = "smtp.cliche.dk"
    JMail.Sender = "Robot@TheCSZone.dk"
    JMail.SenderName = "TheCSZone"
    JMail.Subject = "Glemt password"
    JMail.AddRecipient "jem@e-mail.dk"
 
    JMail.Body = "Brugernavn: Ducks"& vbCrLf & "Password: "& pass & vbCrLf & vbCrLf & "Bemærk at dit password er blevet ændret, og for at få dit gamle tilbage, skal du rette det i din profil, ved at bruge dette."& vbCrLf &"Dette sker for at andre ikke skal kunne få oplyst dit hemmelige password, ved forkert indtastning af e-mail."& vbCrLf & vbCrLf &"Mvh TheCSZone"
    JMail.Execute
 
    Set JMail = Nothing
%>

Når den her virker:

<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "smtp.cliche.dk"
JMail.Sender = "lala@test.dk"
jmail.sendername = "lala"
jmail.addrecipient "jem@e-mail.dk"

JMail.Subject = "lala"
JMail.Body = "lala"
JMail.Execute
Set JMail = Nothing
%>

----
Hvad gør jeg galt?