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/2302-enimerosi-deytereioysas-formas.html)

dmarop 22-01-13 15:34

Ενημέρωση δευτερεύουσας Φόρμας
 
1 Συνημμένο(α)
Γεια σας,

Θέλω την βοηθειά σας για ακόμη μια φορά.

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

Ευχαριστώ,

Φιλικά
Δημήτρης

nasos23 22-01-13 16:04

Καλησπέρα σε όλους.
Δημήτρη
Διόρθωσε τον κώδικα ως εξής:
Κώδικας:

Private Sub Εντολή31_Click()
  Forms![contactlist]![senddate].Form.Recordset.AddNew
  Forms![contactlist]![senddate].Form.senddate = Date
End Sub

Φιλικά
Νάσος

dmarop 22-01-13 16:39

1 Συνημμένο(α)
Καλησπέρα,

Ευχαριστώ για την απάντηση.

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

Σας επισυνάπτω ξανά το αρχείο.

φιλικά,
Δημήτρης

ασχετος 22-01-13 17:43

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

Δημήτρη,

στο συμβάν click τοθ κουμπιού Upadate, βάλε αυτόν τον κώδικα
Κώδικας:

    CurrentDb.Execute "INSERT INTO senddate (idCont,senddate) " & _
                      "VALUES (" & Me.id & ",#" & Me.today & "#)"
    Me.Refresh


dmarop 22-01-13 19:31

Καλησπέρα,

Σ΄ευχαριστώ για την απάντησή σου, να είσαι καλά!

Δημήτρης


Η ώρα είναι 23:39.

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


Search Engine Optimization by vBSEO 3.3.2