title image


Smiley Wo liegt hier der Fehler?
Hallo, ich habe folgendes programmiert:



Do Until rs_stoffe.EOF

SQL = "SELECT * FROM tbl_navimport WHERE lieferantennr = '" & lieferantennr & "' AND StoffNr = '" & rs_stoffe![StoffNr] & "'"

Set rs_artikel = CurrentDb.OpenRecordset(SQL)

If Not rs_artikel.NoMatch Then

rs_artikel.MoveLast

anzahl = rs_artikel.RecordCount

rs_artikel.MoveFirst

Do Until rs_artikel.EOF

menge = menge + rs_artikel![stoffmenge]

rs_artikel.MoveNext

Loop

End If

rs_stoffe.MoveNext

Loop



So lange, wie das Recordsert Datensätze beinhaltet, läuft alles. Ist das Recordset aber leer, bekomme ich die Fehlermeldung "Kein aktueller Datensatz". Der Debugger steht dann auf "rs_artikel.MoveLast". Aber durch das "nomatch" sollte doch eigentlich ein leeres Recordset abgefangen sein, oder?




Grüße aus OWL!



Eckdaten:
Access-Version: Access 2003
Betriebssystem: Windows XP Pro


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: