3. DB-Beispiel: Updaten

Das Updaten eines Datensatzes funktioniert mit 2 Unterschieden gleich wie das Einfügen:

Das SQL-Statement enthält eine Where-Bedingung, die einen einzelnen Datensatz zurückliefert. Normalerweise verwendet man dazu den Primärschlüssel.
objrs.AddNew fällt weg

Dim objcon, objrs, strsql 
Set objcon = Server.CreateObject("ADODB.Connection") 
  
objcon.Open _
  "DRIVER={Microsoft Access Driver (*.mdb)}; " & _ 
  "DBQ=" & Server.MapPath("/fpdb/dbpers.mdb") 
  
Set objrs = Server.CreateObject("ADODB.Recordset") 
strsql = "SELECT * FROM tblpersonen " & _
  "WHERE personennr = 1" 
  
'Recordset für Änderungen öffnen 
objrs.Open strsql, objcon, 1, 3 
  objrs("nachname")= "Frei" 
objrs.Update

Access-Datenbank für die Übungen 6.8