image random

[benete]

ciao ragazzi , riporto questo pezzo di codice che mi genera 3 immagini una sotto l'altra , come faccio ad aggiungere le colonne ?

vorrei avere 3 righe e 3 colonne di immagini random


grazieeeeeeeeeeeeeeeee



<table >
<tr>
<%
strAccessDB = "mdb-database/utenti.mdb"
Set Conn = Server.CreateObject("ADODB.Connection")
strCon = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(strAccessDB)
Conn.Open strCon
Set rs = Server.CreateObject("ADODB.Recordset")
query = "SELECT * FROM listFiles"
rs.Open query,Conn,3,3
if not rs.EOF then
N = 3
Randomize
max = rs.RecordCount-1
redim arr(max)
for i=0 to max
arr(i)=i
next
for i=0 to max
casuale = Int((max)*Rnd)
temp = arr(i)
arr(i) = arr(casuale)
arr(casuale) = temp
next
for i=0 to N-1
rs.Move arr(i)
Dim images
images= rs("DestFileName")

%>
<td>[img]<%=images%>[/img]</td>
<%
rs.MoveFirst
next
end if
%>
</tr>
</table>

[Mizushi]

Spero che qualcuno ti capisca: io non ci riesco.

[benete]

vorrei semplicemente pescare dal mio database il percorso di alcune immagini con il sistema random ..

e vorrei ordinarle dentro una tabella.. con delle colonne e delle righe...

ma come ho fatto io non ci sono le colonne .. quindi le immagini me le visualizza una di seguito all'altra..

sono stato + chiaro ? scusate...

[wallrider]

a dire il vero non ci sono le righe

potresti postare il codice usando il tasto #

[benete]

<table >
<tr>
<%
strAccessDB = "mdb-database/utenti.mdb"
Set Conn = Server.CreateObject("ADODB.Connection")
strCon = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(strAccessDB)
Conn.Open strCon
Set rs = Server.CreateObject("ADODB.Recordset")
query = "SELECT * FROM listFiles"
rs.Open query,Conn,3,3
if not rs.EOF then
N = 3
Randomize
max = rs.RecordCount-1
redim arr(max)
for i=0 to max
arr(i)=i
next
for i=0 to max
casuale = Int((max)*Rnd)
temp = arr(i)
arr(i) = arr(casuale)
arr(casuale) = temp
next
for i=0 to N-1
rs.Move arr(i)
Dim images
images= rs("DestFileName")

%>
<td>[img]<%=images%>[/img]</td>
<%
rs.MoveFirst 
next
end if
%>
</tr>
</table>