|
| Do until - udskriv 3 post, skift linie og ~ Fra : kimweltz |
Dato : 08-03-09 02:30 |
|
Hej alle,
Jeg har et problem i asp.
Jeg skal have alle mine data ud fra en database. Det er billeder.
Jeg selecter dem alle sammen, og laver et loop, som udskriver den
alle sammen på een lang række.
Jeg vil gerne have 3 stk på hver række, altså således
Billede Billede Billede<br>
Billede Billede Billede<br>
osv. Men hvordan får jeg den til at lave en ny <tr> ved hver
trejde billede?
På forhånd tusind tak
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Jørn Andersen (08-03-2009)
| Kommentar Fra : Jørn Andersen |
Dato : 08-03-09 03:19 |
|
On 08 Mar 2009 01:29:49 GMT, kimweltz <kim@wazted.dk> wrote:
>Jeg skal have alle mine data ud fra en database. Det er billeder.
>
>Jeg selecter dem alle sammen, og laver et loop, som udskriver den
>alle sammen på een lang række.
>
>Jeg vil gerne have 3 stk på hver række, altså således
>
>Billede Billede Billede<br>
>Billede Billede Billede<br>
>
>
>osv. Men hvordan får jeg den til at lave en ny <tr> ved hver
>trejde billede?
Noget i retning af:
i = 0 ' Tæller
Do While ...
i = i + 1
If i Mod 3 = 1 Then
If i <> 1 Then
Response.Write "</tr>" & vbcrlf
End If
Response.Write "<tr>" & vbcrlf
End If
' Udskriv som normalt
Loop
Til slut skal du så checke, hvad din i er, og fylde op med tomme td'er.
En anden løsning er at styre det ved at floate dine billeder med CSS.
Good luck!
--
Jørn Andersen,
Brønshøj
| |
kimweltz (08-03-2009)
| Kommentar Fra : kimweltz |
Dato : 08-03-09 11:32 |
|
Tusind tak for svaret, jeg forstår det desværre ikke helt. Jeg poster lige
min source her, og håber du kan vise mig hvor i koden dit udsnit skal
indsættes
<strSQL = "select * from XXXX WHERE active = 'yes' order by RAND() DESC
limit 20"
Set rs = Conn.Execute(strSQL)
If rs.bof then
Response.Write "<b>No subjects in database</b>"
Else
DO until rs.eof
%>
<img src="<% = rs("thumb") %>" width="75" height="44"
hspace="5" align="left" style="border: 1px solid #976842">
<%
rs.MoveNext
loop
End if
conn.close>
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Jørn Andersen (08-03-2009)
| Kommentar Fra : Jørn Andersen |
Dato : 08-03-09 21:46 |
|
On 08 Mar 2009 10:31:30 GMT, kimweltz <kim@wazted.dk> wrote:
>Tusind tak for svaret, jeg forstår det desværre ikke helt.
Du starter med at oprette en tæller (i) og sætter dentil 0.
For hver loop stepper tælleren én frem.
Check hvad resten er når du dividerer med 3 (Mod-funktionen) - hvis den
er 1, skal der skiftes række.
>Jeg poster lige
>min source her, og håber du kan vise mig hvor i koden dit udsnit skal
>indsættes
>
><strSQL = "select * from XXXX WHERE active = 'yes' order by RAND() DESC
>limit 20"
>Set rs = Conn.Execute(strSQL)
>
>
>If rs.bof then
>Response.Write "<b>No subjects in database</b>"
>Else
>
> DO until rs.eof
>
> %>
> <img src="<% = rs("thumb") %>" width="75" height="44"
>hspace="5" align="left" style="border: 1px solid #976842">
> <%
>rs.MoveNext
>loop
>End if
>conn.close>
I Else-delen:
<%
Response.Write "<table>" & vbcrlf
i = 0 ' Tæller
Do until rs.eof
i = i + 1
If i Mod 3 = 1 Then
If i <> 1 Then
Response.Write "</tr>" & vbcrlf
End If
Response.Write "<tr>" & vbcrlf
End If
%>
<td><img src="<% = rs("thumb") %>" width="75" height="44" hspace="5"
align="left" style="border: 1px solid #976842"></td>
<%
rs.MoveNext
Loop
Response.Write "</tr>" & vbcrlf
Response.Write "</table>" & vbcrlf
%>
Good luck!
--
Jørn Andersen,
Brønshøj
| |
kimweltz (26-03-2009)
| Kommentar Fra : kimweltz |
Dato : 26-03-09 15:58 |
|
Tusind tusind tak. Det løste problemet. Du kan se resultater på Chiko.dk -
Direkte link er: http://chiko.dk/games.asp
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Leif Neland (26-03-2009)
| Kommentar Fra : Leif Neland |
Dato : 26-03-09 22:42 |
|
kimweltz skrev:
> Tusind tusind tak. Det løste problemet. Du kan se resultater på Chiko.dk -
> Direkte link er: http://chiko.dk/games.asp
>
Nydeligt. Så mangler du bare at rette stavefejlene.
Disse ord skal ikke deles:
Ko Krigeren
Pingvin Kast
Krabbe Krig
Fugle Jægeren
Det samme og stavefejl.
Beskyt dit krabbe teritorium fra de farlige edderkopper
Stavefejl
Brug hunden til at lede fårene ind i det rigtige huller så hurtigt du kan
Stavefejl
Spis osten og undgå at blive ramt at battet så lang tid du kan
Leif
| |
|
|