Here you go...
This should be what you are looking for.
Use this code on the the file to which the form submits, in your case it is "searchresult.asp"
txtSearch = Request.Form("TextToSearch")
Dim fs, f, f1, fc, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec) 'folderspec=Folder Path, where files reside.
Set fc = f.Files
For Each f1 in fc
If InStr(1,f1.name,txtSearch) = 1 then
Response.write f1.name & "<br>"
InStr function returns the position of the txtSearch found in f1.Name(which is file name), as if that is found at 1(starting position of a filename), then you should display it. Check for documentation on InStr and InStrRev functions for more details.
Here is a link to that - The InStr Function
Also one thing to remember, don't post the same topic again and again in same thread or different thread, that would confuse the readers, without knowing which thread was closed or left unattended. Here is the link to the other thread you posted on same topic. FSO
, I would suggest you better delete that thread mentioned in the link above.
Hope that helps.
- Vijay G
Strive for Perfection