2 svar · 212 visningar · startad av JAreMANNEN
hallu! :)
Har en mapp som innehåller en massa undermappar med datumnamngivning..
2003-10-14
2003-02-27
2003-06-28
2003-08-29
osv...
Jag vill hämta ut alla filer i den mappen som ligger _NÄRMAST_ dagens datum (alltid bakifrån). Går det?
Det jag behöver hjälp med är altså att få ut rätt mapp, hämta filer är inga problem...
Tack på förhand!
En idé är att loopa från dagens datum och bakåt och använda "FolderExists".
Tänkte inte på Skarres sätt. Den här koden kanske är like "klumpigare" än den skulle vara om man skulle ha gjort som Skarre sa, men den får duga. :)
<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(Server.MapPath("."))
For Each Mapp In objFolder.SubFolders
strMapp = CDate(Mapp.Name)
If Abs(DateDiff("d", strMapp, Date())) < intDate OR intDate = "" Then
intDate = Abs(DateDiff("d", strMapp, Date()))
strFolder = Mapp.Name
End If
Next
Set objFolder = objFSO.GetFolder(Server.MapPath(strFolder))
For Each Fil In objFolder.Files
Response.Write(Fil.Name & "<br>")
Next
Set objFolder = Nothing : Set objFSO = Nothing
%>