ASP Search Page (VBScript)

[John K.]

Hi!

Im letting people search my website. To do this, they type a word in
"txtSearch", which passes it´s value on to "sresult.asp".
Im using the following code in "sresult.asp":

<%
dim Sida()
dim iCount
dim objcls
dim lRet
dim sText
sText = request.querystring("txtSearch")
Set objcls = server.CreateObject("frnucls.functions")
lRet = objcls.sokeftertext("\", sText, cint(icount), Sida()) '<-- Error
occurs on this line
redim sida(0)
set objcls = nothing
response.write icount
%>

(Note: frnucls.functions is a class I've created which does the actual
searching)

But I get this error: "Subscript out of range"

Please help.