Sistema de Archivos

[tomchat]

Hola monkyta, probe el coidgo que me diste pero no digo ningun resultado.

Tengo algunas dudas no se si podras aclararmelas:

filename se refiere al nombre del archivo, de esa manera va en la consulta. y al momento de recoger el valor.

catnum..SCOPE, Ok catnum es mi catalogo, pero a que te refieres con ...Scope.

Despues generas un ciclo repetitivo con la variabke(RS) que toma el valor de la consulta.

Dices que proxy sea igual al campo filename '

Gracias por tu tiempo.

dim i,categ,chkk,cope,j
set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionString = "provider=msidxs;"
conn.Open
SQL = "SELECT filename from tucatalogovaaca..SCOPE(' SHALLOW TRAVERSAL OF ""/" & """') where size=0 "
set RS = conn.execute(SQL)
categoria=""
do while Not RS.EOF
proy = rs("filename")
if proy = "img" or proy = "home" or proy = "admin" or proy = "css" then
rs.movenext
else
categoria= categoria & proy
rs.movenext
if not rs.eof then
categoria= categoria & ","
end if
end if
loop