[pakos]

Καλησπέρα


για δοκίμασε κάτι τέτοιο

Me.strV = "'" & Me.ΩΠ_ΣΗΜΑΤΟΣ_ΑΠΑΓΟΡΕΥΣΗΣ & "', '" & Me.ID_ΑΠΑΓΟΡΕΥΣΗΣ & "', '" & Me.ΩΠ_ΣΗΜΑΤΟΣ_ΑΡΣΗΣ & "','" & Me.ID_PLOIOU & "','" & Me.ΚΩΔ_ΕΚΔΟΤΗ & "','" & Me.ΗΜΕΡΟΜΗΝΙΑ_ΛΗΞΗΣ_ΑΡΣΗΣ & "','" & Me.sxolia
Me.Refresh

DoCmd.RunSQL "INSERT INTO [ΑΡΣΕΙΣ ΑΠΑΓΟΡΕΥΣΕΙΣ] ( [ΩΠ ΣΗΜΑΤΟΣ ΑΠΑΓΟΡΕΥΣΗΣ], [ID ΑΠΑΓΟΡΕΥΣΗΣ], [ΩΠ ΣΗΜΑΤΟΣ ΑΡΣΗΣ], ID_PLOIOU, [ΚΩΔ ΕΚΔΟΤΗ], [ΗΜΕΡΟΜΗΝΙΑ ΛΗΞΗΣ ΑΡΣΗΣ], [ΚΩΔ ΕΙΔΟΥΣ ΑΡΣΗΣ], sxolia, strV ) " & _
" SELECT [Φόρμες]![pros_arsi]![ΩΠ ΣΗΜΑΤΟΣ ΑΠΑΓΟΡΕΥΣΗΣ], [Φόρμες]![pros_arsi]![ID ΑΠΑΓΟΡΕΥΣΗΣ], [Φόρμες]![pros_arsi]![ΩΠ ΣΗΜΑΤΟΣ ΑΡΣΗΣ], [Φόρμες]![pros_arsi]!ID_PLOIOU, [Φόρμες]![pros_arsi]![ΚΩΔ ΕΚΔΟΤΗ], [Φόρμες]![pros_arsi]![ΗΜΕΡΟΜΗΝΙΑ ΛΗΞΗΣ ΑΡΣΗΣ], [Φόρμες]![pros_arsi]![ΚΩΔ ΕΙΔΟΥΣ ΑΡΣΗΣ], [Φόρμες]![pros_arsi]!sxolia, [Φόρμες]![pros_arsi]!strV " & _
";"



στον πίνακα [ΑΡΣΕΙΣ ΑΠΑΓΟΡΕΥΣΕΙΣ] πρέπει να έχεις και το πεδίο [strV] επίσης και στην
φόρμα [pros_arsi] πρέπει να έχεις το πεδίο [strV] στο οποίο δεν θα βάζεις τιμή, θα παίρνει σύμφωνα με τον κώδικα