Hallo,
habe ein Problem mit meiner SQL Abfrage.
In einer Datenbank stehen Uhrzeiten. Diese werden Zyklisch abgefragt und sollen dann angezeigt werden:
Leider bekomme ich immer wieder einen Syntaxfehler. Weis jemand wo mein Fehler liegt?
habe ein Problem mit meiner SQL Abfrage.
In einer Datenbank stehen Uhrzeiten. Diese werden Zyklisch abgefragt und sollen dann angezeigt werden:
Visual Basic-Quellcode
- Private Sub Timer1_Timer()
- dsFilter = Format(Time, "hh:mm:ss")
- dsTabelle = "Programm"
- Call subÖffnen
- End Sub
- Private Sub subÖffnen()
- Dim itmX As ListItem
- Datei = "c:\Datenbank.mdb"
- Set db = New ADODB.Connection
- strdb = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
- Datei
- db.Open strdb
- Set rst = New ADODB.Recordset
- rst.CursorType = adOpenStatic
- rst.LockType = adLockOptimistic
- rst.Open "SELECT Zeit FROM " & dsTabelle & " WHERE " & dsFilter, db
- ListView1.ListItems.Clear
- Do While Not rst.EOF
- Set itmX = ListView1.ListItems.Add(, , rst!Zeit)
- itmX.SubItems(1) = rst!Aktion
- rst.MoveNext
- Loop
- End Sub
Leider bekomme ich immer wieder einen Syntaxfehler. Weis jemand wo mein Fehler liegt?
