show images side by side
Jeg skal have lavet side der kan vise billder fra DBDe skal gerne vises således, hvordan gør man lige det???
12345
678910
Jeg har ikke noget problem i at få dem til at vises således
1
2
3
4
.
.
10
De kommer så til at fylde formeget.
Her er koden.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="include/JJ.asp" -->
<%
Dim visbilled__MMColParam
visbilled__MMColParam = "1"
If (Request.QueryString("BygsagsID") <> "") Then
visbilled__MMColParam = Request.QueryString("BygsagsID")
End If
%>
<%
Dim visbilled
Dim visbilled_numRows
Set visbilled = Server.CreateObject("ADODB.Recordset")
visbilled.ActiveConnection = MM_JJ_STRING
visbilled.Source = "SELECT * FROM Bygbilled WHERE BygsagsID = '" + Replace(visbilled__MMColParam, "'", "''") + "'"
visbilled.CursorType = 0
visbilled.CursorLocation = 2
visbilled.LockType = 1
visbilled.Open()
visbilled_numRows = 4
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
visbilled_numRows = visbilled_numRows + Repeat1__numRows
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<table border="1">
<tr>
<td>BygBilled</td>
</tr>
<% While ((Repeat1__numRows <> 0) AND (NOT visbilled.EOF)) %>
<tr>
<td><img src="/bygimage/<%=(visbilled.Fields.Item("BygBilled").Value)%>" width="30" height="30"></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
visbilled.MoveNext()
Wend
%>
</table>
</body>
</html>
<%
visbilled.Close()
Set visbilled = Nothing
%>
