25-06-10, 17:49
|
| Super Moderator Όνομα: Αγγελος Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 29-04-2010
Μηνύματα: 111
| |
Δημήτρη καλησπέρα,
ρίξε μια ματιά στο παρακάτω: Κώδικας: Function SQLDate(vDate As Variant) As String
If IsDate(vDate) Then
SQLDate = Format$(vDate, "mm\/dd\/yyyy")
End If
End Function
Κώδικας: Dim varWhere As Variant
If Me.fromdeldate > "" Then
varWhere = varWhere & "[DEL_DATE] >=#" & SQLDate(Me.fromdeldate) & "# AND "
Αυτό θα σου λύσει το θέμα σου με τις αναζητήσεις..
Φιλικά, Άγγελος
|