加入報表登入程式碼
您現在已經可以將登入程式碼加入程式碼後置 (Code-Behind) 類別中。首先要建立私用 Helper 方法 SetDBLogonForReport()。
若要建立和撰寫 SetDBLogonForReport() 方法的程式碼
返回此 Web 或 Windows Form 的程式碼後置類別。
在類別底部建立新的私用方法,名為 SetDBLogonForReport()且具有兩個參數 ConnectionInfo 和 ReportDocument。
``` vb
Private Sub SetDBLogonForReport(ByVal myConnectionInfo As ConnectionInfo, ByVal myReportDocument As ReportDocument)
End Sub
```
``` csharp
private void SetDBLogonForReport(ConnectionInfo connectionInfo, ReportDocument reportDocument)
{
}
```
- 在此方法中,存取 ReportDocument 參數的 Database 屬性,再接著存取 Tables 屬性,以擷取 Tables 執行個體。
<table>
<colgroup>
<col style="width: 100%" />
</colgroup>
<thead>
<tr class="header">
<th><img src="images\36bhtx7w.alert_note(zh-tw,VS.90).gif" alt="Note" class="note" />附註</th>
</tr>
</thead>
<tbody>
<tr class="odd">
<td><p>Tables 是索引類別,內有 Table 類別的執行個體。</p></td>
</tr>
</tbody>
</table>
``` vb
Dim myTables As Tables = myReportDocument.Database.Tables
```
``` csharp
Tables tables = reportDocument.Database.Tables;
```
- 建立 foreach 迴圈,用於逐一處理 Tables 索引類別執行個體中每個 Table 執行個體。
<table>
<colgroup>
<col style="width: 100%" />
</colgroup>
<thead>
<tr class="header">
<th><img src="images\36bhtx7w.alert_note(zh-tw,VS.90).gif" alt="Note" class="note" />附註</th>
</tr>
</thead>
<tbody>
<tr class="odd">
<td><p>您必須提供 Table 類別的命名空間完整路徑,以便與 System.Web.UI.WebControls 命名空間中的 Table 類別有所區隔。</p></td>
</tr>
</tbody>
</table>
``` vb
For Each myTable As CrystalDecisions.CrystalReports.Engine.Table In myTables
Next
```
``` csharp
foreach(CrystalDecisions.CrystalReports.Engine.Table table in tables)
{
}
```
在 foreach 迴圈內,從 Table 執行個體的 LogOnInfo 屬性擷取 TableLogonInfo 執行個體。
Dim myTableLogonInfo As TableLogOnInfo = myTable.LogOnInfo
TableLogOnInfo tableLogonInfo = table.LogOnInfo;
在 foreach 迴圈內,將 TableLogonInfo 的 ConnectionInfo 屬性設為 ConnectionInfo 參數。
myTableLogonInfo.ConnectionInfo = myConnectionInfo
tableLogonInfo.ConnectionInfo = connectionInfo;
在 foreach 迴圈內,將 TableLogonInfo 執行個體當作參數傳遞給 Table 執行個體的 ApplyLogonInfo 方法。
myTable.ApplyLogOnInfo(myTableLogonInfo)
table.ApplyLogOnInfo(tableLogonInfo);
此步驟程序已建立一個可以設定資料庫登入的方法。但是,您必須修改 ConfigureCrystalReports() 方法來處理這個方法,讓報表能夠知道此方法包含資料庫登入資訊。
修改 ConfigureCrystalReports() 方法需要兩個動作:
- 設定 ConnectionInfo 執行個體。
- 呼叫 SetDBLogonForReport() 方法。
若要修改 ConfigureCrystalReports() 方法以處理資料庫登入程式碼
在 ConfigureCrystalReports() 方法中,在繫結報表到 CrystalReportViewer 控制項的程式行上方加入幾個分行符號。
在分行符號中,宣告並產生 ConnectionInfo 類別的執行個體。
<table>
<colgroup>
<col style="width: 100%" />
</colgroup>
<thead>
<tr class="header">
<th><img src="images\36bhtx7w.alert_note(zh-tw,VS.90).gif" alt="Note" class="note" />附註</th>
</tr>
</thead>
<tbody>
<tr class="odd">
<td><p>若要能夠存取 ConnectionInfo 類別,請將 "Imports" [Visual Basic] 或 "using" [C#] 陳述式放在 CrystalDecisions.Shared 命名空間的程式碼後置類別上方。(您曾在<a href="ms227453(v=vs.90).md">「專案設定」</a>中加入這個宣告)。</p></td>
</tr>
</tbody>
</table>
``` vb
Dim myConnectionInfo As ConnectionInfo = New ConnectionInfo()
```
``` csharp
ConnectionInfo connectionInfo = new ConnectionInfo();
```
- 設定 ConnectionInfo 執行個體的 DatabaseName、UserID 及 Password 屬性。
<table>
<colgroup>
<col style="width: 100%" />
</colgroup>
<thead>
<tr class="header">
<th><img src="images\36bhtx7w.alert_note(zh-tw,VS.90).gif" alt="Note" class="note" />附註</th>
</tr>
</thead>
<tbody>
<tr class="odd">
<td><p>基於安全性理由,請務必要使用只有有限存取權限的資料庫帳戶。如需詳細資訊,請參閱<a href="ms227498(v=vs.90).md">「安全性:建立有限存取的資料庫帳戶」</a>。</p></td>
</tr>
</tbody>
</table>
在您撰寫的程式碼中,以您自己的密碼取代範例密碼 1234 (如下所示)。
``` vb
myConnectionInfo.DatabaseName = "Northwind"
myConnectionInfo.UserID = "limitedPermissionAccount"
myConnectionInfo.Password = "
1234"
```
``` csharp
connectionInfo.DatabaseName = "Northwind";
connectionInfo.UserID = "limitedPermissionAccount";
connectionInfo.Password = "
1234";
```
- 藉著傳入 ConnectionInfo 執行個體和 NorthwindCustomers 報表,呼叫 SetDBLogonForReport() 方法。
``` vb
SetDBLogonForReport(myConnectionInfo, northwindCustomersReport)
```
``` csharp
SetDBLogonForReport(connectionInfo, northwindCustomersReport);
```
此程式行後便是將報表繫結到 CrystalReportViewer 控制項的原始程式碼。
您現在已經可以建置及執行您的專案。報表應能正確載入,因為您已加入登入資料庫的程式碼。
若要測試 NorthwindCustomers 報表的載入
從 [建置] 功能表選取 [建置方案]。
如果發生任何建置錯誤,請立即修正。
從 [偵錯] 功能表中,按一下 [啟動]。
NorthwindCustomers 報表會順利顯示。
- 返回 Visual Studio,再按一下 [停止] 退出偵錯模式。
NorthwindCustomers 報表會順利顯示。