per cercare i file usrò questo

<%

' Dichiara le variabili necessarie
Dim objFso, objFolder, objFiles
Dim strFolder, strFile, strPath, strExt
' Definisci il percorso della cartella da leggere
strPath = "cartella/"
strExt = ".jpg"

' Crea gli oggetti FSO necessari
Set objFso = Server.createObject("Scripting.FileSystemObject")
Set objFolder = objFso.GetFolder(Server.MapPath(strPath))
Set objFiles = objFolder.Files

' Scorri tutti i file nella cartella
for each strFile in objFiles
' Controlla l'estensione
if Right(strFile.name, Len(strExt)) = strExt then
Response.Write(strFile.name) & "
"
end if
next
' Distruggi oggetti e libera risorse
Set objFso = Nothing
Set objFolder = Nothing
Set objFiles = Nothing

%>


e poi come faccio a mettere i file nello script js per fare lo slideshow?