Skiftevis forskellige tabeller i et loop

n = 0
do While NOT rs.EOF

Response.Write "<table>"
If n = 0 Then
Response.Write "<img src=""billede.jpg"" align=""left"">"
n = 1
Else
Response.Write "<img src=""billede.jpg"" align=""left"">"
n = 0
End If
Response.Write "</table>"

Loop

Du kan lave det i stil med:


align_no = 0
do while not rs.EOF
  align_no = align_no + 1
  if align_no MOD 2 = 0 then
    aligntxt = "right"
  else
    aligntxt = "right"
  end if
  %>

<table>
<img src="billede.jpg" align="<%=aligntxt%>">
</table>

  <%
  rs.Movenext
loop

Så kan du udskift

<img src="billede.jpg"

til det sted billet kommer fra:

<img src="<%=rs("billedesti")%>"

Tester lige og vender tilbage..

/Bruhn

Else
Response.Write "<img src=""billede.jpg"" align=""left"">"
n = 0

skal selvfølgelig være:

Else
Response.Write "<img src=""billede.jpg"" align=""right"">"
n = 0

Hells > Jeg kan ikke rigtig få det til at virke som jeg vil.. Når der er mere en to poster, så "smadrer" den alle tabellerne.. Wired.. Hvis det hjælper kommer her koden :


<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber4">
<tr>
<td width="100%">
<%
Set RS_anmeldelser = Server.CreateObject("ADODB.RecordSet")
RS_anmeldelser.open "Select * From [tekster] WHERE type = 'anmeldelse' AND Site_type = 'game' Order by dato desc" , Conn, 1, 3

n = 0
do While not n = 1 and NOT RS_anmeldelser.EOF
Teaser = RS_anmeldelser("teaser")
Teaser = Left((Teaser), 80)

Set RS_picture2 = Server.CreateObject("ADODB.RecordSet")
RS_picture2.open "Select * from [images] WHERE ID  = " & RS_anmeldelser("billede") &"", Conn, 1, 3
%>
<%
If n = 0 Then
%>
                   
                                           
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
<tr>
<td width="100%" colspan="2"><font face="Arial" size="4"><a href="anmeldelse.asp?Id=<%=rs_anmeldelser("id")%>"><i><b><%=RS_anmeldelser("titel")%></b></i></a></font></td>
</tr>
<tr>
<td width="66%" valign="top">
<font face="Arial, Helvetica" size="1" color="#CCCCCC"><%=RS_anmeldelser("dato")%><br></font>
<font size="2" face="Arial"><%=teaser%></font><br>
<font face="Arial, Helvetica" size="2">
<a href="nyhed.asp?Id=<%=rs_anmeldelser("id")%>"><img src="img/laesmere.gif" width="60" height="5" border="0"></a></font></td>
<td width="34%">
<img border="0" src="http://crew.zantiago.com/img/uploaded/<%=rs_picture2("images")%>"><br>
&nbsp;</td>
</tr>
</table>
<%
n = 1
Else
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber2">
<tr>
<td width="100%" colspan="2" valign="top">
<font face="Arial" size="4"><a href="anmeldelse.asp?Id=<%=rs_anmeldelser("id")%>"><i><b><%=RS_anmeldelser("titel")%></b></i></a></font></td>
</tr>
<tr>
<td width="32%" valign="top">
<img border="0" src="http://crew.zantiago.com/img/uploaded/<%=rs_picture2("images")%>"><br>
&nbsp;</td>
<td width="68%" valign="top">
<font face="Arial, Helvetica" size="1" color="#CCCCCC"><%=RS_anmeldelser("dato")%><br></font>
<font size="2" face="Arial"><%=teaser%></font><br>
<font face="Arial, Helvetica" size="2">
<a href="nyhed.asp?Id=<%=rs_anmeldelser("id")%>"><img src="img/laesmere.gif" width="60" height="5" border="0"></a></font></td>
</tr>
</table>
<%
n = 0
End If
RS_anmeldelser.MoveNext
Loop
%>                     
</td>
</tr>
</table>

På forhånd tak...

/Bruhn