|
![](/images/profiles/noicon.gif) | tables og billeder Fra : hubi ![To en halv stjerne](/App_Themes/Normal/images/stars/small/star25.gif) | Vist : 1203 gange 100 point Dato : 04-10-08 16:37 |
|
hej alle...
jeg har kigget et stykke tid på følgende asp kode:
Kode <%
Dim FSO
Dim Files
Dim File
Dim Count
Const Columns = 3
Const ImageWidth = 100
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Files = FSO.GetFolder(Server.MapPath("./")).Files
Set FSO = Nothing
Response.Write "<TABLE width=""100%"" border=""1"" cellspacing=""0"">"
Response.Write "<TR>"
Count = 0
For Each File In Files
Select Case LCase(Right(File.Name, 3))
Case "jpg", "gif", "bmp", "png"
Count = Count + 1
if Count Mod Columns = 1 Then Response.Write "</TR><TR>"
Response.Write "<TD align=""center"" valign=""top"">"
Response.Write "<A href=""" & File.Name & """>"
Response.Write File.Name
Response.Write "<BR><IMG src=""" & File.Name & """ border=""1"" width=""" & ImageWidth & """><BR>"
Response.Write "</A>"
Response.Write "</TD>"
End Select
Next
Response.Write "</TR>"
Response.Write "</TABLE>"
Set File = Nothing
Set Files = Nothing
%> |
jeg har lavet nogle tabeller i html som ser såfremdeles ud:
Kode <table border="1" bordercolor="" width="" bgcolor="">
<tr>
<td> billede</td>
<td> tekst </td>
<td> billede </td>
<td> tekst </td>
</tr>
</table> |
i de felter der står "billede" i, vil jeg have asp koden til selv at hente billederne billeder, men hvordan er det lige man gør det :/
på forhånd tak
| |
![](/images/profiles/icons/81351.jpg) | Accepteret svar Fra : molokyle ![Tre en halv stjerne](/App_Themes/Normal/images/stars/small/star35.gif) | ![To stjerner](/App_Themes/Normal/images/stars/big/star20.gif) Modtaget 50 point Dato : 04-10-08 19:31 |
| | |
![](/App_Themes/Normal/images/Window/Backgrounds/User_Message.gif) | Du har følgende muligheder | |
|
Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.
Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
| |
|
|