Ciao a tutti, vorrei un Vs. aiuto, utilizzando questo script:
codice:
<% 

Dim objFso, objFolder, objFiles
Dim strFolder, strFile, strPath, strExt

strPath = "PhotoGallery/PhotoGallery/" & request.form("SubFolders") &"" & request.querystring("SubFolders") &"" 
strExt = ".jpg"

Set objFso = Server.createObject("Scripting.FileSystemObject") 
Set objFolder = objFso.GetFolder(Server.MapPath(strPath)) 
Set objFiles = objFolder.Files 

for each strFile in objFiles 

if Right(strFile.name, Len(strExt)) = strExt then 

    %>
	<%  
else
end if
Next	

Set objFso = Nothing 
Set objFolder = Nothing
Set objFiles = Nothing 

%>
Mi elenca tutti i file jpg presenti su una cartella sul server, ma non mi elenca i file JPG cioè estensione scritta maiuscola, vorrei che mi elencasse i file scritti sia con estensione maiuscola che minuscola, come posso fare?
Grazie
G.