
03-09-15, 17:12
|
| Όνομα: Χρήστος Φ. Έκδοση λογισμικού Office: Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 20-12-2010 Περιοχή: Θεσσαλονίκη
Μηνύματα: 498
| |
Μπορούμε να προσαρμόσουμε την εξής λειτουργία;
Όταν γίνει διπλοεγγραφή τότε αφού δώσει το μήνυμα να "εντοπίσει και να μεταβεί" στην (υπάρχουσα) εγγραφή με τα ίδια fld1 και fld2.
Με το παρακάτω καταφέρνω να μεταβεί στην εγγραφή με το ίδιο fld1 (αλλά όχι και με το ίδιο fld2!)
Dim GoToDate As Date
Dim GoToNum As Long
GoToDate = Me.fld2
GoToNum = Me.fld1
With Me.Recordset.Clone
.FindFirst ("[fld1]=" & GoToNum)
If Not .NoMatch Then
Me.Bookmark = .Bookmark
End If
End With
Το επιθυμητό είναι, αλλάζοντας το 2/3/2015 σε 2/9/2015 να μεταβαίνει στην εγγραφή με IDA=6 και όχι IDA=2!
Τελευταία επεξεργασία από το χρήστη Χρήστος : 16-10-16 στις 18:56.
|