Problem beim Kopieren von Datensatz mit gefülltem Memofeld

[Stefen Baetge]

Hallo zusammen,

ich möchte gern einen Datensatz (Access 2000) mit Hilfe eines Buttons im Formular (hier wird der Datensatz optisch aufbereitet und kann gepfelgt werden) kopieren. Da nicht alle zu kopierenden Datenfelder im Formular angezeigt werden (es gibt noch einen Button für Details, das funzt auch alles), muss ich den Weg über eine Anfügeabfrage gehen, was ja an sich auch noch kein Problem ist, aber sobald in einem Memofeld (pro Datensatz gibt es zwei davon) ein etwas längerer Text steht, wirft mir Access die folgenden Fehlermeldung aus: Laufzeitfehler 3271, Ungültiger Eigenschaftswert. Ist das Memofeld leer oder nur mit kurzem Text gefüllt, klappt alles wunderbar?!?

Hier zum besseren Verständnis noch ein Auszug aus dem "fehlerhaften" VB-Script:
Dim dbs As Object
Dim ws As Object
Dim blnTransaction As Boolean
Dim qry As Object
Dim qry2, qry3 As Object
Dim rs, rs2 As Object
Dim neueID As Long

Screen.MousePointer = 11

Set dbs = CurrentDb

Set ws = DBEngine.Workspaces(0)

Set qry = dbs.QueryDefs("LeseArtikeldaten")
qry("ID_") = ID

Set rs = qry.OpenRecordset()

Set qry2 = dbs.QueryDefs("KopiereArtikeldaten")
Set qry3 = dbs.QueryDefs("NeueArtikeldatenID")

qry2("Infotext_") = rs("Infotext") ***HIER IST DER FEHLER***
qry2("Artikelnummer_") = rs("Artikelnummer")
qry2("Lieferantenartikelnummer_") = rs("Lieferantenartikelnummer")
qry2("Bezeichnung_") = rs("Bezeichnung")
qry2("Aktiontxt_") = rs("Aktiontxt")
....