webForumDet fria alternativet

Ökande värde i Loop!?

ASP

4 svar · 212 visningar · startad av JAreMANNEN

Medlem sedan aug. 20002 272 inlägg
Frågan#1

Behöver veta hur jag ska göra om jag vill ha nummer + 1 i varje "varv" i loopen...?

Ska förklara närmare...

Loopen körs 9ggr, och jag behöver värde 1 på det första "varvet, 2 på det andra osv. upp till 9..

Så varje nytt varv adderas det gamla värdet med 1...

Provat med en enkel For slinga men det vill inte fungera inuti Loopen...

------------------
Det är lättare att leva ett rikt liv som ung, när man vet att det väntar ett som gammal
E-post

Medlem sedan dec. 200012 464 inlägg
#2

For borde vara det du behöver. Vad är det som inte fungerar? Kan du visa lite kod och förklara närmare?

for i = 1 to 9
...
next

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

Medlem sedan aug. 20002 272 inlägg
#3

Använder en DHTML-meny och det är därför jag måste använda en unik siffra för varje nytt uppbyggande av en meny...

Nummret som jag behöver skall placeras här:
<div id="divTop<%=i%>" class="clTop">
onclick="menu(<%=i%> )
<div id="divSub<%=i%>" class="clSub">

Som du ser har jag redan satt in variabeln "i" där...

Den ska börja på 0 och sluta på 8 om jag ska vara exakt..

<div id="divCont">
<%
  Do UNTIL objRS.EOF
%>

[b]<div id="divTop<%=i%>" class="clTop">[/b]
<table width="150" border="0" cellspacing="0" cellpadding="2">
<tr>
<td bgcolor="#000000">
<table width="150" border="0" cellspacing="0" cellpadding="0">
<tr> 
<td bgcolor="#99CCCC" cellpadding="0"> <a href="#" [b]onclick="menu(<%=i%> )[/b]; return false" onfocus="this.blur()"><%= objRS("FLD_huvrub")%></a></td>
</tr>
</table>
</td>
</tr>
</table>
[b]<div id="divSub<%=i%>" class="clSub">[/b]
<table width="150" border="0" cellspacing="1" cellpadding="2">

<%
  strSQL = "SELECT * FROM TBL_rubrik Where " &objRS("id")& " LIKE TBL_huvudid"
  Set objRS2 = objConn.Execute(strSQL)

  Do UNTIL objRS2.EOF
%>

<tr>
<td bgcolor="#000000">
<table width="150" border="0" cellspacing="0" cellpadding="1">
<tr>
<td bgcolor="#CBE4E4">  <a href="#"><%= objRS2("FLD_rub")%></a></td>
</tr>
</table>
</td>
</tr>

<%
  objRS2.MoveNext
  Loop
  Set objRS2 = Nothing
%>

</table>
</div>
<br>

<%
  objRS.MoveNext
  Loop
  Set objRS = Nothing
%>

</div>
</div>

------------------
Det är lättare att leva ett rikt liv som ung, när man vet att det väntar ett som gammal
E-post

[Redigerat av JAreMANNEN den 31 jul 2001]

Medlem sedan dec. 200012 464 inlägg
#4
<div id="divCont">
<%
[b]i=0[/b]
Do UNTIL objRS.EOF
%>
<div id="divTop<%=i%>" class="clTop">
<table width="150" border="0" cellspacing="0" cellpadding="2">
<tr>
<td bgcolor="#000000">
<table width="150" border="0" cellspacing="0" cellpadding="0">
<tr> 
<td bgcolor="#99CCCC" cellpadding="0"> <a href="#" onclick="menu(<%=i%> ); return false" onfocus="this.blur()"><%= objRS("FLD_huvrub")%></a></td>
</tr>
</table>
</td>
</tr>
</table>
<div id="divSub<%=i%>" class="clSub">
<table width="150" border="0" cellspacing="1" cellpadding="2">

<%
strSQL = "SELECT * FROM TBL_rubrik Where " &objRS("id")& " LIKE TBL_huvudid"
Set objRS2 = objConn.Execute(strSQL)

Do UNTIL objRS2.EOF
%>

<tr>
<td bgcolor="#000000">
<table width="150" border="0" cellspacing="0" cellpadding="1">
<tr>
<td bgcolor="#CBE4E4">  <a href="#"><%= objRS2("FLD_rub")%></a></td>
</tr>
</table>
</td>
</tr>

<%
objRS2.MoveNext
Loop
Set objRS2 = Nothing
%>

</table>
</div>
<br>

<%
objRS.MoveNext

[b] i = cint(i) + 1[/b]

Loop
Set objRS = Nothing
%>

</div>
</div>

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

[Redigerat av LarsG den 31 jul 2001]

Medlem sedan aug. 20002 272 inlägg
#5

Tja, vad ska man säga??

KANON, Tack så j*vla mkt LarsG

------------------
Det är lättare att leva ett rikt liv som ung, när man vet att det väntar ett som gammal
E-post

261 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
126 ms — deklarationer (db)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)
125 ms — ändringar (db)