New Post: Private products

        Public Shared Function IsDealer(ByVal PortalID As Integer, ByVal UserInfo As DotNetNuke.Entities.Users.UserInfo, ByVal Lang As String) As Boolean
            Dim DealerRole As String = GetStoreSetting(PortalID, "dealer.role", Lang)
            Dim DealerRole2 As String = GetStoreSetting(PortalID, "dealer.role2", Lang)
            If UserInfo.IsInRole(DealerRole) And DealerRole <> "" Then
                Return True
            ElseIf UserInfo.IsInRole(DealerRole2) And DealerRole2 <> "" Then
                Return True
            Else
                Return False
            End If
        End Function