[ Φόρμες ] Αύξουσα αρίθμηση σε πεδίο φόρμας

[Meteora]

Αφαίρεσε την εντολή που ήδη έχεις και ...

if me.ΝΟΜΟΣ="ΑΤΙΚΗ" or me.ΝΟΜΟΣ="ΑΤΙΚΗΣ" then
 me.[ΑΛΛΗΛΟΓΡΑΦΙΑ]="ΝΑΙ"
else
me.[ΑΛΛΗΛΟΓΡΑΦΙΑ]="ΟΧI"
end if

Πρόσεχε πάλι στο 'ΝΑΙ' και στο 'ΟΧΙ'

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

[mgeorge]

Είναι εντάξει,
Σε ευχαριστώ και πάλι.

[mgeorge]

Καλησπέρα σε όλους τους φίλους του forum.
Επανήλθα και χρειάζομαι ξανά την βοήθειά σας.

Χρησιμοποιώ την πιο πάνω εντολή και στο πεδίο (ΕΤΑΙΡΙΑ) ως εξής

if me.ΕΤΑΙΡΙΑ="DEMCO" or me.ΕΤΑΙΡΙΑ="ΕΘΝΙΚΗ" then
Me.[ΝΟΜΙΚΗ_ΠΡΟΣΤΑΣΙΑ] = "ΙΣΧΥΕΙ"
Else
Me.[ΝΟΜΙΚΗ_ΠΡΟΣΤΑΣΙΑ] = ""
End If

Το ερώτημα είναι πως επιλέγοντας ΕΘΝΙΚΗ από το πεδίο ΕΤΑΙΡΙΑ να μπαίνει το ΙΣΧΥΕΙ και στο πεδίο [ΟΔΙΚΗ ΒΟΗΘΕΙΑ] = "ΙΣΧΥΕΙ".

[Meteora]

Καλημέρα

Γιώργη, χαλάλι στο κουράγιο σου. Δεν το βάζεις κάτω. Αλλά με το διάβασμα δεν έχεις καλές σχέσεις...

Πρίν τη γραμμή του else γράψε : me.[ΟΔΙΚΗ ΒΟΗΘΕΙΑ] = "ΙΣΧΥΕΙ" και αμέσως μετά την γραμμή του: me.[ΟΔΙΚΗ ΒΟΗΘΕΙΑ] = ""

Με εκτίμηση

Νίκος Δ.

[mgeorge]

Καλησπέρα Νίκο,το παλεύω αλλά από κώδικα δεν έχω ιδέα,θα βρω πιστεύω κάποια στιγμή τον χρόνο και την διάθεση να κάτσω να μελετήσω και να μάθω κάποια πράγματα.

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

Θέλω όταν επιλέγω από το πεδίο ΕΤΑΙΡΙΑ την (DEMCO) να αναγράφεται μόνο στο πεδίο ΝΟΜΙΚΗ ΠΡΟΣΤΑΣΙΑ (ΙΣΧΥΕΙ) .

Όταν επιλέγω από το πεδίο ΕΤΑΙΡΙΑ την (ΕΘΝΙΚΗ) να αναγράφεται στο πεδίο ΝΟΜΙΚΗ ΠΡΟΣΤΑΣΙΑ (ΙΣΧΥΕΙ) αλλά και στο πεδίο ΟΔΙΚΗ ΒΟΗΘΕΙΑ (ΙΣΧΥΕΙ).

[Meteora]

Καλησπέρα

Αν επιλέξεις μια τρίτη ΕΤΑΙΡΕΙΑ, παράδειγμα την 'ΑΣΤΕΡΑΣ" τι πρέπει να γίνει, Γιώργη;

[mgeorge]

Τι εννοείς;

Σε κάποια τρίτη Εταιρία π.χ ο Αστέρας μπορεί να πρέπει να μπεί η ένδειξη ΙΣΧΥΕΙ μόνο στο πεδίο ΟΔΙΚΗ ΒΟΗΘΕΙΑ κ.λ.π,φαντάζομαι πως βλέποντας την λογική του κώδικα για να γίνεται το παραπάνω μπορώ μετά να κάνω και τα ανάλογα για τις άλλες Εταιρίες.

[Meteora]

Γιώργη,
Δες τη παρακάτω δομή και προσάρμοσέ την στην εφαρμογή σου.

select case me.ΕΤΑΙΡΕΙΑ
  case "DEMCO"
         Me.[ΝΟΜΙΚΗ_ΠΡΟΣΤΑΣΙΑ] = "ΙΣΧΥΕΙ"
  case "ΕΘΝΙΚΗ"
         Me.[ΝΟΜΙΚΗ_ΠΡΟΣΤΑΣΙΑ] = "ΙΣΧΥΕΙ"
         me.[ΟΔΙΚΗ ΒΟΗΘΕΙΑ] = "ΙΣΧΥΕΙ"    
  case "ASTERAS"
        <γράψε τι θες>
end select

Καλό βράδυ σε όλους μας...

Με εκτίμηση

Νίκος Δ.

[mgeorge]

Σε ευχαριστώ πολύ Νίκο,
Καλό βράδυ!!