Datenbankeintrag editieren bringt Fehler

[thomson]

Hallo, habe folgenden CODE

 ' Daten löschen, falls vorhanden
  oConn.Execute "DELETE FROM Solutions WHERE ID=" & SWFed13
  
  ' Daten anlegen
  oRS.Open "SELECT * FROM Solutions", oConn
  oRS.AddNew
  oRS!ID = SWFed13
  oRS!Synopsis = SWFed1
  oRS!EntryDate = SWFed1
  oRS!Solution = SWFed1
  oRS!Link = SWFed13
  oRS!Product = SWFed3
  oRS!Version = SWFed4
  oRS!DateCreated = SWFed5
  oRS!DateChanged = SWFed6
  oRS!PersonCreated = SWFed7
  oRS!PersonChanged = SWFed8
  oRS!SearchCriteria = SWFed9
  oRS!EntryState = SWFed10
  
  
  
  
  oRS.Update
  oRS.Close

Folgendes Problem, es erscheint eine Fehlermeldung das das aktuelle Recordset keine Aktualisierung unterstützt!

 

[thomson]

OK OK

Hab es anders gemacht, wenigstens gehts dann