Ciao a tutti,
sto realizzando un'applicazione in asp che deve visualizzare il contenuto di una cartella posta su un server in rete... ho questo codice...
La pagina non mi genera alcun errore però continua a caricare finchè il server non manda in timeout lo script... qualcuno ha un'idea di dove si trovi l'errore?codice:<% ' Dichiaro le variabili Dim objFso, objFolder, objFiles, objStartFolder Dim strFolder, strFile, strPath, strExt strExt = Session("ord") ' Creo gli oggetti FSO utili alla connessione Set objFso = Server.createObject("Scripting.FileSystemObject") objStartFolder = "\\srvfps00\AdaImg\" Set objFolder = objFso.GetFolder(objStartFolder) Set objFiles = objFolder.Files ' Per ogni file della cartella for each strFile in objFiles ' Controllo che i primi caratteri del nome del file siano gli stessi dell'ordine if Left(strFile.name, Len(strExt)) = strExt then %> <% Response.Write(strFile.name) & " " end if next %>
Grazie in anticipo

Rispondi quotando
