Probleme mit der SUM() -Funktion in SQL

  • VB.NET

Es gibt 7 Antworten in diesem Thema. Der letzte Beitrag () ist von HerrFrie.

    Probleme mit der SUM() -Funktion in SQL

    Werte Leute des VB-Paradise Forums,

    ich hab Probleme mit einer SQL Abfrage in Verbingung mit dem Readerobjekt. Mein Sytax ist wie folgt (alles Notwendige wurde mit Import eingebunden):

    VB.NET-Quellcode

    1. [....]
    3. Dim MON As String
    4. Dim monat As String
    6. Dim con As New OleDbConnection
    7. Dim cmd As New OleDbCommand
    8. Dim reader As OleDbDataReader
    9. Dim wert, wert_bezahlt, wert_offen As Double
    10. con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=C:\Temp\firma.accdb"
    11. cmd.Connection = con
    12. cmd.CommandText = "SELECT Sum([betrag]) as betrag from personen"
    15. Try
    16. con.Open()
    17. reader = cmd.ExecuteReader()
    18. Do While reader.Read()
    19. wert = reader("betrag")
    20. Loop
    21. reader.Close()
    24. reader = cmd.ExecuteReader()
    25. cmd.CommandText = "SELECT SUM([betrag]) as betrag FROM personen WHERE status = 'bezahlt'"
    26. Do While reader.Read()
    27. wert_bezahlt = reader("betrag")
    29. Loop
    30. reader.Close()
    34. reader = cmd.ExecuteReader()
    35. cmd.CommandText = "SELECT SUM([betrag]) AS betrag FROM personen WHERE status = 'unbezahlt'"
    36. Do While reader.Read()
    37. wert_offen = reader("betrag")
    39. Loop
    40. reader.Close()
    41. con.Close()
    44. Catch ex As Exception
    45. MessageBox.Show(ex.Message)
    46. End Try
    49. MON = ComboBox1.SelectedItem
    51. Select Case MON
    53. Case "jan"
    54. monat = "Januar"
    55. Case "feb"
    56. monat = "Februar"
    57. Case "mar"
    58. monat = "März"
    59. Case "apr"
    60. monat = "April"
    61. Case "mai"
    62. monat = "Mai"
    63. Case "jun"
    64. monat = "Juni"
    65. Case "jul"
    66. monat = "Juli"
    67. Case "aug"
    68. monat = "August"
    69. Case "sep"
    70. monat = "September"
    71. Case "okt"
    72. monat = "Oktober"
    73. Case "nov"
    74. monat = "November"
    75. Case "dez"
    76. monat = "Dezember"
    77. End Select
    78. Chart1.Series.Clear()
    79. Chart1.Series.Add(monat)
    80. Chart1.Series.Add("bezahlt")
    81. Chart1.Series.Add("offen")
    83. Chart1.Series(monat).ChartType = DataVisualization.Charting.SeriesChartType.Column
    84. Chart1.Series("bezahlt").ChartType = DataVisualization.Charting.SeriesChartType.Column
    85. Chart1.Series("offen").ChartType = DataVisualization.Charting.SeriesChartType.Column
    89. 'Werte
    90. Chart1.Series(monat).Points.AddY(wert)
    91. Chart1.Series("bezahlt").Points.AddY(wert_bezahlt)
    92. Chart1.Series("offen").Points.AddY(wert_offen)
    94. Chart1.Series(monat).IsValueShownAsLabel = True
    95. Chart1.Series("bezahlt").IsValueShownAsLabel = True
    96. Chart1.Series("offen").IsValueShownAsLabel = True
    98. End Sub


    Der Inhalt der Spalte Betrag un der Spalte Status in der Tabelle personen ist wie folgt:

    Betrag Status
    365 bezahlt
    2000 unbezahlt
    500 unbezahlt
    50 unbezahlt
    50 unbezahlt


    Somit müsste wert_bezahlt =365 ; wert =2965 ; wert_offen=2600 sein
    Ausgabe ist aber: wert=2965 ; wert_bezahlt=2965 wert_offen=365 !!

    Weiß jemand Rat? Es muss irgendwie am SQL-Aufruf liegen...

    Vielen Dank im Voraus!
    Gruß
    Timo

    Hi,

    als erstes kannst du den Reader für solche Abfragen, wo du nur einen Wert zurück geben willst weglassen.
    Du kannst den Befehl einfach so an die Datenbank schießen:

    VB.NET-Quellcode

    1. wert_bezahlt = cmd.ExecuteScalar


    Wenn du solche Summierung machst, brauchst du glaube ich die 'GROUB BY' mit im SQL Befehle, da sonst alles zusammen gerechnet wird, wie es bei dir der Fall ist.
    Probier mal :

    VB.NET-Quellcode

    1. cmd.CommandText = "SELECT SUM([betrag]) as betrag FROM personen WHERE status = 'bezahlt' GROUB BY personen"
    2. cmd.CommandText = "SELECT SUM([betrag]) AS betrag FROM personen WHERE status = 'unbezahlt GROUB BY personen'"

    @TE

    Du weisst bei der 2. und 3. Abfrage nach dem Execute erst den neuen SQL zu. :)
    Funktioniert anders rum besser.

    @HerrFrie

    Glauben heisst nicht wissen. :)

    Denk mal drüber nach was bei deiner Abfrage mit group by Personen rauskommt.

    Na?
    Eine Summe der Beträge pro Person, was nicht im Sinne des TE wäre.

    LG
    Katmay

    Ok,

    wird Zeit das Wochenende wird, GROUP BY wird da ja gar nicht benötigt.

    Allerdings brauchst du wie gesagt die Reader nicht, da du das einfach mit einer Zeile lösen kannst und den Befehl wie im ersten Code von Post 2 schreiben kannst.
    Spart Code und sieht übersichlicher aus.

    PS: Du kannst den Thread als Closed selber markieren, gibts einen Button für ;)