Robycodice:strSQL="SELECT pagina, notizia FROM newslinks group by categoria,pagina, notizia"
Robycodice:strSQL="SELECT pagina, notizia FROM newslinks group by categoria,pagina, notizia"
www.creamweb.it [v. 3.0]
:: Script ASP!
:: Web directory gratuita!
:: Campioni del mondo!
Funziona ma incolonna le categorie in orizzontale e non in verticaleOriginariamente inviato da Roby_72
Robycodice:strSQL="SELECT pagina, notizia FROM newslinks group by categoria,pagina, notizia"
http://www.cischi.com/incolonna2.asp
Devi chiudere la riga all'interno del ciclo: </TR>
Roby
www.creamweb.it [v. 3.0]
:: Script ASP!
:: Web directory gratuita!
:: Campioni del mondo!
Scusami sono veramente una catastrofe ho messo il </tr> in ogni dove ed in quantita ma non riesco ad ottenere ciò che voglio al momento sono messo così e non va bene, mi rida una sorta di lettura ad elle e poi riprende come prima, inoltre domanda extra è possibile visualizzare la categoria sopra ogni gruppo?Originariamente inviato da Roby_72
Devi chiudere la riga all'interno del ciclo: </TR>
Roby
Grazie mille e scusatemi.
<TABLE>
<tr><%do While not RS.EOF%>
<td><% link=rs("notizia")%><%=link%></td>
<% rs.MoveNext
if rs.eof then %><% rs.close
exit do
end if %></tr>
<td><% link=rs("notizia")%><%=link%></td>
<td><% RS.MoveNext %></td>
<td><% link=rs("notizia")%><%=link%></td>
<td><% RS.MoveNext %><% loop %></td>
</TABLE>
Cancella tutto e ricomincia.
Ogni volta che vuoi andare a capo devi chiudere la riga ed aprire una colonna.
Fallo su carta e poi scrivi il codice.
Roby
www.creamweb.it [v. 3.0]
:: Script ASP!
:: Web directory gratuita!
:: Campioni del mondo!
Caro omonimo mi hai letteralmente terrorizzatoOriginariamente inviato da Roby_72
Cancella tutto e ricomincia.
Ogni volta che vuoi andare a capo devi chiudere la riga ed aprire una colonna.
Fallo su carta e poi scrivi il codice.
Roby
Quindi visto che sulla base delle tue indicazioni iniziali di visitare questa discussione http://forum.html.it/forum/search.p...&sortorder= su cui avrei trovato materiale, ho trovato e provato anche altro codice che solo adesso sono riuscito a far comparire sotto forma di link, ti espongo questo nuovo codice e ti faccio una sola domanda.
Su questo codice come posso far apparire sopra ogni gruppo di link la categoria a cui appartengono?
<%
Set cn=Server.CreateObject("ADODB.Connection")
cn.Open = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("news.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
strSQL="SELECT notizia, pagina, categoria FROM newslinks order by categoria"
rs.Open strSQL,cn,0,1
arrdati=rs.getrows()
rs.close
set rs=nothing
cn.close
set cn=nothing
response.write "<table><tr><td>"
for conta=0 to ubound(arrdati,2)
response.write "" & arrdati(0,conta) & ""
if ((conta+1) mod 4)=0 then
response.write "</td><td>"
else
response.write "
"
end if
next
response.write "</td></tr></table>"
erase arrdati
%>
Comunque grazie di tutto, soprattutto della pazienza.
Comunque ho provato a fare ciò che mi hai detto di fare e se ho ben capito, questo è il codice riscritto.
<TABLE>
<%do While not RS.EOF%>
<td align="left"><%=rs("categoria")%></td>
<tr><td><% link=rs("notizia")%><%=link%><% rs.MoveNext %></td></tr>
<tr><td><% link=rs("notizia")%><%=link%><% RS.MoveNext %></td></tr>
<tr><td><% link=rs("notizia")%><%=link%><% RS.MoveNext %></td></tr>
<td><%if rs.eof then %><% rs.close
exit do
end if %><% loop %></td>
</TABLE>
Ma se è questo che intendevi, ho perso ciò che volevo ottenere e cioè le tre colonne.
http://www.cischi.com/incolonna2.asp
Ho inserito le categorie sopra i link solo che me le ripete su ogni riga sapete come modificare questo script per visualizzarle sul gruppo?
Il pezzo in grassetto è la visualizzazione delle categorie.
<%
Set cn=Server.CreateObject("ADODB.Connection")
cn.Open = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("news.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
strSQL="SELECT notizia, pagina, categoria FROM newslinks order by categoria"
rs.Open strSQL,cn,0,1
arrdati=rs.getrows()
rs.close
set rs=nothing
cn.close
set cn=nothing
response.write "<table><tr><td>"
for conta=0 to ubound(arrdati,2)
field = arrdati(2,conta)
response.write field
response.write "
"
response.write "" & arrdati(0,conta) & ""
if ((conta+1) mod 4)=0 then
response.write "</td><td>"
else
response.write "
"
end if
next
response.write "</td></tr></table>"
erase arrdati
%>
Devi stamparle solo quando cambiano.
Imposta la categoria a "" all'inizio.
Se quella che estrai dal db è diversa la stampi altrimenti no.
Roby
www.creamweb.it [v. 3.0]
:: Script ASP!
:: Web directory gratuita!
:: Campioni del mondo!
Scusami ma non ho capito, potresti gentilmente spiegarmi meglio?Originariamente inviato da Roby_72
Devi stamparle solo quando cambiano.
Imposta la categoria a "" all'inizio.
Se quella che estrai dal db è diversa la stampi altrimenti no.
Roby
La padronanza che ho del linguaggio è abbastanza relativa.
Grazie mille![]()