Problem bei Update Anweisung

[Dusty00]

Hy Leute,

Ich habe folgendes Problem, ich schreibe über mehrer Forms hinweg öfters mal in dieselbe Tabelle (Verwende VB6 + Access DB). Wenn ich dann zu der letzten Form gelange und sozusagen die letzte Update Anweisung ausgeführt werden soll passiert manchmal (nicht immer) folgendes:

Laufzeitfehler '-2147467259

Aktualisierung momentan nicht möglich gesperrt.

########################################################################

Code:

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

Status = "Reserviert"

Status1 = "Vermietet"


rs.Source = "UPDATE KontainerNr set Status=""" & Status1 & """ where Status = """ & Status & """ "

        rs.Open rs.Source, conn, adOpenKeyset, adLockOptimistic

########################################################################

Wisst Ihr vielleicht, was diese Fehlermeldung zu bedeuten hat?
Ich hoffe Ihr könnt mir helfen!

mfg

dusty