ASP - Que tengo mal??

tengo este codigo :

Redim Preserve vector (1 to i)

y me lanza el siguiente error:

Tipo de error:
Error de compilación de Microsoft VBScript (0x800A03EE)
Se esperaba ')'
/sitio_asp/resultado.asp, línea 97, columna 25

a que se puede deber, la linea 97 es la que escribi arriba.

todo lo hago convbscript

de ante mano gracias

Quiza no sea exactamente en esa linea, quiza sea antes o alrededor de esa línea... a mi me ha pasado algo parecido y resulta que el error no era alli sino es alguna otra parte =S

Debería ser Redim Preserve(i) si la nueva longitud máxima va a ser i
Salu2

gracias atodos ya arregle el problema solo cree un select count(x) as total y el valor que me dio lo guarde en la variable i :

i=rs2("total")
redim vector(i)
rs.movefirst
i=0
while (not rs.Eof)
vector(i)=rs("desc_motivo")

.........................................
.........................................
.........................................
.........................................
..................................................................................
.........................................
.........................................

rs.MoveNext
i=i+1

wend