Sto cercando di creare uno script ASP che mi estragga i records contenuti in una tabella "categorie" SQL-Server.
La tabella è gerarchica per mezzo di 2 campi:
1) MenuId (contatore)
2) ParentId (int)
se ParentId = 0 allora è padre, se è presente uno degli ID del campo MenuId allora è figlio.
Detto questo sto cercando di creare uno script che mi stampi (Response.Write) a video tutto il menu organizzatto in gerarchia.
Ecco la bozza di codice dove mi sono arenato. Vi avverto che è piena di errori, bisogna riorganizzarla:
************************************************** ***************************
<%
strSql ="SELECT * FROM vistaCategorie WHERE lang='it';"
Call prendiRecordset()
Call leggiMenu()
'------------------------------------------------------------------------
Public Sub leggiMenu()
Dim arrayRecordset
arrayRecordset=objRs.GetRows()
While Not objRs.Eof
For Each figlio in arrayRecordset
If objRs("ParentId") = figlio Then
Response.Write "[*]" & objRs("MenuName") & ""
Else
leggiMenu(figlio) 'ricorsione
End If
Next
objRs.MoveNext
Wend
End Sub
'------------------------------------------------------------------------
************************************************** ***************************
Grazie a tutti

Rispondi quotando