Problem med Resultat från en databas i flera kolumner

Hur ser ditt nuvarande script ut?

Scriptet är:

<%
i = 1
response.write "<tr>"

'-- Skriver ut data så länge som det finns något i recordsetet	-----------
do until RS1.eof
	response.write "\<td class=2\>\<input type=checkbox name=Projekt_Id value="
	response.write RS1.fields("Projekt_Id")
	response.write "\>&nbsp;"
	response.write  RS1.fields("Projektnamn")
	response.write "\</td\>"
	if i = 3 then
		response.write "\</tr\>"
		response.write "\<tr\>"
		i = 0
	end if 
	RS1.movenext : i = i + 1
loop
response.write "\</tr\>"

%>

och det kommer ifrån: http://www.gladh.nu/asphelp/svar1.html

Om du lägger in detta efter loop i koden:

If i > 1 then
Do While  i < 4
response.write "<td></td>"  & vbcrlf
i = i + 1 
loop
end if

så borde det fungera.

Ett tips är också att lägga in: & vbcrlf som jag gjort efter dina response.writerader. Det blir mycket lättare att kika på koden du får ut då.

Tackar!

Fungerar mer än bäst!

Man tackar! :birp