vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Re: Stördaten Ereignisse auswerten 
Autor: ERBRU
Datum: 25.04.17 06:11

Hallo zusammen,

Rückgabe KW falsch
mittels der Funktion (Manfred X) ruf ich meine Daten ab

Jahr 2017
KW 3

Rückgabe Soll 16.01.2017 - 22.01.2017 wenn KW 3 in DT vorhanden müsste das Ergebnis aus 16 - 22.01.2017 sein Richtig?

Rückgabe ist aber: 10.01.2017 - 15.01.2017 also alle Datumse aus der DT aber KW 2?? nicht die eingestellte KW 3

warum ist das so?

gebe ich KW 4 ein gibt die Funktion die Daten KW3 aus also 16.01.2017 - 22.01.2017 wenn vorhanden


 Private Function GetFreq1(ByVal week As Integer, _
       year As Integer, masch As Integer) As DataTable
        Dim dt As DataTable = TPMDB.Stoerungen
        Dim cal As Globalization.Calendar = _
           Globalization.CultureInfo.CurrentCulture.Calendar
 
 
        Dim q = From row As DataRow In dt
              Let wk As Integer = _
                cal.GetWeekOfYear(row.Field(Of Date)("Eintrag"), _
                Globalization.CalendarWeekRule.FirstDay, DayOfWeek.Monday)
              Where year = row.Field(Of Date)("Eintrag").Year _
                AndAlso wk = week _
                AndAlso row.Field(Of Integer)("MaschinenID") = masch
              Group By art = row.Field(Of String)("ArtderStörung") Into Count()
 
        Dim df As New DataTable
        df.Columns.Add("ArtderStörung") : df.Columns.Add("Count")
 
        For Each el In q
            df.Rows.Add(el.art, el.Count)
        Next el
 
        Dim bs As New BindingSource With {.DataSource = df}
Return df
End Function
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Stördaten Ereignisse auswerten2.256ERBRU21.04.17 06:34
Re: Stördaten Ereignisse auswerten1.508Manfred X21.04.17 08:03
Re: Stördaten Ereignisse auswerten1.425ERBRU21.04.17 08:48
Re: Stördaten Ereignisse auswerten1.409Manfred X21.04.17 12:29
Re: Stördaten Ereignisse auswerten1.391ERBRU21.04.17 16:48
Re: Stördaten Ereignisse auswerten1.432Manfred X21.04.17 17:34
Re: Stördaten Ereignisse auswerten1.367ERBRU21.04.17 20:33
Re: Stördaten Ereignisse auswerten1.640Manfred X21.04.17 21:51
Re: Stördaten Ereignisse auswerten1.381ERBRU22.04.17 15:45
Re: Stördaten Ereignisse auswerten1.403ERBRU22.04.17 15:56
Re: Stördaten Ereignisse auswerten1.492Manfred X22.04.17 16:50
Re: Stördaten Ereignisse auswerten1.375ERBRU22.04.17 17:12
Re: Stördaten Ereignisse auswerten1.402Manfred X22.04.17 17:23
Re: Stördaten Ereignisse auswerten1.409effeff22.04.17 18:06
Re: Stördaten Ereignisse auswerten1.421ERBRU22.04.17 18:36
Re: Stördaten Ereignisse auswerten1.402ERBRU23.04.17 12:58
Re: Stördaten Ereignisse auswerten1.410Manfred X23.04.17 14:45
Re: Stördaten Ereignisse auswerten1.359ERBRU23.04.17 15:35
Re: Stördaten Ereignisse auswerten1.387ERBRU25.04.17 06:11
Re: Stördaten Ereignisse auswerten1.384Manfred X25.04.17 08:17
Re: Stördaten Ereignisse auswerten1.360ERBRU25.04.17 15:14
Re: Stördaten Ereignisse auswerten1.555Manfred X25.04.17 16:14
Re: Stördaten Ereignisse auswerten1.415Franki26.04.17 03:24
Re: Stördaten Ereignisse auswerten1.402Manfred X26.04.17 07:09

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel