I'm just learning how to use VS2005 for DNN modules...  There are two things that I've been scratching my head about for over a week now, and I am thinking they are relatively simple things to do, but I'm still stuck... 

1.  When creating a new item to insert into a table, I want one of the options to be a list of items from another table.  When writing .asp pages, I would simply throw a query into the page to input contents from that table into a listbox.  I cannot figure out how to do that in DNN though.

2.  Similar to that previous problem, I want another option (when inserting) to display a list of members of a security role to choose from.  I'm not entirely sure this is possible, but it seems like it should be.

Does anyone have a quick way to show me how to do this? 

 

Regarding #2, here's a section of code where I obtain all uses being in one or more roles to which a custom permission has been assigned, rejecting any duplicates, removing from the list those users already appearing in a GridView of assigned users (in this case moderators), and then bind the remaining users to a drop down list. Note particularly the use of the DotNetNuke.Security.Roles.RoleController.GetUsersByRoleName method:

Private Sub FillAvailableModeratorsDDL()
            Dim arrAvailable As New ArrayList
            Dim arrAssigned As New ArrayList
            Dim mpc As New DotNetNuke.Security.Permissions.ModulePermissionController
            Dim rc As New DotNetNuke.Security.Roles.RoleController
            Dim mp As DotNetNuke.Security.Permissions.ModulePermissionInfo
            For Each mp In mpc.GetModulePermissionsCollectionByModuleID(ModuleId, TabId)
                If mp.PermissionCode = Permission.Code And mp.PermissionKey = Permission.ModerateKey Then
                    Dim RoleName As String = mp.RoleName
                    For Each ui As Entities.Users.UserInfo In rc.GetUsersByRoleName(PortalId, RoleName)
                        Dim li As New ListItem(ui.DisplayName, ui.UserID)
                        If Not arrAvailable.Contains(li) Then arrAvailable.Add(li)
                    Next
                End If
            Next
            Dim i As Integer = arrAvailable.Count - 1
            If gvModerators.DataKeys.Count > 0 Then
                Do While i >= 0
                    Dim li As ListItem = CType(arrAvailable.Item(i), ListItem)
                    Dim j As Integer = 0
                    Do While j < gvModerators.DataKeys.Count
                        Dim dk As DataKey = gvModerators.DataKeys(j)
                        If li.Value = dk.Value.ToString Then
                            arrAvailable.Remove(li)
                            Exit Do
                        End If
                        j += 1
                    Loop
                    i -= 1
                Loop
            End If
            With ddlAvailableModerators
                .DataSource = arrAvailable
                .DataBind()
                .Items.Insert(0, New ListItem(Localize("Select_New_Moderator"), 0))
            End With
            cmdAddModerator.Enabled = arrAvailable.Count > 0
        End Sub

---

Bill, WESNet Designs
Team Lead - DotNetNuke Gallery Module Project (Not Actively Being Developed)
Extensions Forge Projects . . .
Current: UserExport, ContentDeJour, ePrayer, DNN NewsTicker, By Invitation
Coming Soon: FRBO-For Rent By Owner