Ciao a tutti, mi succede una cosa strana, devo estrarre, per creare un menù, delle categorie con relative sotto categorie. Il risultato dello script funziona solo che mi moltiplica le sotto categorie.
Es: Il numero è la categoria.
20 ) Alimentari
- 20 ) Marmellata
- 20 ) Marmellata
- 20 ) Banane
- 20 ) Banane
22 ) Bellezza
- 22 ) Crema di bellezza
- 22 ) Crema di bellezza
codice ___________________________________________________________
sqlCat = "Select IdCategoria, categoria From categorie"
Set rsCat = Server.CreateObject("ADODB.Recordset")
rsCat.CursorType = adOpenStatic
rsCat.Open sqlCat, conn, 3,3
numero = rsCat.RecordCount
for i = 0 TO numero
Response.Write (rsCat("IdCategoria"))
Response.Write (" ")
Response.Write (" ")
Response.Write rsCat("categoria")
Response.Write ("<br>")
sql = "Select categorie.IdCategoria, articoli.IdCategoria, articoli.titolo from categorie, articoli WHERE articoli.IdCategoria ="&rsCat("IdCategoria")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType = adOpenStatic
rs.Open sql, conn, 3,3
n = rs.RecordCount
do while not rs.EOF
Response.Write (" - ")
Response.Write (rs("IdCategoria"))
Response.Write (" ")
Response.Write (" ")
Response.Write rs("titolo")
Response.Write ("<br>")
rs.MoveNext
loop
rsCat.MoveNext
i=i+1
next
_______________________
chiedo aiuto!!
il risultato dovrebbe essere:
20 ) Alimentari
- 20 ) Marmellata
- 20 ) Banane
22 ) Bellezza
- 22 ) Crema di bellezza
Es: Il numero è la categoria.
20 ) Alimentari
- 20 ) Marmellata
- 20 ) Marmellata
- 20 ) Banane
- 20 ) Banane
22 ) Bellezza
- 22 ) Crema di bellezza
- 22 ) Crema di bellezza
codice ___________________________________________________________
sqlCat = "Select IdCategoria, categoria From categorie"
Set rsCat = Server.CreateObject("ADODB.Recordset")
rsCat.CursorType = adOpenStatic
rsCat.Open sqlCat, conn, 3,3
numero = rsCat.RecordCount
for i = 0 TO numero
Response.Write (rsCat("IdCategoria"))
Response.Write (" ")
Response.Write (" ")
Response.Write rsCat("categoria")
Response.Write ("<br>")
sql = "Select categorie.IdCategoria, articoli.IdCategoria, articoli.titolo from categorie, articoli WHERE articoli.IdCategoria ="&rsCat("IdCategoria")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType = adOpenStatic
rs.Open sql, conn, 3,3
n = rs.RecordCount
do while not rs.EOF
Response.Write (" - ")
Response.Write (rs("IdCategoria"))
Response.Write (" ")
Response.Write (" ")
Response.Write rs("titolo")
Response.Write ("<br>")
rs.MoveNext
loop
rsCat.MoveNext
i=i+1
next
_______________________
chiedo aiuto!!
il risultato dovrebbe essere:
20 ) Alimentari
- 20 ) Marmellata
- 20 ) Banane
22 ) Bellezza
- 22 ) Crema di bellezza