/
Forside
/
Teknologi
/
Udvikling
/
ASP
/
Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
ASP
#
Navn
Point
1
smorch
9259
2
Harlekin
1866
3
molokyle
1040
4
Steffanst..
758
5
gandalf
657
6
smilly
564
7
gibson
560
8
cumano
530
9
MouseKeep..
480
10
Random
410
Vis seneste fil først
Fra :
ck1973@gmail.com
Dato :
03-04-06 19:47
Hej
Jeg bruger nedenstående kode til at vise filerne i en bestemt mappe.
Hvordan får jeg vist filerne således, at de seneste uploadede filer
vises først?
<%
Dim whichfolder, fs, f, f1, fc
Whichfolder=server.mappath("\") &"/docs"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(Whichfolder)
Set fc = f.files
For Each f1 in fc
response.write "<a href=""" & "/docs/" & (f1.name) & """>" & (f1.name)
& "</a>" & "<br>" & (" lagt på nettet: " & f1.DateLastModified &
"<BR>")
Next
%>
VH
Christopher
finn elmgaard (
03-04-2006
)
Kommentar
Fra :
finn elmgaard
Dato :
03-04-06 21:17
<ck1973@gmail.com> wrote in message
news:1144090047.638307.322100@i39g2000cwa.googlegroups.com...
Hej
Jeg bruger nedenstående kode til at vise filerne i en bestemt mappe.
Hvordan får jeg vist filerne således, at de seneste uploadede filer
vises først?
Jeg spurgte om noget tilsvarende for kort tid siden her i gruppen og fik et
meget fyldestgørende svar fra Jens Gyldenkærne Clausen, som jeg tror du kan
bruge. Jeg citerer det her:
Det kan laves med et Scripting.Dictionary-objekt og en
sorteringsfunktion til arrays. Man kan godt klare sig uden
Dictionary-objektet, men så skal man redimme-arrayet, eller sætte
det til at være stort nok fra starten.
Her kan du se hvordan jeg har lavet det:
I funktion: <
http://gyros.dk/usenet/asp/nyeste.asp>
Kildefiler:
<
http://gyros.dk/usenet/asp/nyeste.asp.txt>
<
http://gyros.dk/usenet/asp/quicksort.inc.asp.txt>
Sorteringsfunktionen er hentet herfra:
<
http://www.4guysfromrolla.com/webtech/012799-2.shtml>
Datokonverteringsfunktionen er sakset herfra:
<
http://tumanov.com/projects/scriptlets/iso8601dates.asp>
Citat slut
mvh
Finn
Søg
Alle emner
Teknologi
Udvikling
ASP
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177496
Tips :
31968
Nyheder :
719565
Indlæg :
6408491
Brugere :
218887
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.