Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 08-03-10, 16:22
amy Ο χρήστης amy δεν είναι συνδεδεμένος
Όνομα: Ανδρέας
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 12-11-2009
Περιοχή: Πάτρα
Μηνύματα: 41
Προεπιλογή σφάλμα στη συννένωση κριτηρίων

Εκτελώ τον παρακάτω κώδικα και μου βγάζει λάθος MONO στην συννένωση των κριτηρίων is not Null AND is Null (to με κόκκινο font)...
Δοκίμασα και διάφορους άλλους συνδιασμούς μετά το googlισμα αλλά και πάλι δεν έκανα τίποτα...
οπότε οι έμπειροι ας βάλουν το χεράκι τους...

Κώδικας:
Private Sub cmd19_Click()
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "ERGASIES1"
If Me.group1.Value = 1 Then
DoCmd.OpenForm stDocName, acNormal
Else
    If Me.group1.Value = 2 Then
    stLinkCriteria = "DateFinished Is Null"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    Else
        If Me.group1.Value = 3 Then
        stLinkCriteria = "DateFinished Is not Null"
        DoCmd.OpenForm stDocName, , , stLinkCriteria
        Else
            If Me.group1.Value = 4 Then
            stLinkCriteria = "DateFinished Is not Null" And "DatePickedUp Is Null"
            DoCmd.OpenForm stDocName, , , stLinkCriteria
            Else
                 if Me.group1.Value = 5 Then
                stLinkCriteria = "[DateFinished]>=" & "#" & Me![Beginning Date] & "#" &  _ 
                                       "And [DateFinished]<=" & "#" &  Me![Ending Date] & "#"
                DoCmd.OpenForm stDocName, , , stLinkCriteria
                 End If
            End If
        End If
    End If
End If
End Sub
Τα πεδία DateFinished και DatePickedUp είναι πεδία Ημερομηνία/Ώρα και το σφάλμα του βγάζει είναι "type mismatch"

Τελευταία επεξεργασία από το χρήστη Tasos : 08-03-10 στις 16:34.
Απάντηση με παράθεση