Lista i tabell

HEJ!

Gjorde en sådan igår med fyra kolumner, tur för dig :)

Function gallery()
	response.write "<table><tr>"
	'write the cell, link and content
	For i = 0 To UBound(gallery_txt)
		If j = 4 then response.write "</tr><tr>": j = 0
		response.write "<td><img src=""" & i & ".jpg"">" & gallery_txt(i) & "</td>"
		j = j + 1
	Next
	
	'fill the table with empty cells
	If j <> 0 then
		Do Until j = 4
			response.write "<td>&nbsp;</td>"
			j = j +1
		Loop
	End If
	response.write "</tr></table>"
End Function

Hänger ihop med en textarrray:
gallery_txt(0) = "texttextext"
gallery_txt(1) = "Texttexttex"

Det viktiga är hur variabeln j används för att avsluta tabellen snyggt.

Den där koden förstår jag inte riktigt

Tradigt...

Sätter ihop en mer anpassad kod:

sql för att hämta ett rs med produkter

response.write "<table osv><tr>"
'write the cell, link and content
Do Until RS.Eof
	If j = 2 then response.write "</tr><tr>": j = 0
	response.write "<td>" & RS("produkt") & "</td>"
	j = j + 1
Loop
	
'fill the table with empty cells
If j <> 0 then
	Do Until j = 2
		response.write "<td> </td>"
		j = j +1
	Loop
End If
response.write "</tr></table>"

Ahh nu blir det bra här..
tackar