Products

Solutions

Resources

Partners

Community

Blog

About

QA

Ideas Test

New Community Website

Ordinarily, you'd be at the right spot, but we've recently launched a brand new community website... For the community, by the community.

Yay... Take Me to the Community!

Welcome to the DNN Community Forums, your preferred source of online community support for all things related to DNN.
In order to participate you must be a registered DNNizen

HomeHomeDevelopment and...Development and...Getting StartedGetting StartedCreating Child Pages with VB.NEtCreating Child Pages with VB.NEt
Previous
 
Next
New Post
11/23/2010 3:53 PM
 
I have a website.. with in it i create a module that programmatically adds a new page when an event  is fired.. I am wondering if there is a way to add child pages programmatically  instead of clustering the menu with links?
 
New Post
11/23/2010 8:26 PM
 
I haven't tried to create a page in code in a number of years but you likely would use the TabController to create pages. If you pass in settings you can turn off pages from the Menu, so they don't clutter things up there. Do you already have working code for creating the pages as you state in your post?

Chris Hammond
Former DNN Corp Employee, MVP, Core Team Member, Trustee
Christoc.com Software Solutions DotNetNuke Module Development, Upgrades and consulting.
dnnCHAT.com a chat room for DotNetNuke discussions
 
New Post
11/24/2010 9:21 AM
 
I got it working.. this was my resulting code:

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click


            Dim tabCntrl As New TabController()
            Dim tabInfo As New TabInfo()


            Dim tabInfoParent As New TabInfo
            tabInfoParent = tabCntrl.GetTab(tabInfo.ParentId, PortalId, True)


            With tabInfo
                .ParentId = 93
                .PortalID = PortalId
                .TabName = "page"
                .Title = "my tab title"
                .Description = "my description"
                .KeyWords = "my keywords"
                .IsDeleted = False
                .IsSuperTab = False
                .IsVisible = True
                .DisableLink = False
                .IconFile = ""
                .Url = ""
            End With


            Dim intNewTabID As Integer
            intNewTabID = tabCntrl.AddTab(tabInfo)


            SetPermission()


            DataCache.ClearTabsCache(PortalId)


        End Sub


        Protected Sub SetPermission()
            Dim tabController As New DotNetNuke.Entities.Tabs.TabController()
            Dim infPermission As New DotNetNuke.Security.Permissions.TabPermissionInfo()
            Dim permissionProvider As DotNetNuke.Security.Permissions.PermissionProvider = DotNetNuke.Security.Permissions.PermissionProvider.Instance()


            With infPermission
                .AllowAccess = True
                .RoleID = -1
                .TabID = TabId
                .PermissionID = 3
            End With


            Dim tabInfo As DotNetNuke.Entities.Tabs.TabInfo = tabController.GetTabByName("page", Me.PortalId)


            Dim permissions As DotNetNuke.Security.Permissions.TabPermissionCollection = tabInfo.TabPermissions
            permissions.Add(infPermission, True)


            permissionProvider.SaveTabPermissions(tabInfo)


        End Sub
 
Previous
 
Next
HomeHomeDevelopment and...Development and...Getting StartedGetting StartedCreating Child Pages with VB.NEtCreating Child Pages with VB.NEt


These Forums are dedicated to discussion of DNN Platform and Evoq Solutions.

For the benefit of the community and to protect the integrity of the ecosystem, please observe the following posting guidelines:

  1. No Advertising. This includes promotion of commercial and non-commercial products or services which are not directly related to DNN.
  2. No vendor trolling / poaching. If someone posts about a vendor issue, allow the vendor or other customers to respond. Any post that looks like trolling / poaching will be removed.
  3. Discussion or promotion of DNN Platform product releases under a different brand name are strictly prohibited.
  4. No Flaming or Trolling.
  5. No Profanity, Racism, or Prejudice.
  6. Site Moderators have the final word on approving / removing a thread or post or comment.
  7. English language posting only, please.
What is Liquid Content?
Find Out
What is Liquid Content?
Find Out
What is Liquid Content?
Find Out