Blümchen - 28.07.11 09:00

Also, es wird eine Kopie sein in ein und derselben Tabelle. Und es sollten nur bestimmte Felder kopiert werden. Ich habe halt die Haupttabelle und auf dieser Basis habe ich verschiedene Abfragen gebildet und als Kriterium immer die jeweilige Anlage. Und da war das Problem mit der Anfügeabfrage. Der Code sah so aus:

Dim strSQL As String

strSQL = "INSERT INTO Produkte_Basis ( Betrieb, Aggregat1, " & _
...
"Sonderanweisungen, Notizen ) " & _
"SELECT Betrieb, Aggregat1, ZielID1,IstStart_Aggr1, IstEnd_Aggr1, " & _
...
"FROM Produkte_Basis " & _
"WHERE ID=137;"

CurrentDb.Execute strSQL, dbFailOnError

Aber das Problem ist ja, dass ich wenn ich diesen Code wähle ich nur exakt ID 137 in V3 kopieren kann. Und dass alle Felder kopiert werden. Aber der Code sollte ja flexibel einsetzbar sein. Was jedoch auch möglich wäre, wäre vorher zu fragen wo man hinkopieren will. Aber für den Anwender wäre das flexible ja besser, damit es nicht unnötig aufwendiger ist.