webForumDet fria alternativet

Rs.movenext Och loop

4 svar · 237 visningar · startad av Lazerzubb

LazerzubbMedlem sedan mars 2000542 inlägg
#1

Jag har tabeller som ser ut så här.
De har olika färg.
Hur loopar jag igenom hela databasen så att jag får samma färg på varannan.
<tr>
<td width="243" height="1" bgcolor="#FFCC66"><font face="Verdana" size="1" color="#000000"><%=rs("ID")%> <a href="detail.asp?id=<%=rs("ID")%>"><% Response.Write "" & Split(rs("country"), ";")(0)%>, <%=rs("province")%> <%=rs("city")%> </a></font></td>
<td width="145" height="1" bgcolor="#FFCC66"><font face="Verdana" size="1" color="#000000"><%=rs("bedf")%></font></td>
<td width="40" height="1" bgcolor="#FFCC66"><font face="Verdana" size="1" color="#000000"><%=rs("xbed")%></font></td>
<td width="192" height="1" bgcolor="#FFCC66"><font face="Verdana" size="1" color="#000000">High: <%=rs("high")%>, Low: <%=rs("low")%></font></td>
</tr>

//Här byts färgen till annan.
<tr>
<td width="243" height="1" bgcolor="#FFFFFF"><font face="Verdana" size="1" color="#000000"><%=rs("ID")%> <a href="detail.asp?id=<%=rs("ID")%>"><% Response.Write "" & Split(rs("country"), ";")(0)%>, <%=rs("province")%> <%=rs("city")%> </a></font></td>
<td width="145" height="1" bgcolor="#FFFFFF"><font face="Verdana" size="1" color="#000000"><%=rs("bedf")%></font></td>
<td width="40" height="1" bgcolor="#FFFFFF"><font face="Verdana" size="1" color="#000000"><%=rs("xbed")%></font></td>
<td width="192" height="1" bgcolor="#FFFFFF"><font face="Verdana" size="1" color="#000000">High: <%=rs("high")%>, Low: <%=rs("low")%></font></td>
</tr>

/TACK

------------------
Helvetet är den plats där engelsmännen lagar maten, Italienarna dirigerar trfiken och tyskarna står för underhållningen.

LazerzubbMedlem sedan mars 2000542 inlägg
#2

Glömde sökkoden.
<%
If rs.EOF Then
Response.write("We searched and didn't find what you wanted..")
Else
%>

<%
Do until rs.EOF
%>

Här är tabellerna.

<%
rs.MoveNext
Loop
End If
rs.close
set rs=nothing
Connection.close
set Connection=nothing
%>

------------------
Helvetet är den plats där engelsmännen lagar maten, Italienarna dirigerar trfiken och tyskarna står för underhållningen.

LarsGMedlem sedan dec. 200012 464 inlägg
#3
<%
If rs.EOF Then
Response.write("We searched and didn't find what you wanted..")
Else
%>
<%
item = cint(0)
Do until rs.EOF
%> 
if item mod 2 = 0 then
'sätt färg 1
else
'sätt färg 2
end if
item = item -- 1

Här är tabellerna.

<%
rs.MoveNext
Loop
End If
rs.close
set rs=nothing
Connection.close
set Connection=nothing
%>

Det finns ett exempel i FAQ också.

------------------
essentitia preter non sans multiplicandum

[Redigerat av LarsG den 06 jul 2001]

LazerzubbMedlem sedan mars 2000542 inlägg
#4

Jag vill att koden ska spotta ut först vitt tabelkode sedan orangetabellkod.
<%
If rs.EOF Then
Response.write("We searched and didn't find what you wanted..")
Else
%>
<%
item = cint(0)
Do until rs.EOF
%>
if item mod 2 = 0 then
'sätt färg 1 // Här ska första tabellkoden vara
else // Här skiftar den
'sätt färg 2 //Orange tabellkod
end if
item = item -- 1

//Sedan fortsätter det tills det tar slut.
<%
rs.MoveNext
Loop
End If
rs.close
set rs=nothing
Connection.close
set Connection=nothing
%>

------------------
Helvetet är den plats där engelsmännen lagar maten, Italienarna dirigerar trfiken och tyskarna står för underhållningen.

LazerzubbMedlem sedan mars 2000542 inlägg
#5

Fick det inte och fungera med FAQ koden heller.

------------------
Helvetet är den plats där engelsmännen lagar maten, Italienarna dirigerar trfiken och tyskarna står för underhållningen.

126 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
123 ms — hämta tråd, inlägg och bilagor (db)