da una colonna a 3

[kronos23]

Ciao a tutti

allora:

Ho questo codice che estrae dalla banca dati le immagini e fin li tutto bene! me le mette in colonna verticale e fin li ok tutto funge! ma se voglio farle apparire su 3 colonne????

Spiego meglio :

Repeat=1
Do Until rs.EOF
While ((Repeat <> 0) AND (NOT Rs.EOF))

<p align="center">[img]../db/img/<%=RS( [/img]" height="216">

' tira fuori le immy

Repeat=Repeat -1
Rs.MoveNext()
Wend

Repeat=1
Loop

Come devo fare per far apparire ste immagini su 3 colonne in verticale e non solo una????

[weppos]

Usa un contatore e la matematica.
Incrementa il contatore ad ogni record e calcola il modulo del resto della divisione con 3.

Se è 0 allora mandi a capo.
L'output sarà 3 elementi per riga (ovvero 3 colonne).

[kronos23]

Me lo spieghi con meglio??? Cosa dovrei fare????

[weppos]

Originariamente inviato da kronos23
Me lo spieghi con meglio??? Cosa dovrei fare????

Cosa non hai capito?
Il punto base è: usa un contatore per gestirti le colonne.
Il suggerimento all'implementazione è: sfrutta mod per non inserire centinaia di if inutili.

[kronos23]

non saprei da dove cominciare a farlo...

[weppos]

Originariamente inviato da kronos23
non saprei da dove cominciare a farlo...

Ma conosci ASP? :master:

[kronos23]

Non moltissimo diciamo !! Considera pure che era mesi e mesi che non toccavo asp e che devo fare solo questa piccola modifica! Scusami se ti creo tutto sta noia....

[maximum]

<%
Cella = 1 
Voto = 1
NumRec = 1

Do until objrs.eof 
	
   If Cella = 1 Then 
      Response.Write "<tr>" 
   end if 
	
   Response.Write "<td width='120'> <div align='right' class='linkpiccoli'><font color='#454545'>" & objrs("Valore") & "</font> "
   Response.Write "</div></td>" 
	
   Cella = Cella + 1 

   If Cella = 3 Then 
      Response.Write "</tr>" 
      Cella = 1 
   end if 
		
   objrs.movenext

Loop
%>

[kronos23]

<%

Cella = 1

Do until rs.eof

If Cella = 1 Then
Response.Write "<tr>"
end if

Response.Write "<td width='120'> <div align='right'><font color='#454545'>" & rs("A_fotop") & "</font> "
Response.Write "</div></td>"

Cella = Cella + 1

If Cella = 3 Then
Response.Write "</tr>"
Cella = 1
end if

rs.movenext

Loop
%>

Questo non funge!!!! è sempre e solo una colonna sola!!!! HELP MEEEEEEEEEE

[maximum]

A me funziona.
Sicuro di averlo inserito correttamente?