error '800a0009' Subscript out of range: 'keyAry'

[Marnie101]

I have an include file that runs on EVERY page. This includes an array called keyList() and then one called keyAry(). I am only getting this error with ONE page so that is why I can't figure it out. Why only the one page and not all? Can anyone help?
The following is a sample of the arrays....
dim keyList(22)
keyList(0) = 3
keyList(1) = 4
keyList(2) = 21
keyList(3) = 7
keyList(4) = 8
etc......
keyList(22) = -98
session("keyList&quot = keyList

if not vartype(keyAry) and 8192 then
dim keyCountHF
dim z
keyCountHF = ubound(keylist)
redim keyAry(keyCountHF)

for z = 0 to keyCountHF
keyAry (z) = false
next
end if

 

[Marnie101]

Nevermind everyone I figured it out!! Sometimes I'm such a dolt. I was dimensioning the array on another include file that this particular page wasn't using...haha. I've got it straightened out now. Must be too early.