Erstellen einer Zusammenfassungszeile für ein DataGrid in ASP.NET mithilfe von Visual Basic .NET

In diesem Schritt-für-Schritt-Artikel wird beschrieben, wie Sie mithilfe von Visual Basic .NET eine Zusammenfassungszeile für ein DataGrid-Steuerelement in ASP.NET erstellen.

Ursprüngliche Produktversion: Visual Basic .NET
Ursprüngliche KB-Nummer: 313154

Zusammenfassung

In diesem Artikel erstellen Sie ein Visual Basic .NET-Projekt, fügen Code für den Zugriff auf die Ansicht Sales Totals by Amount aus der Northwind-Datenbank hinzu und binden dann die Ansicht Sales Totals by Amount an dataGrid. In diesem Beispiel wird das ItemDataBound DataGrid-Ereignis verwendet, um das Feld "SaleAmount" zu summieren, wenn Sie die Daten an dataGrid binden. In diesem Beispiel wird auch die Fußzeile von DataGrid verwendet, um die Zusammenfassung oder die Summen anzuzeigen.

Dieser Artikel bezieht sich auf den Microsoft .NET Framework-Klassenbibliotheksnamespace System.Data.SqlClient.

Anforderungen

In der folgenden Liste sind die empfohlenen Hardware, Software, Netzwerkinfrastruktur und Service Packs aufgeführt, die erforderlich sind:

• Microsoft Windows
• Microsoft .NET Framework
• Microsoft Visual Studio .NET
• Microsoft-Internetinformationsdienste (IIS)
• Microsoft SQL Server 7.0 oder höher und die Northwind-Datenbank

Erstellen eines Visual Basic .NET-Projekts und Hinzufügen von DataGrid

In diesem Abschnitt erstellen Sie ein Visual Basic .NET-Projekt, wählen ein Format für dataGrid aus und legen dann dataGrid so fest, dass die Fußzeile angezeigt wird. Da Sie die Fußzeile verwenden, um die Zusammenfassung anzuzeigen, ist es wichtig, dass Sie die Fußzeile anzeigen.

1. Starten Sie Visual Studio .NET. Die Visual Studio .NET-IDE wird angezeigt.

2. Zeigen Sie im Menü Datei auf Neu, und klicken Sie dann auf Projekt.

3. Klicken Sie im Dialogfeld Neues Projekt unter Projekttypen auf Visual Basic-Projekte, und klicken Sie dann unter Vorlagen auf ASP.NET Webanwendung.

4. Beachten Sie im Dialogfeld Neues Projekt , dass das Feld Name nicht verfügbar ist (es wird abgeblendet angezeigt). Das Feld Speicherort enthält den folgenden Text (oder ähnlich):
   http://localhost/WebApplication1

   Ändern Sie den Speicherort in http://localhost/SummaryRow, und klicken Sie dann auf OK. Es wird ein neues Projekt erstellt, das ein Webformular mit dem Namen WebForm1.aspx enthält.

5. Doppelklicken Sie Projektmappen-Explorer auf WebForm1.aspx.

6. Ziehen Sie ein DataGrid-Steuerelement aus der Toolbox in das Formular.

7. Klicken Sie mit der rechten Maustaste auf das DataGrid-Steuerelement, und klicken Sie dann auf Automatisches Formatieren. Klicken Sie auf Farbig 1 und dann auf OK.

8. Klicken Sie mit der rechten Maustaste auf das DataGrid-Steuerelement , und klicken Sie dann auf Eigenschaften. Ändern Sie im Dialogfeld Eigenschaften den Wert der ShowFooter-Eigenschaft in True.

Schreiben von Code für den Zugriff auf die Datenbank

In diesem Abschnitt verwenden Sie die Ansicht Sales Totals by Amount in der Northwind-Datenbank , um die Zusammenfassung für das Feld SaleAmount zu berechnen. Die Ansicht Sales Totals by Amount enthält die Felder Orders, CompanyName und SaleAmount.

1. Klicken Sie in der IDE mit der rechten Maustaste auf das Webformular, und klicken Sie dann auf Code anzeigen.

2. Fügen Sie im CodeBehind-Fenster oben auf der Seite den folgenden Code hinzu:

   Imports System.Data
   Imports System.Data.SqlClient
   

3. Fügen Sie den folgenden Code im Abschnitt zur Klassendeklaration hinzu:

   Private myTotal As System.Double 'This variable tracks the running total.
   

4. Ersetzen Sie den Code im Page_Load -Ereignis durch den folgenden Code:

   Private Sub Page_Load(ByVal sender As System.Object, _
   ByVal e As System.EventArgs) Handles MyBase.Load
       'Connect to the database, retrieve data, and then fill the data in the DataSet.
       Dim myConnection As New SqlConnection("server=(local)\netsdk;"Integrated Security=SSPI" & _
       pwd=;database=northwind")
       Dim myDataAdapter As New SqlDataAdapter("SELECT top 15 [OrderID], [CompanyName], " & _
       "[SaleAmount] FROM [Northwind].[dbo].[Sales Totals by Amount]", myConnection)
       Dim myDataSet As New DataSet()
       myDataAdapter.Fill(myDataSet)
       'Set the DataSource for the DataGrid, and then bind the data.
       DataGrid1.DataSource = myDataSet
       DataGrid1.DataBind()
   End Sub
   

5. Ändern Sie die Verbindungszeichenfolge entsprechend Ihrer Umgebung.

Verwenden des ItemDataBound-Ereignisses

Das ItemDataBound Ereignis wird ausgelöst, nachdem ein Element an das DataGrid-Steuerelement gebunden ist. Dieses Ereignis bietet Ihnen die letzte Möglichkeit, auf das Datenelement zuzugreifen, bevor es auf dem Client angezeigt wird. Nachdem dieses Ereignis ausgelöst wurde, ist das Datenelement NULL und nicht mehr verfügbar.

Für jedes Element, das datengebunden ist, müssen Sie die ItemType -Eigenschaft überprüfen. Wenn ItemType vom Typ Item oder AlternatingItemist, erhalten Sie den Wert aus der letzten Zelle des Elements, die den SaleAmount-Wert enthält. In diesem Beispiel fügen Sie diesen Wert der ausgeführten Zusammenfassungsvariablen hinzu. Wenn auf ItemType festgelegt ist Footer, erhalten Sie die Summe aus allen Zeilen. Daher weisen Sie den Wert der Summary-Variablen dem Textwert der letzten Zelle zu.

Fügen Sie nach dem Ereignis den Page_Load folgenden Code hinzu:

Private Sub DataGrid1_ItemDataBound(ByVal sender As Object, _
ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemDataBound
    Select Case e.Item.ItemType
    Case ListItemType.AlternatingItem, ListItemType.Item
    'Calculate total for the field of each row and alternating row.
    myTotal += CDbl(e.Item.Cells(2).Text)
    'Format the data, and then align the text of each cell to the right.
    e.Item.Cells(2).Text = Format(CDbl(e.Item.Cells(2).Text), "##,##0.00")
    e.Item.Cells(2).Attributes.Add("align", "right")
    Case ListItemType.Footer
    'Use the footer to display the summary row.
    e.Item.Cells(1).Text = "Total Sales"
    e.Item.Cells(1).Attributes.Add("align", "left")
    e.Item.Cells(2).Attributes.Add("align", "right")
    e.Item.Cells(2).Text = myTotal.ToString("c")
    End Select
End Sub

Erstellen des Projekts und Testen des Codes

1. Klicken Sie im Menü Datei auf Alles speichern.
2. On the Build menu, click Build Solution.
3. Klicken Sie in Projektmappen-Explorer mit der rechten Maustaste auf die Seite .aspx, und klicken Sie dann auf Im Browser anzeigen. Die Seite .aspx wird im Browser angezeigt, und dataGrid zeigt die Spalten OrderID, CompanyName und SaleAmount an. Beachten Sie, dass in der Fußzeile die Summe der Spalte SaleAmount angezeigt wird.

References

• DataGrid-Klasse
• Formatierungsübersicht