<table border="1">
<%
Dim i, x
For i = 1 to 12
If x Mod 4 = 0 Then Response.write "</tr><tr>" : x = 1
Response.write "<td>"& x &"</td>"
x=x+1
Next
%>
</table>
<table border="1">
<%
Dim i, x
For i = 1 to 12
If x Mod 4 = 0 Then Response.write "</tr><tr>" : x = 1
Response.write "<td>"& x &"</td>"
x=x+1
Next
%>
</table>
Detta skriver inte ut något, det finns 5 rader i databasen, vad är fel
<%page="index.asp"
do until mRS.eof
Dim i, x
For i = 1 to 12
If x Mod 4 = 0 Then Response.write "</tr><tr>" : x = "<a class=""menu"" href="""& page &"?kat="& mRS("kat") &""">"& mRS("katNamn") &"</a></b>"
Response.write "<td>"& x &"</td>"
x=x+1
Next
mRS.MoveNext: Loop%>
<table border="1">
<%
Dim x, page
page="index.asp"
Do while mRS.eof
If x Mod 4 = 0 Then Response.write "</tr><tr>" : x = 1
Response.write "<td><a class=""menu"" href="""& page &"?kat="& mRS("kat") &"""><b>"& mRS("katNamn") &"</b></a></td>"
x=x+1
mRS.MoveNext
Loop
%>
</table>
<table border="1">
<%
Dim x, page
page="index.asp"
Do while mRS.eof
If x Mod 4 = 0 Then Response.write "</tr><tr>" : x = 1
Response.write "<td><a class=""menu"" href="""& page &"?kat="& mRS("kat") &"""><b>"& mRS("katNamn") &"</b></a></td>"
x=x+1
mRS.MoveNext
Loop
%>
</table>
Den visar heller inga poster, den kod jag har som loopar ut de 5 poster jag än så länge har som funkar är
<%page="index.asp"%>
<%do until mRS.eof%>
<b><a class="menu" href="<%=page%>?kat=<%=mRS("kat")%>"><%=mRS("katNamn")%></a></b><br>
<%mRS.MoveNext: Loop%>
<table border="1">
<%
Dim x, page
page="index.asp"
Do while mRS.eof
If x Mod 4 = 0 Then Response.write "</tr><tr>" : x = 1
Response.write "<td><a class=""menu"" href="""& page &"?kat="& mRS("kat") &"""><b>"& mRS("katNamn") &"</b></a></td>"
x=x+1
mRS.MoveNext
Loop
%>
</table>
Nä, det räcker inte riktigt. Det kanske ser ok ut i IE men det blir ingen korrekt tabell.