dunque ho fatto accussì:

codice:
do while not rs.EOF
arrai=arrai&","&rs("store")&".txt" 
rs.movenext
loop
vs=split(arrai,",")
for i=1 to ubound(vs)
response.write vs(i)
response.Write("
")
next

'e

For Each strFile in objFiles
arrai2=arrai2&","&strFile
Response.Write(strFile.name & "
") 
Next
è giusto?? :master: