Microsoft.AspNetCore.Mvc.Localization.LocalizedHtmlStringMyfiles.asp display options

Myfiles.asp display options

Printed from: Snitz™ Forums 2000
URL: https://forum.snitz.com/forumTopic/Posts/67172?pagenum=1
Printed on: 05 November 2025, 02:43

Topic

Author : leesh695
Subject : Myfiles.asp display options
Posted : 01 June 2008, 10:06
Message :

Hi,

Is it possible to modify the myfiles.asp file found in mikes file attachment mod.
So they you can have the option to only show files uploaded today, this week & this month?
Thanks in Advance.
- Lee<

Replies ...

Reply Author: leesh695
Replied on: 02 June 2008, 12:19
Message:

Not possible?<

Reply Author: MaD2ko0l
Replied on: 02 June 2008, 12:48
Message:

its proberly possiable, i would imaging you would just query the database for them files only, but i cannto help as i dont use mikes mod andi dont have the knowledge.<

Reply Author: leesh695
Replied on: 05 June 2008, 14:51
Message:

It looks in a folder with folders with usernames ect. I think<

Reply Author: PPSSWeb
Replied on: 05 June 2008, 16:37
Message:

In Function ScanFolders(PathSpec) you would need to check the date created for each file against the time frame you select. Something Like:

Code:

Function ScanFolders(PathSpec)
	
	Dim fs, f, Folder, fc, s, File, FileList, FolderInfo, FileName, Name
	
	response.write "<BLOCKQUOTE>"
	
	Set FolderInfo = Fso.GetFolder(PathSpec)
	Set FileList = FolderInfo.Files
	
        For Each File in FileList

        If File.DateCreated > TimeSelected  Then 'TimeSelected being today, this week, month, etc.  you would use your favorite date compare function here
           ' continue processing to output name
        Else 
           ' do nothing and continue to next file
        EndIf

Reply Author: leesh695
Replied on: 16 June 2008, 17:31
Message:

Originally posted by PPSSWeb
In Function ScanFolders(PathSpec) you would need to check the date created for each file against the time frame you select. Something Like:

Code:

Function ScanFolders(PathSpec)
	
	Dim fs, f, Folder, fc, s, File, FileList, FolderInfo, FileName, Name
	
	response.write "<BLOCKQUOTE>"
	
	Set FolderInfo = Fso.GetFolder(PathSpec)
	Set FileList = FolderInfo.Files
	
        For Each File in FileList

        If File.DateCreated > TimeSelected  Then 'TimeSelected being today, this week, month, etc.  you would use your favorite date compare function here
           ' continue processing to output name
        Else 
           ' do nothing and continue to next file
        EndIf

Would someone be able to code this for me? I would pay a little $