impaginazione immagini da server

[RobertoBel]

Ciao vorrei impaginare in una tabella delle immagini caricate su un server, ilmpercorso e la descrizione sono salvate su un database, quindi costruisco un array col cilo DO WHILE / LOOP

Do while not  Rs.EOF 

     perimg = array(Rs("percorso"))     
    descimg = array(Rs("descrizioneimg"))  

 Rs.MoveNext    
 Loop

Dopodiche scarico l'array all'interno della tabella

 for ii = 0 to Ubound(perimg)
  
  Response.Write"<tr>"
   
       Response.Write"<td align='center' width='33%'>[img]"& perimg(ii) &"[/img]
<h2 align='center'><font color='#2A1F55' size='3'>"& descimg(ii) &"</font></h2></td>" 	  
            ii = ii + 1
       Response.Write"<td align='center' width='33%'>[img]"& perimg(ii) &"[/img]
<h2 align='center'><font color='#2A1F55' size='3'>"& descimg(ii) &"</font></h2></td>" 	  
            ii = ii + 1 
       Response.Write"<td align='center' width='33%'>[img]"& perimg(ii) &"[/img]
<h2 align='center'><font color='#2A1F55' size='3'>"& descimg(ii) &"</font></h2></td>" 	  
            ii = ii + 1
  Response.Write"</tr>"
  
  next

il problema è che mi da come errore " error '80020009' "

potete aiutarmi
saluti Roberto

[Roby_72]

Perché usare un array se poi lo devi riusare subito?
Scrivi direttamente la tabella con i dati del db.

Roby

[RobertoBel]

Ho gia provato a passare i dati delle immagini direttamente sulla tabella, siccone vorrei che fossero in righe da tre, cosa succede che mi copia una foto tre volte, ti passo il codice che ho usato.

saluri Roberto

 
Response.Write"<table bgcolor='#FFDF00' align='center' border='0' width='100%'>"

Do while not  Rs.EOF
  Response.Write"<tr>"
   
    Response.Write"<td align='center' width='33%'>[img]"& Rs("percorso") &"[/img]
<h2 align='center'><font color='#2A1F55' size='3'>"& Rs("descrizioneimg") &"</font></h2></td>" 	  
 
    Response.Write"<td align='center' width='33%'>[img]"& Rs("percorso") &"[/img]
<h2 align='center'><font color='#2A1F55' size='3'>"& Rs("descrizioneimg") &"</font></h2></td>" 	  
 
    Response.Write"<td align='center' width='33%'>[img]"& Rs("percorso") &"[/img]
<h2 align='center'><font color='#2A1F55' size='3'>"& Rs("descrizioneimg") &"</font></h2></td>" 	  

  Response.Write"</tr>"
  Rs.MoveNext
    Loop			
Response.Write"</table>"

[Roby_72]

Per scrivere l'array incrementi l'indice, per scrivere dal db devi fare una cosa analoga utilizzando un contatore.
Ragionaci.

Roby

[RobertoBel]

L'unica possibilità di usare un contatore l'ho pensata cosi, ma non funziona, oppure c'è qualcosa da rivedere, puoi dargli un occhiata.

saluti Roberto

 Response.Write"<table bgcolor='#FFDF00' align='center' border='0' width='100%'>"  
  
  conta = 0
  
  Do while not  Rs.EOF
  Response.Write"<tr>"
   
    Response.Write"<td align='center' width='33%'>[img]"& Rs("percorso") &"[/img]
<h2 align='center'><font color='#2A1F55' size='3'>"& Rs("descrizioneimg") &"</font></h2></td>" 	  
 conta = conta + 1
  if conta = 3 then  
  Response.Write"</tr>"
  conta = 0
  end if
  
  Rs.MoveNext
    Loop			
Response.Write"</table>"

[Roby_72]

Basta che guardi l'HTML risultante e te ne accorgi.
La riga (tr) la devi aprire quando il contatore vale 0 oppure 3, 6, 9, ecc... e così le chiusure.
Se le immagini non sono multiple di tre dovrai mettere colonne vuote alla fine e chiudere la riga.

Roby

[cavicchiandrea]

Vedo che non hai seguito il mio consiglio che t'ho dato qui