Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   [ Φόρμες ] Αύξουσα αρίθμηση σε πεδίο φόρμας (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/1181-aiksoysa-arithmisi-se-pedio-formas.html)

mgeorge 29-05-11 17:10

Αύξουσα αρίθμηση σε πεδίο φόρμας
 
Καλησπέρα και πάλι.

Θα ήθελα μια βοήθεια στο εξής.
Έχουμε σε φόρμα τα εξής 2 πεδία.
Στο ένα έχω ένα σύνθετο πλαίσο (ΚΑΤΑΣΤΑΣΗ) το οποίο έχει τις τιμές (Συμβόλαιο,Ανανέωση,Άκυρο,Π ρός ακύρωση) και το άλλο πεδίο είναι το (ΑΡ ΑΝΑΝΕΩΣΗΣ)

Θα ήθελα κάθε φορά που πατάω την επιλογή Ανανέωση από το πεδίο (ΚΑΤΑΣΤΑΣΗ) να αυξάνεται κατά 1 ο αριθμός στο πεδίο (ΑΡ. ΑΝΑΝΕΩΣΗΣ).

Meteora 29-05-11 20:10

Καλησπέρα

Πρόσφατα δόθηκε μια λύση στο θέμα της αυτοματοποιημένης αρίθμησης. Μπορείς να τη δεις εδώ και να γνωρίσεις μια ιδέα του φίλου μας Δημήτρη.

Να ρωτήσω όμως κάτι. Αν δεν είσαι σε περιβάλλον νέας εγγραφής, θες πάλι να αυξηθεί η αρίθμηση της τρέχουσας εγγραφής κατά ένα (+1) και σε σχέση με ποιάς εγγραφής το [ΑΡ_ΑΝΑΝΕΩΣΗΣ] ; Της προηγούμενης ή της τελευταίας που καταχωρήθηκε ή ...


Με εκτίμηση

Νίκος Δ.

mgeorge 29-05-11 20:20

Νίκο καλησπέρα.
Αυτό θα γίνεται πάντα σε υπάρχοντες πελάτες και όχι σε νέες εγγραφές,σε νέο πελάτη μπαίνει πάντα η επιλογή (συμβόλαιο).
Η αρίθμηση θέλω να αυξάνεται +1 βάση της προηγούμενης,π.χ αν ο αριθμός ανανέωσης είναι 3 πατώντας ανανέωση να αυξάνεται σε 4.
Επίσης την πρώτη φορά που θα επιλέξω ανανέωση να ξεκινάει από το 1.

Ευχαριστώ!!

Meteora 29-05-11 20:44

Γιώργο,
Βάλε προεπιλεγμένη (default) τιμή στο πεδίο [ΑΡ_ΑΡΙΘΜΗΣΗ] ίση με ένα (1). Να εργαστείς στο περιβάλλον σχεδίασης πίνακα.
Στο συμβάν 'Μετά την ενημέρωση' του πλαισίου ΚΑΤΑΣΤΑΣΗ γράψε κάτι σαν αυτό:

Κώδικας:

if me.ΚΑΤΑΣΤΑΣΗ ="Ανανέωση" then me.ΑΡ_ΑΝΑΝΕΩΣΗΣ = me.ΑΡ_ΑΝΑΝΕΩΣΗΣ +1
Αν όμως οι επιλογές του πλαισίου ΚΑΤΑΣΤΑΣΗ συνοδεύονται από ID, τότε γράψε κάπως έτσι:

Κώδικας:

if me.ΚΑΤΑΣΤΑΣΗ =2  then me.ΑΡ_ΑΝΑΝΕΩΣΗΣ = me.ΑΡ_ΑΝΑΝΕΩΣΗΣ +1
Καλή δουλειά αγαπητέ μου

Νίκος Δ.

mgeorge 29-05-11 21:45

Νίκο καθ' ότι άσχετος όταν στο (μετά από ενημέρωση) υπάρχει ήδη ο παρακάτω κώδικας τι κάνω;

Private Sub κατάσταση_AfterUpdate()
If Me.NewRecord Then Exit Sub
If Me.κατάσταση = "ανανέωση" Then
Me.έναρξη = Me.λήξη
comboDiarkia_AfterUpdate
End If
End Sub

Δικό σου δημιούργημα και αυτό.

Meteora 29-05-11 23:02

Απλά, προσθέτεις μια γραμμή Γιώργη!

Private Sub κατάσταση_AfterUpdate()
If Me.NewRecord Then Exit Sub
If Me.κατάσταση = "ανανέωση" Then
Me.έναρξη = Me.λήξη
me.ΑΡ_ΑΝΑΝΕΩΣΗΣ = me.ΑΡ_ΑΝΑΝΕΩΣΗΣ +1
comboDiarkia_AfterUpdate
End If
End Sub

Το πεδίο [ΑΡ_ΑΝΑΝΕΩΣΗΣ] δεν ξέρω αν το γράφω σωστά...

Καλή συνέχεια.

Νίκος Δ.

mgeorge 29-05-11 23:54

Νίκο είναι οκ,σε ευχαριστώ πάρα πάρα πολύ.

Καλό σου βράδυ!!

mgeorge 30-05-11 15:51

Νίκο καλησπέρα,
Θα μπορούσες να με βοηθήσεις και σε κάτι ακόμη;
Έχω 2 πεδία στην φόρμα (ΝΟΜΟΣ) και (ΑΛΛΗΛΟΓΡΑΦΙΑ).
Θα ήθελα όταν στο πεδίο ΝΟΜΟΣ βάζω ΑΤΙΚΗ ή ΑΤΙΚΗΣ το πεδίο ΑΛΛΗΛΟΓΡΑΦΙΑ να παίρνει την τιμή ΝΑΙ.
Στο πεδίο αλληλογραφία έχω ως προεπιλογή το ΟΧΙ.

Meteora 30-05-11 19:11

Καλησπέρα Γιώργο

Στο συμβάν "Με την εστίαση" του πεδίου [ΑΛΛΗΛΟΓΡΑΦΙΑ], γράψε :

Κώδικας:

if me.ΝΟΜΟΣ="ΑΤΙΚΗ" or me.ΝΟΜΟΣ="ΑΤΙΚΗΣ" then me.[ΑΛΛΗΛΟΓΡΑΦΙΑ]="ΝΑΙ"
Προσοχή όμως στα Ελληνικά ή στα Εγγλέζικα για το ΝΑΙ...

Αυτά αγαπητέ μου


Υστερολόγιο: Θα είχες πάρει απάντηση από άλλους φίλους-μέλη του Forum, αν η ερώτηση απευθυνόταν σε όλους...

mgeorge 30-05-11 19:51

Σε ευχαριστώ Νίκο,
Υπάρχει όμως το εξής πρόβλημα και το ερώτημα απευθύνεται και σε όποιοδήποτε άλλο φίλο που θα ήθελε να βοηθήσει.
Βάζοντας στο πεδίο ΝΟΜΟΣ (ΑΤΤΙΚΗΣ) το πεδίο ΑΛΛΗΛΟΓΡΑΦΙΑ αλλάζει σε ΝΑΙ εάν όμως μπήκε κατά λάθος και αλλάξεις το πεδίο ΝΟΜΟΣ π.χ σε ΘΕΣΣΑΛΟΝΙΚΗ δεν αλλάζει σε (ΟΧΙ) αλλά παραμένει το (ΝΑΙ) στο πεδίο αλληλογραφία.


Η ώρα είναι 17:12.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2