Send mail-script fejl

Hej jeg får følgende fejl:

503 must have sender and recipient first


når jeg køre denne kode:

<%
Dim Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

' Her sættes modtager navn og e-mail adresse
Mailer.AddRecipient "os.dk", "os@hotmail.com"

' Her sættes afsender navn og e-mail adresse
Mailer.FromName  = request.form("navn")
Mailer.FromAddress = request.form("mail")

' Afsenders mailserver
Mailer.RemoteHost = "minmailserver.dk"

' Her sættes overskriften på mailen
Mailer.Subject    = request.form("emne")

' Her sættes selve teksten til mailen
Mailer.BodyText  = "mail fra os" & VbCrLf & request.form("kommentar")

' Send e-mail og skriv status
if Mailer.SendMail then
  Response.Write "Mailen er afsendt..."
else
  Response.Write "Der skete en fejl: " & Mailer.Response
end if

' Fjern objekt igen
Set Mailer = Nothing
%>

Hvad er der galt?