Impaginazione orizzontale-galleria

[handina]

Sto utilizzando questo script (vedi sotto) ma vorrei che i risultati apparissero in orizzontale in righe da 4 o 5 immagini per volta. Dopo 4 o 5 immagini va a capo automaticamente e si rincomincia.
Aiutate una povera bimba alle prime armi?

<% 
Dim Path 
'Percorso del database 
Path="/mdb-database/" 
%> 
<script language="JavaScript1.2"> 
{ 
function download(loc) { 

window.open(loc,'Video','width=auto,height=auto'); 

} 
} 
</script> 
<% 
Dim ConnDown 
Set ConnDown=Server.CreateObject("ADODB.Connection") 
ConnDown.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath(path&"download.mdb") 
Dim SQLDown,RECDown 
SQLDown="select * from DOWNLOAD order by NOME" 
Set RECDown=ConnDown.Execute(SQLDown)%> 
<table width="400" border="0" cellspacing="0" cellpadding="3"> 
<% 
While Not RECDown.EOF 
%> 
<tr> 
<td width="100"> 
&path=<%=path%>');">[img]../public/<%=RECDown([/img]" width="100" border="2" style="(border-color:#ffffff;)"></td> 
</tr> 
<tr> 
<td width="121"> 
<p class="blue-bold">vista:<%=RECDown("HIT")%>volte.
 
<a href="javascript:download('popdown.asp?cod=<%=RECDown("COD")%>&path=<%=path%>');"> 
<%=RECDown("NOME")%></p></a></td> 
</tr> 
<% 
RECDown.MoveNext 
WEnd 
RECDown.Close 
ConnDown.Close 
Set RECDown = Nothing 
Set ConnDown = Nothing 
%> 

</table>

[wallrider]

Originariamente inviato da handina
Sto utilizzando questo script (vedi sotto) ma vorrei che i risultati apparissero in orizzontale in righe da 4 o 5 immagini per volta. Dopo 4 o 5 immagini va a capo automaticamente e si rincomincia.
Aiutate una povera bimba alle prime armi ?
...

l'hanno già fatto in tanti, basta cercare "paginazione" (vedi post di mems)

[handina]

Originariamente inviato da wallrider
l'hanno già fatto in tanti, basta cercare "paginazione" (vedi post di mems)

Ovviamente è la prima cosa che ho fatto ma la maggior parte dei codici postati sono arabo per me e non mi ci raccapezzo (oltre al fatto che almeno il 40% dei thread si chiude con un qualcuno che dice di cercare "paginazione"... mi chiedo se avete mai provato a farlo).
Di conseguenza sarei davvero grata se qualcuno mi facesse capire cosa devo modificare nel mio script, come e dove.

[handina]

ma insomma possibile che nessuno sappia come si fa? ma che forum di esperti è???

[wallrider]

invece del while cicla con un for, ogni volta che hai messo il numero di immagini (nel tuo caso 4 o 5) metti un <tr>



PS:Gli esperti del forum di esperti sono diventati esperti perchè hanno studiato o solo smanettato sul codice, non semplicemente mendicato codice

[handina]

Ma scusami sei scemo o non sai leggere?
Ho appena detto che non ci capisco un cavolo e tu mi dici di "ciclare" con for.
Boh.

Riguardo alla tua affermazione non ho molti commenti.
Penso tu sia afflitto della sindrome dell'uomo acculturato che pensa che la propria cultura non debba essere diffusa ma gelosamente custodita affinchè sia preservata la sua elitarietà. E' uno dei primi segni di una profonda insicurezza, fossi in te sentirei uno psicoterapeuta.
per farti riflettere ti dico semplicemente che se tutti gli uomini avessero fatto il tuo ragionamento oggi staremo ancora a chiederci come stradiavolo si accende un fuoco.
Rifletti.

Detto ciò se cortesemente c'è qualche ragazzo intelligente che mi spiega come fare gliene sarò grata. In caso contrario amen e buone cose a tutti.

[michele.santoro]

Prova con questo e ... datti una calmata sei un po' nervosetta mi sembra.

<% 
Dim Path 
'Percorso del database 
Path="mdb-database/" 

' IMPOSTO IL NUMERO DELLE COLONNE CHE POSSO VARIARE A PIACERE
Dim num
num="5"

%> 
<script language="JavaScript1.2"> 
{ 
function download(loc) { 

window.open(loc,'Video','width=auto,height=auto'); 

} 
} 
</script> 
<% 
Dim ConnDown 
Set ConnDown=Server.CreateObject("ADODB.Connection") 
ConnDown.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath(path&"download.mdb") 
Dim SQLDown,RECDown 
SQLDown="select * from DOWNLOAD order by NOME" 
Set RECDown=ConnDown.Execute(SQLDown)%> 
<table width="400" border="1" cellspacing="0" cellpadding="3" bordercolor="#FFFFFF"> 
<% 
' SE CI SONO RECORD NEL DATABASE
          If Not RECDown.EOF Then

         
' APRO LA TABELLA E IMPOSTO LA LARGHEZZA A 120 che è la larghezza della miniatura
' quindi la moltiplico per il numero delle colonne per ottenere la larghezza giusta
' in questo modo aumentando o diminuendo il num delle colonne la tabella si adatterà
' al nuovo numero di celle.

            Response.Write"<table border=1 width=120*num align=center>"
            numeroColonne = 0
            
' CONTO I RS FINO ALLA FINE
             Do Until RECDown.EOF

         

            If numeroColonne Mod num = 0 Then
				
				If numeroColonne <> 0 Then Response.Write"</tr>"
				
	%>			
    <td valign="top"><font face="Verdana"><a href="<%=RECDown("path")%><%=RECDown("FILE")%>">
	<font size="1">[img]<%=RECDown([/img]<%=RECDown("FILE")%>" width="100" height="70" border="0" /></font></a><font size="1">
	</font></font>
    <table>
<p class="blue-bold"><font size="1" face="Verdana">vista: <%=RECDown("HIT")%> volte.
 
</font> 
<a href="java-script:download('popdown.asp?cod=<%=RECDown("COD")%>&path=<%=path%>');"> 
<font size="1" face="Verdana"> 
<%=RECDown("NOME")%></font></a></table></td>

<%


				Else
				%>
				
    <td valign="top"><font face="Verdana"><a href="<%=RECDown("path")%><%=RECDown("FILE")%>">
	<font size="1">[img]<%=RECDown([/img]<%=RECDown("FILE")%>" width="100" height="70" border="0" /></font></a><font size="1">
   
    </font></font>
    <table>
<p class="blue-bold"><font size="1" face="Verdana">vista: <%=RECDown("HIT")%> volte.
 
</font> 
<a href="java-script:download('popdown.asp?cod=<%=RECDown("COD")%>&path=<%=path%>');"> 
<font size="1" face="Verdana"> 
<%=RECDown("NOME")%></font></a></table></td>
<%				End If
				
' PASSO ALLA COLONNA SUCCESSIVA
				numeroColonne = numeroColonne + 1
               
' RS SUCCESSIVO
             RECDown.MoveNext

            Loop
            
' CHIUDO LA TABELLA
            Response.Write"</tr></table>"
            
' CHIUDO IL RS
            RECDown.Close
            Set RECDown = Nothing
            
         
         Else 

 'SE NON CI SONO RECORD SCRIVE UN MESSAGGIO
            Response.Write"IL DATABASE NON CONTIENE RECORD!"
         
         End If

      Response.Write "</body></html>"
   
%>

</table>

Credo sia quello che volevi ... o no?

[wallrider]

Originariamente inviato da handina
Ma scusami sei scemo o non sai leggere?
Ho appena detto che non ci capisco un cavolo e tu mi dici di "ciclare" con for.
Boh.

Riguardo alla tua affermazione non ho molti commenti.
Penso tu sia afflitto della sindrome dell'uomo acculturato che pensa che la propria cultura non debba essere diffusa ma gelosamente custodita affinchè sia preservata la sua elitarietà. E' uno dei primi segni di una profonda insicurezza, fossi in te sentirei uno psicoterapeuta.
per farti riflettere ti dico semplicemente che se tutti gli uomini avessero fatto il tuo ragionamento oggi staremo ancora a chiederci come stradiavolo si accende un fuoco.
Rifletti.

Detto ciò se cortesemente c'è qualche ragazzo intelligente che mi spiega come fare gliene sarò grata. In caso contrario amen e buone cose a tutti.

quante storie perchè non ti ho dato la pappa pronta :rollo:

[handina]

Originariamente inviato da michele.santoro
Prova con questo e ... datti una calmata sei un po' nervosetta mi sembra.
Credo sia quello che volevi ... o no?

Innanzitutto grazie.
Funziona alla grande anche se ho dovuto correggere dei piccoli errori e devo rivedere l'impaginazione perchè la tabella diventa enorme in orizzontale e mi sfasa tutto.
Riguardo al calmarsi ti posso assicurare che sono tranquillissima, mi sto solo godendo le manie di protagonismo del solito idiota che si atteggia a esperto ma penso non sia minimamente in grado di suggerire un bel niente. :ignore:

Anzi, mo gli rispondo anche va.

[handina]

Originariamente inviato da wallrider

quante storie perchè non ti ho dato la pappa pronta :rollo:

E' la riprova: sei scemo.
L'unico ad aver fatto storie sei te, oltretutto non si è nemmeno capito per quale ragione tu abbia risposto al thread dato che
a) non avevi la capacità per risolvere la cosa
b) non avevi (ovvia conseguenza) niente da dire
c) ti rompeva pure i maroni rispondere.

Insomma, un minimo di coerenza ragaSSo. La prossima volta anzichè rispondere ai post di chi chiede una mano semplice semplice, usa la tua (di mano) per giocare con il tuo piccolo amico.