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...
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
%>
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?
Grazie in anticipo