jmail fejl, melder false

Hvad er der galt med denne
<%
function lavPassword(antal)
  tilladtkarakter = "abcdefghijklmnopqrstuvwxyz1234567890"
  str = ""
  for i = 1 to antal
    randomize
    index = Int(rnd * len(tilladtkarakter))+1
    str = str & Mid(tilladtkarakter,index,1)
  next
  lavPassword = str
end function
%>
<%If request.form("B1") <> "" Then
set JMail = server.createobject("JMail.SMTPMail")
JMail.sender = "mark.mikkelsen@mail.dk"
JMail.SenderName = "Validering"
JMail.subject = "Valideringskode"
JMail.AddRecipient request.form("email")
JMail.ContentType = "text/plain"
JMail.body = "Din valideringskode er: "  & lavPassword(4) & VbCrLf & "Besøg: http://xxx.dk/fil.asp?mail="&request.form("email")&kode=lavPassword(4) &"for at validere din mail"
JMail.priority = 1
JMail.ServerAddress = "mail.dk"
JMail.execute
JMail.close()
end if
%>