Vise alle jpg filer i en mappe

skal den vise alle billederne eller skal det være om links ?

Her har du et par løsningsforslag.. ;o)
http://www.4guysfromrolla.com/webtech/102500-1.2.shtml
http://aspnet.4guysfromrolla.com/articles/081303-1.aspx

Viser billeder. Alt-tagget skal være filname.
asp filen skal ligge i samme mappe som billederne.

>powerade
Jeg vil gerne bare have vbscript loopet her.

Dim objFSO : Set objFSO = Server.CreateObject( "Scripting.FileSystemObject" )

Dim objFolder : Set objFolder = objFSO.GetFolder( "[din folder]" )

for each item in objFolder.Files
    if( InStr( item, ".jpg" ) = LEN( item ) - 3 ) then
        Response.Write( item & "<br>" )
    end if
next/nute

naaah ... kunne godt se der manglede noget ...

Dim objFSO : Set objFSO = Server.CreateObject( "Scripting.FileSystemObject" )

Dim strTheFolder : strTheFolder = Server.MapPath(".") & "\graphics\"

Dim objFolder : Set objFolder = objFSO.GetFolder( strTheFolder )

Dim arrFileName, strFileName

for each item in objFolder.Files
    if( InStr( item, ".gif" ) = LEN( item ) - 3 ) then
        arrFileName = Split( item, "\" )
        strFileName = strTheFolder & arrFileName( UBound( arrFileName ) )
        Response.Write( "<a href=""" & strFileName & """><img alt=""" & strFileName & """ src=""" & strFileName & """ border=""0""/></a><br>" )
    end if
next

/nute

Dim strTheFolder : strTheFolder = Server.MapPath(".") & "\graphics\"

skal kun være

Dim strTheFolder : strTheFolder = Server.MapPath(".")

Takker
.gif skulle være .jpg, men den klare jeg nok selv ;-)

Takker
.gif skulle være .jpg, men den klare jeg nok selv ;-)

Takker
.gif skulle være .jpg, men den klare jeg nok selv ;-)

Hvorfor skriver du det 3 gange?