Εμφάνιση ενός μόνο μηνύματος
  #6  
Παλιά 20-01-19, 19:43
nasos23 Ο χρήστης nasos23 δεν είναι συνδεδεμένος
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 455
Προεπιλογή

Παράθεση:
Μόλις δίνω τιμή στο σύνθετο πλαίσιο και το "apo-eos" είναι κενό εκτελώντας την
εντολή ανοίγει τη φόρμα 'fPelatiXreosiP' αλλά και τη "fPelatesXreosiP"
Γίνετε να μην ανοίγει από πίσω τη "fPelatesXreosiP"

If .........

If Nz(Me.Σύνθετο8, "") <> "" And Nz(Me.Apo, "") = "" Then
DoCmd.OpenForm "fPelatiXreosiP", , , "[a/aΠελατη]=" & Me![Σύνθετο8]
End If

If...........

Else
DoCmd.OpenForm "fPelatesXreosiP"
Γιάννη στη βάση που ανέβασα ο κώδικας ανοίγει μόνο την φόρμα "fPelatesXreosiP"
Που είδες τη φόρμα "fPelatiXreosiP";
Την κατέβασα δύο φορές για έλεγχο.
Παρόλα αυτά κάνε την αντικατάσταση με το παρακάτω:
Κώδικας:
If Nz(Me.Σύνθετο8, "") <> "" And Nz(Me.Apo, "") = "" Then
    DoCmd.OpenForm "fPelatesXreosiP", , , "[a/aΠελατη]=" & Me![Σύνθετο8]
    End If
Καλή συνέχεια.
Απάντηση με παράθεση