Notifikationer

Markér alle som læst Log ud

hundevennen Nybegynder

06. marts 2007 - 08:40 Der er 1 løsning

vise nyeste JPG fil i bibliotek på forside?

Hvordan gør man det.
Jeg har prøvet at finde nogle svar på samme spm. her på eksperten, men ikke fundet noget der virker for mig

Synes godt om

hundevennen Nybegynder

06. marts 2007 - 09:11 #1

fandt ud af det selv med dette stykke script fundet her på eksperten
<html>
<head>
<title>Filoversigt</title>
</head>
<body>

<%
if request.querystring("dir") = "" Then
dir = "filer/"
else
dir = Request.querystring("dir") & "/"
end if

Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(server.mappath(dir))
Set objFiles = objFolder.Files
%>



<h3>Filer i folderen <%=dir%>:</h3>

<%
For Each Image In objFiles

response.Write Image.Name & "<br><br>"

sti = server.mappath(dir & image.name)

set f= objFS.GetFile(sti)
Response.Write("Filen er oprettet: ")
Response.Write(f.DateCreated)

response.Write "<br><br><br>"

currentFile = f.DateCreated

if sidste <> "" Then
mForskel = DateDiff("m",currentFile,sidste)
dForskel = DateDiff("d",currentFile,sidste)
nForskel = DateDiff("n",currentFile,sidste)
end if

If (mForskel < 1) and (dForskel < 1) and (nForskel < 1) Then
nyeste = image.name
end if

sidste = (f.DateCreated)

set f=nothing

Next

response.Write "<br><hr><br>Nyeste fil er: " & nyeste

%>



</body>
</html>

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS