Hey Leute
ich bin in SQL noch ein ziemlicher Bob...
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
Würde mich echt freuen wenn ihr helfen könntet^^.
Danke für eure Hilfe.
Mfg
Skype
ich bin in SQL noch ein ziemlicher Bob...
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:
VB.NET-Quellcode
- Try
- Dim strSQL As String
- Dim con As New SqlConnection
- Dim cmd As SqlCommand
- Dim reader As SqlDataReader
- strSQL = "Select TOP 1 * from Termine order by Datum"
- con = New Data.SqlClient.SqlConnection(AB.UserConnectionString)
- con.Open()
- cmd = New SqlCommand(strSQL, con)
- reader = cmd.ExecuteReader
- If reader.HasRows Then
- reader.Read()
- Me.textbox_TerminDatum.Text = reader("Datum").ToString.Trim
- Me.textbox_TerminKurzinfo.Text = reader("Komplettbeschreibung").ToString.Trim
- Me.textbox_TerminMitarbeiter.Text = reader("Mitarbeiter").ToString.Trim
- Me.textbox_TerminPrioritaet.Text = reader("Priorität").ToString.Trim
- Me.textbox_TerminUhrzeit.Text = reader("Uhrzeit").ToString.Trim
- Else
- Me.textbox_TerminDatum.Text = "-"
- Me.textbox_TerminKurzinfo.Text = "-"
- Me.textbox_TerminMitarbeiter.Text = "-"
- Me.textbox_TerminPrioritaet.Text = "-"
- Me.textbox_TerminUhrzeit.Text = "-"
- End If
- reader.Close()
- cmd.Dispose()
- con.Close()
- con.Dispose()
- Catch ex As Exception
- MessageBox.Show(ex.Message)
- End Try
Würde mich echt freuen wenn ihr helfen könntet^^.
Danke für eure Hilfe.
Mfg
Skype