title image


Smiley Re: Datensatz "einfach" duplizieren
Also - in Gottes Namen: "einfach" geht das gar nicht - da das Duplizieren von Daten in der Datenbank nicht unbedingt vorgesehen und eher unerwünscht ist. Ich erspare dir aber jetzt die Grundsatzdiskussion...In DAO geht das so:Dim DB as Database, RS as Recordset, RSN as RecordsetSet DB = CurrentDBSet RS = DB.Openrecordset("SELECT * FROM MeineTabelle WHERE ID =" & ID, dbopensnapshot)Set RSN = DB.Openrecordset("MeineTabelle",dbopenDynaset)If NOt RS.Eof then RSN.Addnew For Each Fld in RS.Fields If Fld.Name "ID" then RSN(Fld.Name) = Fld.Value Next RSN.UpdateEnd IfRS.CloseRSN.CloseDB.CloseDieses Beispiel geht davon aus, dass der zu duplizierende Datensatz über ein Autowert-Primärschlüsselfeld "ID" durch eine Variable namens "ID" identifiziert wird.Je nachdem, ob du den Datensatz aus einem Formular holst, wie die Schlüssel aussehen, ob es Text- oder Zahlenfelder sind, usw. usw., kann die Angelegenheit auch anders aussehen...Wenn du "einfach nur" in einem Formular einen Datensatz kopieren willst, kannst du auch den vom Schaltflächenassistenten erstellten Code für "Datensatz duplizieren" verwenden (der das ganze knapp, aber nicht gerade ideal mit Docmd-Konstrukten löst).Reinhard


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: