Asp formmail fejl ? Hvorfor ?

Hej jeg har en aspmail liggende her....

så folk kan maile hvem de selv vil efter de har

indtastet der egen email .....

http://www.friserverplads.dk/iceb/Simple.asp

Problemet er hver gang man sender får man denne

fejl ...

Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'Mailer.AddRecipient'

/iceb/Simple.asp, line 13

Her er scriptet.....

<%
    ' change to address of your own SMTP server
    strHost = "post.cybercity.dk"

    If Request("Send") <> "" Then
       
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
        ' enter valid SMTP host
        Mailer.RemoteHost = strHost

        Mailer.FromName = Request("From") ' From address
        Mailer.FromAddress = Request("FromName") ' optional
        Mailer.AddRecipient Request("To")


       
        ' message subject
        Mailer.Subject = Request("Subject")
        ' message body
        Mailer.BodyText = Request("Body")

        strErr = ""
        bSuccess = False
        On Error Resume Next ' catch errors
        Mailer.SendMail    ' send message
        If Err <> 0 Then ' error occurred
            strErr = Err.Description
        else
            bSuccess = True
        End If
    End If
%>

<HTML>
<HEAD>
<TITLE>AspEmail: Simple.asp</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF">

<H2>AspEmail: Simple.asp</h2>

<% If strErr <> "" Then %>
<h3><FONT COLOR="#FF0000">Error occurred: <I><% = strErr %></I></FONT></h3>
<% End If %>

<% If bSuccess Then %>
<h3><FONT COLOR="#00A000">Success! Message sent to <% = Request("To") %></FONT></h3>
<% End If %>

<FORM METHOD="POST" ACTION="Simple.asp">

<TABLE CELLSPACING=0 CELLPADDING=2 BGCOLOR="#E0E0E0">
    <TR>
        <TD>Host (change as necessary in code):</TD>
        <TD><B><% = strHost %></B></TD>
    </TR>
    <TR>
        <TD>From (enter sender's address):</TD>
        <TD><INPUT TYPE="TEXT" NAME="From"></TD>
    </TR>
    <TR>
        <TD>FromName (optional, enter sender's name):</TD>
        <TD><INPUT TYPE="TEXT" NAME="FromName"></TD>
    </TR>
    <TR>
        <TD>To: (enter one recipient's address):</TD>
        <TD><INPUT TYPE="TEXT" NAME="To"></TD>
    </TR>
    <TR>
        <TD>Subject:</TD>
        <TD><INPUT TYPE="TEXT" NAME="Subject"></TD>
    </TR>
    <TR>
        <TD>Body:</TD>
        <TD><TEXTAREA NAME="Body"></TEXTAREA></TD>
    </TR>
    <TR>
        <TD COLSPAN=2><INPUT TYPE="SUBMIT" NAME="Send" VALUE="Send Message"></TD>
    </TR>

</TABLE>

</FORM>

</BODY>
</HTML>