i've got folder with lots of images on it,
what i would like to do is trying to seach the specific image filename
using ( FileSystemObject ) & textbox
i've got this code that can search the files in folder bringing full list of file.
Expand|Select|Wrap|Line Numbers
- set FileSysObj=CreateObject("Scripting.FileSystemObject")
- strFileAndPath = request.servervariables("SCRIPT_NAME")
- strPathOnly = Mid(strFileAndPath,1 ,InStrRev(strFileAndPath, "/"))
- strFullPath = server.mappath(strPathOnly)
- set fldr=FileSysObj.GetFolder(strFullPath)
- set FileList = fldr.Files
- For Each FileIndex in FileList
- 'This bit excludes this page (and other asp files) from the list of links
- if Lcase(right(FileIndex.Name, 4)) <> ".ini" then
- Response.Write("<A HREF='" & FileIndex.name & "'>" & FileIndex.name & "</A><BR>")
- end if
- Next