Guten Abend,
ich habe folgendes Problem:
Laufzeitfehler '3021':
Entweder BOF oder EOF ist True, oder der aktuelle Datensatz wurde gelöscht. Der angeforderte Vorgang benötigt einen aktuellen Datensatz.
CODE:
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim anzahl As Integer
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.Provider = "Microsoft.Jet.OLEDB.4.0"
cn.Open "Data Source=F:\zeugnis.mdb"
rs.ActiveConnection = cn
rs.Open "SELECT SchuelerID FROM Schueler WHERE name like '" & Me.txtName.Value & "';", cn, , adLockOptimistic
rs.Open "SELECT SchuelerID FROM Schueler WHERE name like '" & Me.txtName.Value & "';", cn, , adLockOptimistic
CODE ENDE
hier bekomm ich einen leeren RS und kann mir nicht erklären warum. Kann mir das evt. jemand erklären ?
Danke
Gruß Basti |