For det første (skal lige spørge...):
- Har du oprettet forbindelse til din database?
- Henter du fra de rigtige tabeller?
Hvis de ovenstående er klaret, så kan jeg da ikke se hvorfor det ikke skulle virke.
Ellers er det vel bare derudaf :
<%
set conn = server.createobject("ADODB.connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("menu.mdb")
conn.open DSN
%>
Nu ved jeg ikke hvordan din tabel ser ud, men jeg antager følgende:
create table tbl_menu (
id int primary key,
tekst varchar(255) not null,
parent_id int,
FOREIGN KEY(parent_id) REFERENCES tbl_menu(id)
);
Her kan du undgå at lave en tabel med under punkter, da du bare refererer til et andet menupunkt, som man selv er underpunkt til.Derefter er det bare at hente data ud:
<%
strSQL = "SELECT * from tbl_menu"
set rs = conn.execute(strSQL)
do while NOT rs.EOF
' Du kan lige tjekke på om den har et parent id, og hvorhenne
' dette id ligger, så kan du ellers lave lidt mellemrum for at
' lave "underpunkter".
Response.Write(rs("tekst"));
rs.moveNext
loop
%>
Har du forresten tænkt dig at lave en database for hver tabel du ønsker at oprette?
Det skal lige siges at koden er utestet, og at det er 5 år siden jeg sidst rodede med asp -------------------------------
Hilsen Jimmi Westeberg
http://www.westsworld.dk /
http://www.aktivudvikler.dk