Εμφάνιση ενός μόνο μηνύματος
  #8  
Παλιά 26-05-13, 16:41
vourosp Ο χρήστης vourosp δεν είναι συνδεδεμένος
Όνομα: Παύλος
Έκδοση λογισμικού Office: Ms-Office 2010, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 21-05-2013
Μηνύματα: 9
Προεπιλογή

Ναι όλα σωστά.
Την διαγραφή θα την απαγορέψω στην φόρμα, αλλά αν γίνει τότε ναι πρέπει να γίνει επαναρίθμηση για να αντικατασταθούν τα δεδομένα που είχε κρατήσει στην μνήμη της η ταμειακή.

Το “SecondCode” νομίζω το πέτυχα δίνοντάς του DefaultValue = Val(Count([SecondCode])+1), και Requery:
Private Sub Form_BeforeInsert(Cancel As Integer)
Requery
Recordset.AddNew
End Sub

Το μόνο πρόβλημα ότι μετά την ενημέρωση νέου προϊόντος στο τελευταίο tab φεύγει και δεν σου αφήνει ανοιχτή την τελευταία καταχώρηση να την δεις.
Το “tblEnum” δεν μπορώ να το ενημερώσω με τίποτα!

Ευχαριστώ.
Συνημμένα Αρχεία
Τύπος Αρχείου: zip ΕΙΔΗ (3).zip (45,9 KB, 25 εμφανίσεις)
Απάντηση με παράθεση