Kirim sepotong kode untuk ASP untuk menampilkan semua gambar dalam folder pada satu halaman, yang berguna untuk membaca gambar di bawah folder saat ini, membacanya dan mengendalikannya. Copy kode kodenya sebagai berikut:
<%
redupkan fso,objFolder,objFiles
daftar file redup
Setel fso=Server.CreateObject(scripting.FileSystemObject)
Setel objFolder=fso.GetFolder(server.MapPath(ibu jari))
Setel objFiles=objFolder.Files
'Loop untuk menampilkan nama file dari file di bawah jalur folder
Untuk setiap objFile di objFiles
Jika getExt(objFile.name)=gif atau getExt(objFile.name)=jpg atau getExt(objFile.name)=jpeg Lalu
daftar file = daftar file<img src=&objFile.name>
Akhiri Jika
Berikutnya
'Lepaskan objek
Setel objFolder=tidak ada
Tetapkan fso=tidak ada
'Dapatkan jenis file
Fungsi getExt(str)
getExt = Lcase(Kanan(str,Len(str)-InstrRev(str,.)))
Fungsi Akhir
%>
<%=daftar file%>
Berdasarkan kode di atas, pengembangan sekunder dapat dilakukan untuk membuat keributan.