Vista - Paginate results of an FSO file list

Hi,

I'm using vbscript to display a list of images in a folder. Is it
possible to paginate the results, so that if there are over 50 images
in a folder, I can limit the amount of images shown?

Thanks in advance,

i11

"i11usive" <i11usive007@xxxxxx> wrote in message
news:6bc9e15b-30f4-4f46-96b1-77d001cae03c@xxxxxxProbably but we'd need to see some of your code to advise you on how to do
it?
You would also do well to explain how it is you are displaying it, in a
browser? is it a HTA or is this ASP?


--
Anthony Jones - MVP ASP/ASP.NET

As Anthony Jones said, you didn't post enough
information for anyone to offer a specific answer.
Presumably you've got a collection of file names.
A FSO Folder Files collection? Or maybe a
Shell.Application ShellFolder Items collection?
Assuming that you're looping through a collection
with For Each you can add a counter:

Set oFolder = FSO.GetFolder(path)
Set oFiles = oFolder.Files
iCount = 0
For Each oFile in oFiles
If ucase(Right(oFile.Name, 3)) = "JPG" then
'-- code here to add image to display
iCount = iCount + 1
End If
if iCount = 50 then Exit For
Next

"mayayana" <mayaXXyana@xxxxxx> wrote in message
news:OmCII33BJHA.3512@xxxxxxThat works for a 'First 50 of' solution but to paginate a solution for 'get
me the next 50' is also needed.

If the display is simply dumping a file list to the console then the above
could be adapted so that the code remains within a single enumeration of
Files. However, if the code is in a HTA displaying as HTML then the
procedure would need to exit and then we'd need a way to start another
enumeration 50 files in.


--
Anthony Jones - MVP ASP/ASP.NET