Repeat region/tabel med flere kolonner
Jeg har lavet en tabel med en repeat region på i Dreamweaver. Der er kun en celle. Dvs. enten repeater den vandret i en række eller lodret i en række. Men jeg vil gerne have den til at repeate 5 kolonner vandret og så bare uendeligt lodret. Hvordan gør jeg det.Koden:
<%
Dim calendar
Dim calendar_numRows
Set calendar = Server.CreateObject("ADODB.Recordset")
calendar.ActiveConnection = MM_SCCFF_STRING
calendar.Source = "SELECT Uger.UgeID, UgeNr, FraDato, TilDato, Booking.UgeID, LejlighedsID, Status FROM Booking, Uger WHERE Booking.UgeID= Uger.UgeID"
calendar.CursorType = 0
calendar.CursorLocation = 2
calendar.LockType = 1
calendar.Open()
calendar_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
calendar_numRows = calendar_numRows + Repeat1__numRows
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<table width="253" border="0" cellspacing="0" cellpadding="0">
<tr>
<%
While ((Repeat1__numRows <> 0) AND (NOT calendar.EOF))
%>
<td width="253"><p><%=(calendar.Fields.Item("UgeNr").Value)%><br>
<%=(calendar.Fields.Item("FraDato").Value)%> -<%=(calendar.Fields.Item("TilDato").Value)%><br>
<%=(calendar.Fields.Item("Status").Value)%> </p></td>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
calendar.MoveNext()
Wend
%>
</tr>
</table>
</body>
</html>
<%
calendar.Close()
Set calendar = Nothing
%>
Takker!!! :-)
