G
Guest
Hi
Can some one please help me! I want to use a database to build a menu programatically using a loop! The idea is I have a database with the following fields
menuI
name
ur
leve
parentI
I want to create a menu from these fields that looks something like this
If (Page.IsPostBack = False) The
Dim submenu1 As New skmMenu.MenuItem("<img src=""images/menublip.gif"" align=""absmiddle"">Home", ""
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 1", "page1.html")
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 2", "page2.html")
Dim submenu3 As New skmMenu.MenuItem("Sub Item 3 ->", ""
submenu3.SubItems.Add(New skmMenu.MenuItem("Sub Item 3 - 1", "page1.html")
submenu3.SubItems.Add(New skmMenu.MenuItem("Sub Item 3 - 2", "page2.html")
submenu1.SubItems.Add(submenu3
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 4", "page4.html")
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 5", "page5.html")
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 6", "page6.html")
Menu1.Items.Add(submenu1
Dim submenu2 As New skmMenu.MenuItem("<img src=""images/menublip.gif"" align=""absmiddle"">Office", ""
submenu2.SubItems.Add(New skmMenu.MenuItem("Sub Item 1", "page3.html", "tooltip1")
submenu2.SubItems.Add(New skmMenu.MenuItem("Sub Item 2", "page4.html", "tooltip2")
Menu1.Items.Add(submenu2
Menu1.CssClass = "menustyle
Menu1.DefaultCssClass = "menuitem
Menu1.DefaultMouseOverCssClass = "mouseover
Menu1.HighlightTopMenu = Tru
Menu1.Opacity = 7
Menu1.zIndex = 10
End I
The idea is that a menu is generated automatically from the database so you end up with something similar to this
MenuItem
SubItem
SubItem
SubItem
SubItem3-
SubItem3-
SubItem3-
MenuItem
SubItem
SubItem
SubItem
Thanks for any help!
Can some one please help me! I want to use a database to build a menu programatically using a loop! The idea is I have a database with the following fields
menuI
name
ur
leve
parentI
I want to create a menu from these fields that looks something like this
If (Page.IsPostBack = False) The
Dim submenu1 As New skmMenu.MenuItem("<img src=""images/menublip.gif"" align=""absmiddle"">Home", ""
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 1", "page1.html")
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 2", "page2.html")
Dim submenu3 As New skmMenu.MenuItem("Sub Item 3 ->", ""
submenu3.SubItems.Add(New skmMenu.MenuItem("Sub Item 3 - 1", "page1.html")
submenu3.SubItems.Add(New skmMenu.MenuItem("Sub Item 3 - 2", "page2.html")
submenu1.SubItems.Add(submenu3
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 4", "page4.html")
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 5", "page5.html")
submenu1.SubItems.Add(New skmMenu.MenuItem("Sub Item 6", "page6.html")
Menu1.Items.Add(submenu1
Dim submenu2 As New skmMenu.MenuItem("<img src=""images/menublip.gif"" align=""absmiddle"">Office", ""
submenu2.SubItems.Add(New skmMenu.MenuItem("Sub Item 1", "page3.html", "tooltip1")
submenu2.SubItems.Add(New skmMenu.MenuItem("Sub Item 2", "page4.html", "tooltip2")
Menu1.Items.Add(submenu2
Menu1.CssClass = "menustyle
Menu1.DefaultCssClass = "menuitem
Menu1.DefaultMouseOverCssClass = "mouseover
Menu1.HighlightTopMenu = Tru
Menu1.Opacity = 7
Menu1.zIndex = 10
End I
The idea is that a menu is generated automatically from the database so you end up with something similar to this
MenuItem
SubItem
SubItem
SubItem
SubItem3-
SubItem3-
SubItem3-
MenuItem
SubItem
SubItem
SubItem
Thanks for any help!