ReportViewer中设置ServerReport.ReportServerCredentials属性的方法(WEB版)

最新推荐文章于 2022-04-28 14:56:30 发布

weixin_30216561

最新推荐文章于 2022-04-28 14:56:30 发布

阅读量2.9k

点赞数

原文链接：http://www.cnblogs.com/beiguren/archive/2010/01/18/1650709.html

版权

当使用SSRS技术来布置报表,可能使用MS自带的ReportViewer控件来读取报表.

它分为Web和Windows两种版本;此处Web版.

ServerReport.ReportServerCredentials属性的类型为Microsoft.Reporting.WebForms.IReportServerCredentials,它可提供三种认证方式所需的证书(Credential):

1) Form认证证书(GetFormsCredentials);

2) 扮演认证证书(ImpersonationUser);

3) 网络认证证书(NetworkCredentials).

当报表的服务器端使用网络认证时,需要实现NetworkCredentials接口,而且必须将GetFormsCredentials()接口的返回值设置为False,否则会导致论证失败.

示例代码如下:

代码

1    ''' <summary>
2      ''' Initialize report viewer
3      ''' </summary>
4      ''' <remarks> Viewer是ReportViewer的一个实例 </remarks>
5      Protected Overridable Sub LoadReportViewer()
6          With Viewer
7             .Visible = True
8             .ProcessingMode = Microsoft.Reporting.WebForms.ProcessingMode.Remote
9             .ServerReport.ReportServerUrl = New Uri( < 报表服务器的URL > )
10             .ServerReport.ReportPath = < 报表相对于ReportServerUrl的路径 >
11             .ServerReport.ReportServerCredentials = < IReportServerCredentials的实例 >
12             .ShowParameterPrompts = False
13          End With
14      End Sub
15
16
17     ''' <summary>
18      ''' Internal implementation for report server credentails.
19      ''' </summary>
20      ''' <remarks></remarks>
21      Public Class ReportServerCredentials
22          Implements IReportServerCredentials
23
24          Private _Domain As String
25          Private _Password As String
26          Private _UserName As String
27
28          Public Sub New ()
29              Me .New( Nothing , Nothing , Nothing )
30          End Sub
31
32          Public Sub New ( ByVal userName As String , ByVal password As String )
33              Me .New(userName, password, Nothing )
34          End Sub
35
36          Public Sub New ( ByVal userName As String , ByVal password As String , ByVal domain As String )
37             _UserName = userName
38             _Password = password
39             _Domain = domain
40          End Sub
41
42          Public Property Domain() As String
43              Get
44                  Return _Domain
45              End Get
46              Set ( ByVal value As String )
47                 _Domain = value
48              End Set
49          End Property
50
51          Public Property Password() As String
52              Get
53                  Return _Password
54              End Get
55              Set ( ByVal value As String )
56                 _Password = value
57              End Set
58          End Property
59
60          Public Property UserName() As String
61              Get
62                  Return _UserName
63              End Get
64              Set ( ByVal value As String )
65                 _UserName = value
66              End Set
67          End Property
68
69          Public Function GetFormsCredentials( ByRef authCookie As System.Net.Cookie, ByRef userName As String , ByRef password As String , ByRef authority As String ) As Boolean Implements Microsoft.Reporting.WebForms.IReportServerCredentials.GetFormsCredentials
70          ' ---注意此处必须设置为False,否则论证为失败
71              Return False
72          End Function
73
74          Public ReadOnly Property ImpersonationUser() As System.Security.Principal.WindowsIdentity Implements Microsoft.Reporting.WebForms.IReportServerCredentials.ImpersonationUser
75              Get
76                  Return Nothing
77              End Get
78          End Property
79
80          Public ReadOnly Property NetworkCredentials() As System.Net.ICredentials Implements Microsoft.Reporting.WebForms.IReportServerCredentials.NetworkCredentials
81              Get
82                  Return New System.Net.NetworkCredential( Me .UserName, Me .Password, Me .Domain)
83              End Get
84          End Property
85      End Class

转载于:https://www.cnblogs.com/beiguren/archive/2010/01/18/1650709.html