webForumDet fria alternativet

Radbryt efter x-antal bilder

ASP

3 svar · 214 visningar · startad av zlakker

Medlem sedan apr. 2001227 inlägg
Frågan#1

Jag har ett gäng länkar till bilder i min databas. Jag vill skriva ut dem så att först skriv de första 5 ut på en rad efter varann. Sedan blir det radbryt och därefter kommer den 5 nya osv.
Någon som kan ge lite tips på kod.

Såhär vill jag att det ska se ut om man översätter till html.
Alltså inga tabeller eller liknande.

<br>
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<br>
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<img class="img-border" src="images/green.gif" width="50" height="50">
			<br>
Medlem sedan sep. 2003443 inlägg
#2

detta loopar ut poster i en databas. vet ej om det funkar för dig, men för mig funkar det.

 <%

 

sql = "SELECT * FROM sponsorer order by sponsornamn asc"

rsRecSet.Open sql, cnConn, 0, 1

 

 

Do until rsRecSet.EOF

 

Response.Write(strRow & "<td>"  &  rsRecSet("sponsornamn")  &  "</td>" & vbCrLf)

nummer = nummer + 1

    If nummer Mod 3 = 0 Then

                        strRow = "</tr>" & vbCrLf & "<tr>" & vbCrLf

            Else

                        strRow = ""

            End If

 

rsRecSet.MoveNext

Loop

rsRecSet.Close

 

%>

ändre 3 till så många kolummer du vill ha.

hoppas detta funkar... är inte 100% säker... men det funkar i alal fall för mig när jag loppar ut sponsornamn ;)

Medlem sedan apr. 2001227 inlägg
#3

Tack jag får testa med det.

Medlem sedan apr. 2001227 inlägg
#4

Såhär ser lösningen ut som jag använder.


			<%
			SQL = "SELECT * FROM tblGalleri"
			Set rs = GetRecordset(SQL)
			iLoop = 0
			
			If NOT rs.EOF Then
				Do until rs.eof
					%>
					<img class="img-border" src="images/green.gif" width="50" height="50">
					<%
					iLoop = iLoop + 1
					If iLoop Mod 4 = 0 Then Response.Write "<br>"
				rs.movenext
				loop
			Else
							
			End If
			rs.Close : Set rs = Nothing
			%>
259 ms totalt · 4 externa anrop · v20260731065814-full.e96017d9
121 ms — deklarationer (db)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)
122 ms — ändringar (db)