Problem con asp

[gracipr]

En otro tema anterior, planteaba el problema desde cero, aora la duda es menor,

tengo el siguiente codigo:

<form name="form">
<select name="menu" class="nuevaImagen" onChange ="irA(this)">
<%narch = split(narchivo,".")%>
<option value="">Nº<%=narch(0)%></option>
<%
'en este momento este for muestra los numeros de archivo k existen
For Each file2 in filecollection
ruta4 = "/" & carpetaarch & "/" & idreg & "/" & file2.name
texto = file2.name
cadena = split(texto,".")
if texto <> narchivo then
if texto <> "principal.jpg" then
'vecOcupados debe contener los valores que contiene cadena, asi el siguiente codigo
'podra extraer los que le faltan
vecOcupados=Array(2,4)
'response.write vecOcupados(0)
Max = 0
For i=0 To UBound(vecOcupados)
if vecOcupados(i) > Max Then Max = vecOcupados(i) End if
Next
'Dim vecFaltantes()
Cnt = -1
var = False
For i=1 To Max
For j=0 To UBound(vecOcupados)
var = vecOcupados(j) = i
if var Then Exit For End If
Next
If Not var Then
Cnt = Cnt + 1
Redim Preserve vecFaltantes(Cnt)
vecFaltantes(Cnt) = i
End If
Next
For j=LBound(vecFaltantes) To UBound(vecFaltantes)%>
<option value="imagenes_formobras.asp?num=<%=idreg%>&a=<%= narchivo%>&num1=<%=vecFaltantes(j)%>"><%=vecFaltan tes(j)%></option>
<% next
end if
end if
Next%>
</select>
</form>


el problema en este caso, y ya fui comentandolo, es que lo ay en cadena, es lo que le tengo que pasar a vecOcupados, pero siempre, me da fallo a ver si alguien me puede decir como hacerlo

gracias