/
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
Fso første post
Fra :
kristensenrune@hotma~
Dato :
27-01-06 22:16
Hej NG...
Jeg er ved at lave et lille galleri og har fået lavet sådan at, jeg
kan få vist samtlige billeder af typen jpg på min side, men hvis jeg
gerne vil bruge det første billede (eller et tilfældigt for den sags
skyld), hvordan gør jeg det??
Koden der viser samtlige billeder:
<%
ASPDir = Request.Querystring("mappe")
Response.Write (" <h1>Billeder fra mappen: "&ASPDir&" <h1> <hr> ")
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(Server.MapPath(ASPDir))
Set objFiles = objFolder.Files
For Each ASPFile In objFiles
If right(ASPFile.Name, 3) = "JPG" OR right(ASPFile.Name, 3) = "jpg"
Then
Response.Write (" <img src="""&(ASPDir)&"\"&(ASPFile.Name) &"""> <br>")
end if
Next
Set objFS = Nothing
%>
På forhånd tak!
terje (
28-01-2006
)
Kommentar
Fra :
terje
Dato :
28-01-06 11:10
kristensenrune@hotmail.com wrote:
> Hej NG...
>
> Jeg er ved at lave et lille galleri og har fået lavet sådan at, jeg
> kan få vist samtlige billeder af typen jpg på min side, men hvis jeg
> gerne vil bruge det første billede (eller et tilfældigt for den sags
> skyld), hvordan gør jeg det??
Du kan bruke en teller.
Dim iCounter
iCounter = 1
For Each oFile in oFiles
If iCounter = 1 Then Response.Write etc
iCounter = iCounter + 1
Next
Hvis du vil vise et tilfeldig valgt bilde kan du se på Randomize.
terje?
Søg
Alle emner
Teknologi
Udvikling
ASP
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177558
Tips :
31968
Nyheder :
719565
Indlæg :
6408925
Brugere :
218888
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.