Nogen der kan finde ud af denne her Fejl???

har et problem med denne funktion... det er at hver gang jeg skriver encode("etellerandet") laver den denne fejl..

Der opstod en Microsoft VBScript-kørselsfejl fejl '800a000d'

Typerne passer ikke sammen: 'encode'

/test.asp, linje 4

Kan ikke forstå fejlmeldingen og ville godt have lidt hjælp... jer er lidt af den ASP side jeg skal have sat det ind i...

<!-- #include file="NavnpåenASPfilsomfunktionenencodeliggeri" -->
<%

name    = Session("Name")
ID      = Session("ID")
ID      = encode(ID)

mode = Request("Mode")

if mode = "go" then
%>

winopen("IDencode")

<% Respone.Redirect "Profil.asp?b="& IDencode &"" %>
<% Else %>

Jeg kan ikke finde fejlen... er der nogen der kan hjælpe???... her er funktionene

<script language="JavaScript" >
<!--
function encode(strToEnc) {
    var encodedStr = ''
    adder = Math.round(Math.random()*89 + 10)
    for (var i = 0; i <= strToEnc.length; i++)
    {
        for (var o = 0; o <= digitLength; o++)
        {
            if (charArray.substring(o, o + 1) == strToEnc.substring(i, i + 1))
            {
                p = 10000 + (adder * 2 * i) + (2 * digitLength * o) + ((i^2) + 1 * adder)
                encodedStr += p; // Add encrypted part of string
            }
        }
   
    }
    encodedStr += adder

    return encodedStr
}
//-->
</script>