Fuctions og return

Hej

Jeg har denne funktion som ligger i filen validateUP.asp:

Function validateUP(newUsername, newPassword, newPasswordConfirmed, numberOfMinCharacter)

Dim strNewUsername
Dim strNewPassword
Dim strConfirmNewPassword
Dim intNumberOfMinCharacter
Dim intIsThere
Dim intErrorNumber

strNewUsername = Trim(Replace(newUsername,"'",""))
strNewPassword = Trim(Replace(newPassword,"'",""))
strNewPasswordConfirmed = Trim(Replace(newPasswordConfirmed,"'",""))
intNumerIfMinCharacter = numberOfMinCharacter
intIsThere = 0
intErrorNumber = 0

strSQL = "SELECT COUNT(brugernavn) AS isthere FROM spillere WHERE brugernavn = '"& strNewUsername &"'"
set rs = conn.execute(strSQL)
       
if rs("isthere") > 0 then
    intIsThere = 1
end if

rs.close
set rs = Nothing

       
if strNewUsername = "" OR strNewPassword = "" OR strNewPasswordConfirmed = "" then
    intErrorNumber = 1
elseif intIsThere > 0 then
    intErrorNumber = 2
elseif strNewPassword <> strNewPasswordConfirmed then
    intErrorNumber = 3
elseif Len(strNewUsername) < 4 then
    intErrorNumber = 4
elseif Len(strNewPassword) < 4 then
    intErrorNumber = 5
else
    intErrorNumber = 0
end if

return intErrorNumber   

End Function

som jeg kalder således:

<!--#incluse file="login/validateUP.asp"-->

*<% intErrorNumber  = validateUP(request.form("newusername"), request.form("newPassword"), request.form("newPasswordConfirmed"), 4)

if CInt(intErrorNumber) = 0 then
  response.write "der var ingen fejl"
else
  response.write "Der opstod en fejl - nr. " & intErrorNumber

end if

Hvad er der galt....

jeg får en type mismatch på linien markeret med * - kan en funktion ikke returnere et tal eller er den begrænset til booleans? Endvidere får jeg en fejl omkring at jeg ikke må anvende parateser når jeg kalder en sub - hvad er det for noget... har det noget at sige at jeg includer filen?

/kovalt