
04-07-13, 15:31
|
| Όνομα: Χρήστος Φ. Έκδοση λογισμικού Office: Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 20-12-2010 Περιοχή: Θεσσαλονίκη
Μηνύματα: 498
| |
Μετάβαση από μια φόρμα σε άλλη
Γεια σας...
Ζητώ την βοήθειά σας στο εξής:
Έχω 2 φόρμες frm1 και frm2
Απο' την frm1 πηγαίνω στην frm2:
(κουμπί στην frm1)
DoCmd.OpenForm "frm2", , , "[ID]=" & [ID] (κοινόπεδίο ---> ID ---> Αριθμός)
και η frm1 κλείνει.
Απ' την frm2 θέλω να ανοίξει η frm1, με όλες τις εγγραφές και να επιλεχθεί αυτή με το συγκεκριμένο ID (Όχι να φιλτραριστεί!)
Τι διορθώσεις πρέπει να κάνω στον παρακάτω κώδικα;
(κουμπί στην frm2)
Dim RecID As Long
RecID = Nz(Me.ID)
With Me.Recordset.Clone
DoCmd.OpenForm "frm1"
.FindFirst "[ID]=" & RecID
If Not .NoMatch Then Me.Bookmark = .Bookmark
End With
DoCmd.Close acForm, "frm2"
|