Hjælp til loginsys. Mail

Hej Igen... :-)
Jeg har nu et community hvor det "hele" virker meget godt men.... Når en bruger har oprettet sig som bruger vil jeg gerne have en mail men det synes jeg ikke rigtig virker... henviser til http://eksperten.dk/spm/483328 Der skulle stå det hele men jeg bliver ved med at få fejl?? er der en som lige vil hjælpe mig med at få det til at køre??

<%
Response.Buffer = True

mode = Request.QueryString("mode")


'Åbner connection til databasen
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("community.mdb")
Response.Buffer = True

mode = Request.QueryString("mode")
if mode = "opret" then
    Sql = "Insert Into Bruger (brugerNavn, brugerKode, brugerAlder, brugerEmail, brugerHjemmeside, brugerIcq, brugerTekst) Values ("
    Sql = Sql & " '"&Request.form("brugernavn")&"', "
    Sql = Sql & " '"&Request.form("adgangskode")&"', "
    Sql = Sql & " '"&Request.form("alder")&"', "
    Sql = Sql & " '"&Request.form("email")&"', "
    Sql = Sql & " '"&Request.form("hjemmeside")&"', "
    Sql = Sql & " '"&Request.form("icq")&"', "
    Sql = Sql & " '"&Request.form("fri_tekst")&"')"
    Conn.Execute(Sql)

      'sæt parametre til at sende mail
    strTo = "eaogkim@stofanet.dk"
    strFrom = "Community"
    strSubject = "New User Added"
    strBody = "Ny bruger på babynet<br><br>"
    strbody = strbody & "Brugernavn : " & request.form("brugernavn") & "<br>"
    strbody= strbody & "Email : " & request.form("email") & "<br>"
    strbody= strbody & "adgangskode : " & request.form("brugerkode")
    strMailServer = "127.0.0.1"


    sendEmail strTo, strFrom, strSubject, strBody, strMailserver

end if

%>
"jeg er kommet her til men det virker ikke den skriver--->  Microsoft VBScript runtime error '800a000d'

Type mismatch: 'sendEmail'

/babynet/community.asp, line 35