LOOP for eksperten

Jeg har en database hvor jeg skal have trukket nogle menupunkter ud, så det vises som det ser ud nedenfor

Databasen indeholder felterne: PageID, ParentPageID, MenuText, PageLevel.
-------------------------------------------------------------

'************
'Der skal først udskrives alle hovedpunkter, dvs. hvor ParentPageID = 0

with(wi=new menuname("Main")){
style=MenuStyleLevelOne;
itemwidth=80;
itemheight=34;
alwaysvisible=1;
orientation="horizontal";
aI("text=Link1;showmenu=Link1;url=Index.asp?ID=5;");
aI("text=Link2;showmenu=Link2;url=Index.asp?ID=10;");
aI("text=Link3;showmenu=Link3;url=Index.asp?ID=11;");
aI("text=Link4;showmenu=Link4;url=Index.asp?ID=12;");
aI("text=Link5;showmenu=Link5;url=Index.asp?ID=13;");
aI("text=Link6;showmenu=Link6;url=Index.asp?ID=14;");
}


'************
'Dernæst udskrives underpunkterne til Link 1 - dvs. niveau 2

with(wi=new menuname("Link1")){
style=MenuStyleLevelTwo;
itemwidth=150;
subimage="arrow.gif";
aI("text=Link1a;url=Index.asp?ID=15;");
aI("text=Link1b;url=Index.asp?ID=16;");
}


'************
'Hvis der er et underpunkt, dvs. et tredie niveau til et af underpunkterne,
'sættes der kommandoen "showmenu="  ind i menupunktet.


with(wi=new menuname("Link2")){
style=MenuStyleLevelTwo;
itemwidth=150;
subimage="arrow.gif";
aI("text=Link2a;url=Index.asp?ID=23;");
aI("text=Link2b;showmenu=Link2b1;url=Index.asp?ID=10;subimage=arrow.gif;");
aI("text=Link2c;url=Index.asp?ID=25;");
aI("text=Link2d;url=Index.asp?ID=26;");
aI("text=Link2e;url=Index.asp?ID=27;");
aI("text=Link2f;url=Index.asp?ID=28;");
aI("text=Link2g;url=Index.asp?ID=29;");
}

'************
'Her udskrives det 3. niveau - dvs. underpunkter til Link2b

with(wi=new menuname("Link2b1")){
style=MenuStyleLevelTwo;
itemwidth=150;
subimage="arrow.gif";
aI("text=Link2b1;url=Index.asp?ID=70;");
aI("text=Link2b2;url=Index.asp?ID=56;");
}

'************
'Scriptet fortsætter med de andre punkter for niveau 2

with(wi=new menuname("Link3")){
style=MenuStyleLevelTwo;
itemwidth=150;
subimage="arrow.gif";
aI("text=Link3a;url=Index.asp?ID=30;");
aI("text=Link3b;url=Index.asp?ID=31;");
aI("text=Link3c;url=Index.asp?ID=32;");
aI("text=Link3d;url=Index.asp?ID=82;");
aI("text=Link3e;url=Index.asp?ID=33;");
aI("text=Link3f;url=Index.asp?ID=34;");
}

-----------------------------------------------
Jeg har forsøgt at lave arrays, rekursive funktioner, men er kørt helt fast.
Så jeg håber, at nogen kan hjælpe...