<%
With Response
.Write "<table width=""500px;"">" & vbCrLf
lngX = 0
Do While Not RecSet.EOF
If lngX Mod 3=0 Then .Write "<tr>" & vbCrLf
.Write "<td style=""text-align:center;"">"
.Write "<a href=""slottdetalj.asp?id=" & RecSet("id") & """ class=""vtext""><img style=""width:140px;height:100px;border:1;"" class=""specialright"" src=""./slott/" & RecSet("karta") & ".jpg"" & alt=" & RecSet("alttext") & "/><br/>" & RecSet("slottsnamn") & "</a><br/><br/>"
.Write "</td>" & vbCrLf
If lngX Mod 3=3 Then .Write "</tr>" & vbCrLf
lngX = lngX + 1
RecSet.MoveNext
Loop
.Write "</table>" & vbCrLf
End With
%>
-------------------
om jag inte helt missminner mig var det av någon här på forumet som hjälpte mig med den här kodsnutten för några månader sedan...
Den plockar alltså en massa info från en databas som radas upp snyggt...
jättetack för hjälpen - när väl http://validator.w3.org/ svarar (är otrolig seg - kommer ni in där?) så skall jag kolla om min slott.asp är validerad :-) vilket jag tror!
tack för hjälpen!
265 ms totalt · 4 externa anrop · v20260731065814-full.14655e19