Send a piece of code for ASP to display all the pictures in the folder on a single page, which is helpful for reading the pictures under the current folder, reading them and controlling them. Copy the code code as follows:
<%
dim fso,objFolder,objFiles
dim filelist
Set fso=Server.CreateObject(scripting.FileSystemObject)
Set objFolder=fso.GetFolder(server.MapPath(thumbs))
Set objFiles=objFolder.Files
'Loop to output the file names of files under the folder path
For each objFile in objFiles
If getExt(objFile.name)=gif or getExt(objFile.name)=jpg or getExt(objFile.name)=jpeg Then
filelist = filelist<img src=&objFile.name>
End If
Next
'Release object
Set objFolder=nothing
Set fso=nothing
'Get file type
Function getExt(str)
getExt = Lcase(Right(str,Len(str)-InstrRev(str,.)))
End Function
%>
<%=filelist%>
Based on the above code, secondary development can be done to make a fuss.