Alexander Ganz: An geklontes Recordset Spalten anhängen

Beitrag lesen

Hallo Allerseits,

im Moment experimentiere ich gerade mit geklonten Recordsets.
Ich möchte gerne an ein bestehendes Recordset zusätzliche Spalten hängen. Dabei ist mir aufgefallen, daß die Append Methode dabei anscheinend nicht greift. Ich versuche das so:

Set cRS = DBRS.Clone ' Das Recordset aus Der DB in Recordset cRS schieben
DBRS.Close ' RecordSet aus DB schliessen
Set DBRS = Nothing ' und zerstören
cRS.Fields.Append "MeineSpalte", adVarChar, 50 'Neue Spalte anhängen
cRS.Open
cRS.AddNew ' Jetzt will ich das ding mit nem Wert füllen
cRS("MeineSpalte") = "huhu" ' Fehler! Die Spalte kann nicht gefunden werden :-(

Mache ich irgendwas falsch oder ist es schlichtweg nicht möglich an ein bereits erstelltes Recordset noch zusätzliche Spalten anzuhängen?
Besonders verwirrt mich, daß die Append Methode keinen Fehler wirft. Also müsste der Fehler ja woanders liegen.
Weiss jemand was?

Viele Grüße
Alex