共用方式為

逐步解說：變更伺服器上的活頁簿快取資料

  • 發行項

更新：2007 年 11 月

適用於

本主題中的資訊僅適用於指定的 Visual Studio Tools for Office 專案和 Microsoft Office 版本。

專案類型

  • 文件層級專案

Microsoft Office 版本

  • Excel 2007

  • Excel 2003

如需詳細資訊，請參閱依應用程式和專案類型提供的功能。

本逐步解說示範如何在不啟動 Excel 的情況下使用 ServerDocument 類別，修改 Microsoft Office Excel 活頁簿中快取的資料集。本逐步解說提供逐步指示，供您使用 HOW TO：變更伺服器活頁簿中的快取資料中所提供的程式碼範例。

這個逐步解說將說明下列工作：

  • 定義資料集，此資料集中包含 Microsoft SQL Server 2005 之 AdventureWorksLT 資料庫中的資料。

  • 在 Excel 活頁簿專案和主控台應用程式專案中建立資料集的執行個體。

  • 建立繫結至活頁簿之資料集的 ListObject，並在活頁簿開啟時將資料填入 ListObject。

  • 將活頁簿中的資料集加入至資料快取。

  • 在未啟動 Excel 的情況下，藉由在主控台應用程式執行程式碼，修改快取資料集中資料的資料行。

雖然這個逐步解說假設您是在開發電腦上執行程式碼，但是它所示範的程式碼可以在沒有安裝 Excel 的伺服器上使用。

注意事項：

在下列指示的某些 Visual Studio 使用者介面項目中，您的電腦可能會顯示不同的名稱或位置。您所擁有的 Visual Studio 版和使用的設定，會決定這些項目。如需詳細資訊，請參閱 Visual Studio 設定。

必要條件

您需要下列元件才能完成此逐步解說：

  • Visual Studio Tools for Office (Visual Studio 2008 Professional 和 Visual Studio Team System 的選擇性元件)。

    Visual Studio Tools for Office 預設會與列出的 Visual Studio 版本一併安裝。若要查看是否已安裝，請參閱安裝 Visual Studio Tools for Office。

  • Excel 2007 或 Excel 2003。

  • 存取附加了 AdventureWorksLT 範例資料庫之執行中的 SQL Server 2005 或 SQL Server 2005 Express 執行個體。您可以從 CodePlex 網站 (英文) 下載 AdventureWorksLT 資料庫。如需附加資料庫的詳細資訊，請參閱下列主題：

建立定義資料集的類別庫專案

若要在 Excel 活頁簿專案和主控台應用程式中使用相同的資料集，您必須在這兩個專案同時參考的另一個組件中定義資料集。在本逐步解說中，請於類別庫專案中定義資料集。

若要建立類別庫專案

  1. 啟動 Visual Studio。

  2. 在 [檔案] 功能表上，指向 [新增]，然後按一下 [專案]。

  3. 在 [專案類型] 窗格中，展開 [Visual C#] 或 [Visual Basic]，然後按一下 [Windows]。

  4. 在 [範本] 窗格中選取 [類別庫]。

  5. 在 [名稱] 方塊中輸入 AdventureWorksDataSet。

  6. 按一下 [瀏覽]，巡覽至您的 %UserProfile%\My Documents (適用於 Windows XP (含) 以前版本) 或 %UserProfile%\Documents (適用於 Windows Vista) 資料夾，然後按一下 [選取資料夾]。

  7. 在 [新增專案] 對話方塊中，確認未選取 [為方案建立目錄] 核取方塊。

  8. 按一下 [確定]。

    Visual Studio 會將 AdventureWorksDataSet 專案加入至 [方案總管]，並開啟 Class1.cs 或 Class1.vb 程式碼檔。

  9. 在 [方案總管] 中，以滑鼠右鍵按一下 [Class1.cs] 或 [Class1.vb]，再按一下 [刪除]。在這個逐步解說中，您不需要這個檔案。

在類別庫專案中定義資料集

定義具型別資料集，使其中包含 SQL Server 2005 之 AdventureWorksLT 資料庫中的資料。在此逐步解說稍後的內容中，您會從 Excel 活頁簿專案和主控台應用程式專案參考這個資料集。

此資料集是「具型別資料集」(Typed Dataset)，表示 AdventureWorksLT 資料庫之 Product 資料表中的資料。如需具型別資料集的詳細資訊，請參閱 Visual Studio 中的資料集概觀。

若要在類別庫專案中定義具型別資料集

  1. 在 [方案總管] 中，按一下 [AdventureWorksDataSet] 專案。

  2. 在 [資料] 功能表上，按一下 [加入新資料來源]。

    [資料來源組態精靈] 隨即開啟。

  3. 按一下 [資料庫]，然後按 [下一步]。

  4. 如果您有現有的 AdventureWorksLT 資料庫連接，請選擇此連接，再按 [下一步]。

    否則，請按一下 [新增連接]，並使用 [加入連接] 對話方塊建立新連接。如需詳細資訊，請參閱 HOW TO：建立連接至 SQL Server 資料庫。

  5. 在 [將連接字串儲存到應用程式組態檔] 頁面上，按 [下一步]。

  6. 在 [選擇您的資料庫物件] 頁面中，展開 [資料表]，並選取 [Product (SalesLT)]。

  7. 按一下 [完成]。

    AdventureWorksLTDataSet.xsd 檔案隨即加入至 AdventureWorksDataSet 專案。這個檔案定義下列項目：

    • 名稱為 AdventureWorksLTDataSet 的具型別資料集。這個資料集表示 AdventureWorksLT 資料庫中 Product 資料表的內容。

    • 名為 ProductTableAdapter 的 TableAdapter。這個 TableAdapter 可以用來讀取和寫入 AdventureWorksLTDataSet 中的資料。如需詳細資訊，請參閱 TableAdapter 概觀。

    在這個逐步解說後面的步驟中，您會用到這兩個物件。

  8. 在 [方案總管] 中，以滑鼠右鍵按一下 [AdventureWorksDataSet]，再按一下 [建置]。

    接著驗證專案建置無誤。

建立 Excel 活頁簿專案

建立資料介面的 Excel 活頁簿專案。在此逐步解說稍後的內容中，您會建立顯示資料的 ListObject，也會將資料集的執行個體加入至活頁簿的資料快取。

若要建立 Excel 活頁簿專案

  1. 在 [方案總管] 中，以滑鼠右鍵按一下 [AdventureWorksDataSet] 方案，指向 [加入]，再按一下 [新增專案]。

  2. 在 [專案類型] 窗格中，展開 [Visual C#] 或 [Visual Basic]，然後再展開 [Office]。

  3. 如果您在開發電腦上使用的是 Excel 2007，請選取 [2007] 資料夾，如果使用的是 Excel 2003，則請選取 [2003]。

  4. 在 [範本] 窗格中，選取 [Excel 活頁簿]。

  5. 在 [名稱] 方塊中輸入 AdventureWorksReport。請勿修改位置。

  6. 按一下 [確定]。

    [Visual Studio Tools for Office 專案精靈] 便會開啟。

  7. 確認已選取 [建立新文件]，然後按一下 [確定]。

    Visual Studio 會在設計工具中開啟 AdventureWorksReport 活頁簿，並將 [AdventureWorksReport] 專案加入至 [方案總管]。

將資料集加入至 Excel 活頁簿專案中的資料來源

您必須先將資料集加入至 Excel 活頁簿專案中的資料來源，才能在 Excel 活頁簿中顯示資料集。

若要將資料集加入至 Excel 活頁簿專案中的資料來源

  1. 在 [方案總管] 中，按兩下 [AdventureWorksReport] 專案底下的 [Sheet1.cs] 或 [Sheet1.vb]。

    活頁簿就會在設計工具中開啟。

  2. 在 [資料] 功能表上，按一下 [加入新資料來源]。

    [資料來源組態精靈] 隨即開啟。

  3. 按一下 [物件]，然後按 [下一步]。

  4. 在 [選取您要繫結的目標物件] 頁面中，按一下 [加入參考]。

  5. 在 [專案] 索引標籤上，按一下 [AdventureWorksDataSet]，然後按 [確定]。

  6. 在 [AdventureWorksDataSet] 組件的 [AdventureWorksDataSet] 命名空間底下，按一下 [AdventureWorksLTDataSet]，然後按一下 [完成]。

    [資料來源] 視窗隨即開啟，而且 [AdventureWorksLTDataSet] 也會加入至資料來源清單中。

建立繫結至資料集執行個體的 ListObject

若要將資料集顯示在活頁簿中，請建立繫結至資料集執行個體的 ListObject。如需將控制項繫結至資料的詳細資訊，請參閱將資料繫結至控制項。

若要建立繫結至資料集執行個體的 ListObject

  1. 在 [資料來源] 視窗中，展開 [AdventureWorksDataSet] 底下的 [AdventureWorksLTDataSet] 節點。

  2. 選取 [Product] 節點，按一下出現的下拉箭號，然後在下拉式清單中選取 [ListObject]。

    如果下拉箭號沒有出現，請確認活頁簿已在設計工具中開啟。

  3. 將 [Product] 資料表拖曳至儲存格 A1。

    工作表中會建立一個名為 productListObject 的 ListObject 控制項 (從儲存格 A1 開始)。同時，也會將名為 adventureWorksLTDataSet 的資料集物件和名為 productBindingSource 的 BindingSource 加入至專案。ListObject 會繫結至 BindingSource，而後者則繫結至資料集物件。

將資料集加入至資料快取

若要讓 Excel 活頁簿專案外部的程式碼能夠存取活頁簿中的資料集，您必須將資料集加入至資料快取。如需資料快取的詳細資訊，請參閱文件層級自訂中的資料模型和快取資料。

若要將資料集加入至資料快取

  1. 在設計工具中，按一下 [adventureWorksLTDataSet]。

  2. 在 [屬性] 視窗中，將 [Modifiers] 屬性設定為 [Public]。

  3. 將 [CacheInDocument] 屬性設定為 [True]。

初始化活頁簿中的資料集

您必須先將資料填入快取的資料集，才能透過主控台應用程式從快取資料集擷取資料。

若要初始化活頁簿中的資料集

  1. 在 [方案總管] 中，以滑鼠右鍵按一下 [Sheet1.cs] 或 [Sheet1.vb] 檔案，然後按一下 [檢視程式碼]。

  2. 以下列程式碼取代 Sheet1_Startup 事件處理常式。如果快取的資料集目前是空白，此程式碼會使用 AdventureWorksDataSet 專案中定義的 ProductTableAdapter 類別執行個體，將資料填入快取的資料集。

    Private ProductTableAdapter As New  _
    AdventureWorksDataSet.AdventureWorksLTDataSetTableAdapters.ProductTableAdapter()

Private Sub Sheet1_Startup(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Startup
    If Me.NeedsFill("AdventureWorksLTDataSet") Then
        Me.ProductTableAdapter.Fill(Me.AdventureWorksLTDataSet.Product)
    End If
End Sub

    private AdventureWorksDataSet.AdventureWorksLTDataSetTableAdapters.ProductTableAdapter productTableAdapter =
    new AdventureWorksDataSet.AdventureWorksLTDataSetTableAdapters.ProductTableAdapter();

private void Sheet1_Startup(object sender, System.EventArgs e)
{
    if (this.NeedsFill("adventureWorksLTDataSet"))
    {
        this.productTableAdapter.Fill(this.adventureWorksLTDataSet.Product);
    }
}

檢查點

建置並執行 Excel 活頁簿專案，以確保此專案能正確編譯及執行。這項作業也會填滿快取的資料集，並將資料儲存在活頁簿中。

若要建置及執行專案

  1. 在 [方案總管] 中，以滑鼠右鍵按一下 [AdventureWorksReport] 專案，選擇 [偵錯]，然後按一下 [開始新執行個體]。

    專案已建置，而且活頁簿會在 Excel 中開啟。驗證下列各項：

    • 資料填入 ListObject。

    • ListObject 中第一個資料列的 [ListPrice] 資料行值為 1431.5。稍後在本逐步解說中，您會使用主控台應用程式修改 [ListPrice] 資料行值。

  2. 儲存活頁簿。請勿修改活頁簿的檔案名稱或位置。

  3. 關閉 Excel。

建立主控台應用程式專案

建立主控台應用程式專案，用以修改活頁簿中快取資料集的資料。

若要建立主控台應用程式專案

  1. 在 [方案總管] 中，以滑鼠右鍵按一下 [AdventureWorksDataSet] 方案，指向 [加入]，再按一下 [新增專案]。

  2. 在 [專案類型] 窗格中，展開 [Visual C#] 或 [Visual Basic]，然後按一下 [Windows]。

  3. 在 [範本] 窗格中選取 [主控台應用程式]。

  4. 在 [名稱] 方塊中，輸入 DataWriter。請勿修改位置。

  5. 按一下 [確定]。

    Visual Studio 會將 DataWriter 專案加入至 [方案總管]，並開啟 Program.cs 或 Module1.vb 程式碼檔。

使用主控台應用程式變更快取資料集的資料

在主控台應用程式中使用 ServerDocument 類別，將資料讀入本機 AdventureWorksLTDataSet 物件、修改此資料，然後再儲存回快取資料集。

若要變更快取資料集的資料

  1. 在 [方案總管] 中，以滑鼠右鍵按一下 [DataWriter] 專案，再按一下 [加入參考]。

  2. 在 [.NET] 索引標籤上，選取下列其中一個組件：

    • 如果您在開發電腦上使用的是 Excel 2007，請選取 [Microsoft.VisualStudio.Tools.Applications.ServerDocument.v9.0]。

    • 如果您使用的是 Excel 2003，請選取 [Microsoft.VisualStudio.Tools.Applications.Runtime]。

    這些組件定義各種的 ServerDocument 類別版本，供 2007 Microsoft Office System 和 Microsoft Office 2003 的專案使用。如需詳細資訊，請參閱使用 ServerDocument 類別管理伺服器上的文件。

  3. 按一下 [確定]。

  4. 在 [方案總管] 中，以滑鼠右鍵按一下 [DataWriter] 專案，再按一下 [加入參考]。

  5. 在 [專案] 索引標籤上，選取 [AdventureWorksDataSet]，然後按一下 [確定]。

  6. 在程式碼編輯器中開啟 Program.cs 或 Module1.vb 檔案。

  7. 將下列 using (適用於 C#) 或 Imports (適用於 Visual Basic) 陳述式加入至程式碼檔的最上方。

    Imports Microsoft.VisualStudio.Tools.Applications

    using Microsoft.VisualStudio.Tools.Applications;

  8. 將下列程式碼加入至 Main 方法中。這個程式碼會宣告下列物件：

    • AdventureWorksLTDataSet 型別的執行個體，這是在 AdventureWorksDataSet 專案中定義的。

    • AdventureWorksReport 專案之建置資料夾中 AdventureWorksReport 活頁簿的路徑。

    • 要用來在活頁簿中存取資料快取的 ServerDocument 物件。

      注意事項：

      下列程式碼假設您使用的是副檔名為 .xlsx 的 Excel 2007 活頁簿。如果專案中的活頁簿是使用不同的副檔名，請視需要修改路徑。

      		 
    Dim productDataSet As New AdventureWorksDataSet.AdventureWorksLTDataSet()
Dim workbookPath As String = System.Environment.GetFolderPath( _
    Environment.SpecialFolder.MyDocuments) & _
    "\AdventureWorksReport\bin\Debug\AdventureWorksReport.xlsx"
Dim serverDocument1 As ServerDocument = Nothing

    AdventureWorksDataSet.AdventureWorksLTDataSet productDataSet =
    new AdventureWorksDataSet.AdventureWorksLTDataSet();
string workbookPath = System.Environment.GetFolderPath(
    Environment.SpecialFolder.MyDocuments) +
    @"\AdventureWorksReport\bin\Debug\AdventureWorksReport.xlsx";
ServerDocument serverDocument1 = null;

  9. 將下列程式碼加入至 Main 方法中，加入的位置是您在前一個步驟中加入的程式碼後面。這個程式碼會執行下列工作：

    • 使用 ServerDocument 類別的 CachedData 屬性來存取活頁簿中的快取資料集。

    • 將快取資料集的資料讀入本機資料集。

    • 變更資料集的 Product 資料表中每個產品的 ListPrice 值。

    • 儲存活頁簿中快取資料集的變更。

    Try
    serverDocument1 = New ServerDocument(workbookPath)
    Dim dataHostItem1 As CachedDataHostItem = _
        serverDocument1.CachedData.HostItems("AdventureWorksReport.Sheet1")
    Dim dataItem1 As CachedDataItem = dataHostItem1.CachedData("AdventureWorksLTDataSet")

    If dataItem1 IsNot Nothing Then
        Console.WriteLine("Before reading data from the cache dataset, the local dataset has " & _
            "{0} rows.", productDataSet.Product.Rows.Count.ToString())

        ' Read the cached data from the worksheet dataset into the local dataset.
        Dim schemaReader As New System.IO.StringReader(dataItem1.Schema)
        Dim xmlReader As New System.IO.StringReader(dataItem1.Xml)
        productDataSet.ReadXmlSchema(schemaReader)
        productDataSet.ReadXml(xmlReader)

        Console.WriteLine("After reading data from the cache dataset, the local dataset has " & _
            "{0} rows.", productDataSet.Product.Rows.Count.ToString())

        ' Modify the prices of each product in the local dataset.
        Dim row As AdventureWorksDataSet.AdventureWorksLTDataSet.ProductRow
        For Each row In productDataSet.Product.Rows
            If row.ProductCategoryID < 20 Then
                row.ListPrice = row.ListPrice + row.ListPrice * 0.1
            Else
                row.ListPrice = row.ListPrice - row.ListPrice * 0.1
            End If
        Next row

        ' Write the modified local dataset to the worksheet dataset using the DiffGram format.
        Dim stringIn As New System.Text.StringBuilder()
        Dim stringOut As New System.IO.StringWriter(stringIn)
        productDataSet.WriteXml(stringOut, System.Data.XmlWriteMode.DiffGram)
        dataItem1.Xml = stringIn.ToString()

        serverDocument1.Save()
        Console.WriteLine("The product prices have been modified.")
    Else
        Console.WriteLine("The data object is not found in the data cache.")
    End If
Catch ex As System.IO.FileNotFoundException
    Console.WriteLine("The specified workbook does not exist.")
Catch ex As System.Xml.XmlException
    Console.WriteLine("The data object has invalid XML information.")
Finally
    If Not (serverDocument1 Is Nothing) Then
        serverDocument1.Close()
    End If
    Console.WriteLine(vbLf & vbLf & "Press Enter to close the application.")
    Console.ReadLine()
End Try

    try
{
    serverDocument1 = new ServerDocument(workbookPath);
    CachedDataHostItem dataHostItem1 =
        serverDocument1.CachedData.HostItems["AdventureWorksReport.Sheet1"];
    CachedDataItem dataItem1 = dataHostItem1.CachedData["adventureWorksLTDataSet"];

    if (dataItem1 != null)
    {
        Console.WriteLine("Before reading data from the cache dataset, the local dataset has " +
            "{0} rows.", productDataSet.Product.Rows.Count.ToString());

        // Read the cached data from the worksheet dataset into the local dataset.
        System.IO.StringReader schemaReader = new System.IO.StringReader(dataItem1.Schema);
        System.IO.StringReader xmlReader = new System.IO.StringReader(dataItem1.Xml);
        productDataSet.ReadXmlSchema(schemaReader);
        productDataSet.ReadXml(xmlReader);

        Console.WriteLine("After reading data from the cache dataset, the local dataset has " +
            "{0} rows.", productDataSet.Product.Rows.Count.ToString());

        // Modify the prices of each product in the local dataset.
        foreach (AdventureWorksDataSet.AdventureWorksLTDataSet.ProductRow row in 
                 productDataSet.Product.Rows)
        {
            if (row.ProductCategoryID < 20)
            {
                row.ListPrice = row.ListPrice + (row.ListPrice * (Decimal).10);
            }
            else
            {
                row.ListPrice = row.ListPrice - (row.ListPrice * (Decimal).10);
            }
        }

        // Write the modified local dataset to the worksheet dataset using the DiffGram format.
        System.Text.StringBuilder stringIn = new System.Text.StringBuilder();
        System.IO.StringWriter stringOut = new System.IO.StringWriter(stringIn);
        productDataSet.WriteXml(stringOut, System.Data.XmlWriteMode.DiffGram);
        dataItem1.Xml = stringIn.ToString();

        serverDocument1.Save();
        Console.WriteLine("The product prices have been modified.");
    }
    else
    {
        Console.WriteLine("The data object is not found in the data cache.");
    }
}
catch (System.IO.FileNotFoundException)
{
    Console.WriteLine("The specified workbook does not exist.");
}
catch (System.Xml.XmlException)
{
    Console.WriteLine("The data object has invalid XML information.");
}
finally
{
    if (serverDocument1 != null)
    {
        serverDocument1.Close();
    }

    Console.WriteLine("\n\nPress Enter to close the application.");
    Console.ReadLine();
}

  10. 在 [方案總管] 中，以滑鼠右鍵按一下 [DataWriter] 專案，指向 [偵錯]，然後按一下 [開始新執行個體]。

    主控台應用程式會在將快取資料集讀入本機資料集、修改本機資料集中的產品單價，以及儲存新值到快取資料集時顯示訊息。按 ENTER 鍵關閉應用程式。

測試活頁簿

開啟活頁簿時，ListObject 現在會顯示您對快取資料集中資料的 ListPrice 資料行所進行的變更。

若要測試活頁簿

  1. 如果 Visual Studio 設計工具中的 AdventureWorksReport 活頁簿仍然開啟，則請關閉。

  2. 開啟位在 AdventureWorksReport 專案建置資料夾中的 AdventureWorksReport 活頁簿。根據預設，建置資料夾位於下列其中一個位置：

    • %UserProfile%\My Documents\AdventureWorksReport\bin\Debug (適用於 Windows XP (含) 以前版本)

    • %UserProfile%\Documents\AdventureWorksReport\bin\Debug (適用於 Windows Vista)

  3. 確認 ListObject 第一個資料列的 [ListPrice] 資料行現在的值為 1574.65。

  4. 關閉活頁簿。

後續步驟

您可以透過下列主題，進一步了解如何使用快取資料：

請參閱

工作

HOW TO：將資料插入伺服器上的活頁簿中

HOW TO：從伺服器的活頁簿中擷取快取資料

逐步解說：在伺服器的活頁簿中插入資料

HOW TO：在文件中插入資料而不寫入磁碟

概念

連接至 Visual Studio 中的資料概觀