Rubrik: Datenbanken | 01.11.03 |
Summe aller Datensätze einer Spalte berechnen VB-Version: VB5, VB6 | ||
Views: 14.938 |
Manchmal braucht man die Summe aller Datensätze einer Spalte in einer Datenbank. Sei es, dass die Datenbank Artikelpreise enthält, die aufsummiert werden sollen, oder Stückzahlen von irgendwas. Mit einer SQL-Anweisung sollte das kein Problem sein:
Dim oRs As Recordset Set oRs = Db.OpenRecordset("SELECT SUM(Feldname) AS Summe FROM Tabelle") If oRs.RecordCount > 0 Then MsgBox CStr(oRs("Summe")) End If oRs.Close Set oRs = Nothing