SQL Nächsten Termin auslesen

  • VB.NET

Es gibt 26 Antworten in diesem Thema. Der letzte Beitrag () ist von mikeb69.

    SQL Nächsten Termin auslesen

    Hey Leute :)

    ich bin in SQL noch ein ziemlicher Bob... :D
    Ich habe ein Panel mit Labels, indem der nächste Termin angezeigt wird^^.
    So, nach Datum auslesen klappt ja.
    Aber nach der Uhrzeit nicht...

    Wie schaffe ich es dann auch noch nach der Uhrzeit auszulesen?
    Ich habe mir so gedacht ich nehme alle Datensätze mit einem Reader raus, die das näheste Datum beinhalten.
    Danach überprüfe ich auf die näheste Uhrzeit, auch mit einem Reader.

    Aber wie schaff ich des? Bin bisher schonmal so weit gekommen.. (Funktioniert)
    Wie gesagt, bin Neuling:

    Spoiler anzeigen


    VB.NET-Quellcode

    1. Try
    3. Dim strSQL As String
    4. Dim con As New SqlConnection
    5. Dim cmd As SqlCommand
    6. Dim reader As SqlDataReader
    8. strSQL = "Select TOP 1 * from Termine order by Datum"
    10. con = New Data.SqlClient.SqlConnection(AB.UserConnectionString)
    11. con.Open()
    13. cmd = New SqlCommand(strSQL, con)
    14. reader = cmd.ExecuteReader
    16. If reader.HasRows Then
    18. reader.Read()
    20. Me.textbox_TerminDatum.Text = reader("Datum").ToString.Trim
    21. Me.textbox_TerminKurzinfo.Text = reader("Komplettbeschreibung").ToString.Trim
    22. Me.textbox_TerminMitarbeiter.Text = reader("Mitarbeiter").ToString.Trim
    23. Me.textbox_TerminPrioritaet.Text = reader("Priorität").ToString.Trim
    24. Me.textbox_TerminUhrzeit.Text = reader("Uhrzeit").ToString.Trim
    26. Else
    28. Me.textbox_TerminDatum.Text = "-"
    29. Me.textbox_TerminKurzinfo.Text = "-"
    30. Me.textbox_TerminMitarbeiter.Text = "-"
    31. Me.textbox_TerminPrioritaet.Text = "-"
    32. Me.textbox_TerminUhrzeit.Text = "-"
    34. End If
    36. reader.Close()
    37. cmd.Dispose()
    38. con.Close()
    39. con.Dispose()
    41. Catch ex As Exception
    43. MessageBox.Show(ex.Message)
    45. End Try



    Würde mich echt freuen wenn ihr helfen könntet^^.
    Danke für eure Hilfe.

    Mfg

    Skype

    SQL-Abfrage

    1. SELECT * FROM `termin` WHERE `datum` >= NOW() AND `Uhrzeit` >= NOW() ORDER BY `datum`, `Uhrzeit` ASC LIMIT 1


    Wobei es hierbei einfacher wäre wenn Datum + Uhrzeit in einer Spalte sind

    SQL-Abfrage

    1. SELECT * FROM `termin` WHERE `datumzeit` >= NOW() ORDER BY `datumzeit` ASC LIMIT 1

    Mhm. Weil ich dachte das er funktioniert. =o
    Aber bei mir kommt eine Fehlermeldung beim einlesen. "NOW wird nicht als integrierte Funktion erkannt" =(

    Edit: sry, die exakte Fehlermeldung ist: "'NOW' wird nicht als Name einer integrierten Funktion erkannt."

    Musste selbst mal suchen wie die aktuelle Zeit in deiner SQL Version auslesen kannst. Ansonsten über die Zeit von VB machen, geht ja auch. Normal nutze ich aber lieber die Zeit des SQL Servers als die des Clienten, weil die ja falsch sein könnte und dann die Abfrage nicht richtige Ergebnisse liefert.

    Hallo Skype,

    dann bau dir doch deinen String so dass du die VB Funktion

    VB.NET-Quellcode

    1. now
    verwenden kannst.

    Wie meinst du das, ob das in einer WindowsForm läuft?

    Greife ich auf eine MSSQL DB zu, geschieht das immer mittels ASP.NET
    Deshalb die Frage.

    Gruss

    mikeb69

    @mike: wie ich in einen meiner Posts schon erwähnte ist es nicht ratsam die Zeit des Clienten zu nehmen, würde man am Client das Datum umstellen, würde der falsche Datensatz aus der Datenbank geholt.
    Gut da es sich hierbei im eine lokale DB handelt käme es aufs selbe heraus, aber allgemein würd ich in der Hinsicht scohn sauber Programmieren. Ich bin mir sicher dass auch MSSQL Funktionen bereitstellt die die aktuelle Zeit ausgeben können. Leider habe ich momentan kein MSSQL Server wo ich sowas testen könnte.

    Also, wie gesagt. Ich habe keinen Plan was der Unterschied zwischen MySQL und MSSQL. Ich weiss nichtmal, womit ich da eigentlich programmiere aber ich kann auf jeden fall die Basics xD.
    Ich weiss nur, das ich einen Microsoft SQL Server 2008 R2 habe, und mir da auch die Datenbanken erstelle. Alles per VB Code. Mit create usw.

    Spoiler anzeigen


    VB.NET-Quellcode

    1. Sub NaechsterTermin()
    3. Dim Zeit As String
    4. Dim Stunde As String
    5. Dim Minute As String
    7. If Now.Hour < 10 Then
    9. Stunde = "0" & Now.Hour.ToString
    11. Else
    13. Stunde = Now.Hour
    15. End If
    17. If Now.Minute < 10 Then
    19. Minute = "0" & Now.Minute.ToString
    21. Else
    23. Minute = Now.Minute
    25. End If
    27. Zeit = Stunde & ":" & Minute
    29. Try
    31. Dim strSQL As String
    32. Dim con As New SqlConnection
    33. Dim cmd As SqlCommand
    34. Dim reader As SqlDataReader
    36. strSQL = "SELECT TOP 1 * FROM Termine WHERE Datum >= " _
    37. & Now.Date.ToString.Replace(" 00:00:00", "") & " AND Uhrzeit >= " _
    38. & Zeit & " ORDER BY Datum, Uhrzeit"
    40. con = New Data.SqlClient.SqlConnection(AB.UserConnectionString)
    41. con.Open()
    43. cmd = New SqlCommand(strSQL, con)
    44. reader = cmd.ExecuteReader
    46. If reader.HasRows Then
    48. reader.Read()
    50. Me.textbox_TerminDatum.Text = reader("Datum").ToString.Trim
    51. Me.textbox_TerminKurzinfo.Text = reader("Komplettbeschreibung").ToString.Trim
    52. Me.textbox_TerminMitarbeiter.Text = reader("Mitarbeiter").ToString.Trim
    53. Me.textbox_TerminPrioritaet.Text = reader("Priorität").ToString.Trim
    54. Me.textbox_TerminUhrzeit.Text = reader("Uhrzeit").ToString.Trim
    56. Else
    58. Me.textbox_TerminDatum.Text = "-"
    59. Me.textbox_TerminKurzinfo.Text = "-"
    60. Me.textbox_TerminMitarbeiter.Text = "-"
    61. Me.textbox_TerminPrioritaet.Text = "-"
    62. Me.textbox_TerminUhrzeit.Text = "-"
    64. End If
    66. reader.Close()
    67. cmd.Dispose()
    68. con.Close()
    69. con.Dispose()
    71. Catch ex As Exception
    73. MessageBox.Show(ex.Message)
    75. End Try
    77. End Sub




    Habe es jetzt mal so versucht, jedoch kommt eine Fehlermeldung, das meine Syntax falsch ist.
    Fehlermeldung:

    "Falsche Syntax in der Nähe von '.2012' "

    Wenn ich Debugge, schaut mein strsql so aus:

    SELECT TOP 1 * FROM Termine WHERE Datum >= 15.02.2012 AND Uhrzeit >= 10:23 ORDER BY Datum, Uhrzeit

    Danke für eure Geduld mit mir :((

    Ein Datum muss unter Hochkomme (') sein.

    SQL-Abfrage

    1. SELECT TOP 1 * FROM Termine WHERE Datum >= '02/15/2012' AND Uhrzeit >= '10:23' ORDER BY Datum, Uhrzeit


    obwohl ich mir nicht sicher bin ob eine Uhrzeit alleine funktioniert.
    Ansonsten

    SQL-Abfrage

    1. SELECT TOP 1 * FROM Termine WHERE Datum >= '02/15/2012' AND Uhrzeit >= '02/15/2012 10:23:00' ORDER BY Datum, Uhrzeit


    wie oben bereits erwähnt ist getdate() aktuelle Systemuhrzeit + Datum

    In deinem Fall wenn ich es richtig verstehe was du ausgeben willst

    SQL-Abfrage

    1. SELECT TOP 1 * FROM Termine WHERE Datum >= getdate() ORDER BY Datum, Uhrzeit


    lg
    ScheduleLib 0.0.1.0
    Kleine Lib zum Anlaufen von Code zu bestimmten Zeiten

Facebook
Telefonspende