asp.net et reporting services

Version imprimable

06/07/2007, 14h46
deathsurfer

asp.net et reporting services

Salut!
Je développe une page web afin d'ajouter un groupe à une application reporting services.Exemple:
Je sélectionne dans la combobox le groupe A
Je sélectionne dans la combobox le dossier-application B
Je clique sur valider
A peut accéder à B, les autres groupes non.
Je sais que le portail Reporting Services le fait mais je souhaiterai que mon application web le fasse aussi.
Existe-t-il une API? Sinon quels sont les objets à utiliser?
Merci d'avance à tous!
06/07/2007, 16h14
Mehdi Feki

C'est chaud ce que tu veux faire :)

je ne crois pas que c'est possible, Report Manager est une sort de black box non extensible.
09/07/2007, 11h11
deathsurfer

Grace au logiciel reflector j'ai pu décompiler l'assembly "ReportingServicesWebUserInterface.dll" qui apparement contient les méthode permettant de gérer la sécurité dans reporting services à la manière de report manager (création/suppression de rôles etc...). Est ce possible d'ajouter cette assembly a mon projet ou faut-il que je copie-colle tout ce qui m'interesse?
11/07/2007, 12h05
deathsurfer

J'ai trouvé si ca intéresse quelqu'un laisser un message ici!
11/07/2007, 12h10
Mehdi Feki

Moi je veux bien :mouarf2:

et l'autre thread aussi m'interesse Reporting services et new role assignment

En fait c'est le même sujet :lol:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 Dim rs As New Microsoft.SqlServer.ReportingServices2005.ReportingService2005
        rs.Credentials = System.Net.CredentialCache.DefaultCredentials()
        Dim Item As String = "/"
        Dim machin() As Microsoft.SqlServer.ReportingServices2005.Policy
        Dim Policies(0) As Microsoft.SqlServer.ReportingServices2005.Policy
        Dim newPolicies() As Microsoft.SqlServer.ReportingServices2005.Policy
        Policies(0) = New Microsoft.SqlServer.ReportingServices2005.Policy
        Policies(0).GroupUserName = DropDownList1.SelectedItem.Text
        Policies(0).Roles = New Microsoft.SqlServer.ReportingServices2005.Role(0) {}
        Policies(0).Roles(0) = New Microsoft.SqlServer.ReportingServices2005.Role
        Policies(0).Roles(0).Name = ListBox1.SelectedItem.Text
        machin = rs.GetPolicies(Item, True)
        newPolicies = AddNewPolicy(Policies(0), machin)
        rs.SetPolicies(Item, newPolicies)
    End Sub
 
    Private Function AddNewPolicy(ByVal policyToAdd As Microsoft.SqlServer.ReportingServices2005.Policy, ByVal policies() As Microsoft.SqlServer.ReportingServices2005.Policy) As Microsoft.SqlServer.ReportingServices2005.Policy()
        If Not (policies Is Nothing) Then
            Dim policy As Microsoft.SqlServer.ReportingServices2005.Policy
            For Each policy In policies
                If policy.GroupUserName = policyToAdd.GroupUserName Then
                    Throw New Exception("L'autorisation existe déjà pour ce groupe")
                End If
            Next policy
            Dim list As New System.Collections.ArrayList(policies)
            list.Add(policyToAdd)
            Return CType(list.ToArray(GetType(Microsoft.SqlServer.ReportingServices2005.Policy)), Microsoft.SqlServer.ReportingServices2005.Policy())
        Else
            policies = New Microsoft.SqlServer.ReportingServices2005.Policy(0) {}
            policies(0) = policyToAdd
            Return policies
        End If
    End Function

En sachant que:
-Tu as déjà récupéré les groupes de la machines dans la DropDownList1
-Tu as récupéré les rôles de Reporting Services dans la ListBox1

Voili Voilou :king: