
13-02-12, 17:40
|
| Όνομα: Σάκης Έκδοση λογισμικού Office: Ms-Office 2003 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 04-02-2012
Μηνύματα: 49
| |
Τάσο, συγγνώμη που επανέρχομαι και πάλι, αλλά εντόπισα ένα λάθος.
Το ερώτημα Update ήθελα να εκτελείται εφόσον το need_call = true. Αν είναι false δηλαδή, δε θα ήθελα να επηρεάζει τα need_calls της υποφόρμας.
Γι'αυτό λοιπόν έβαλα τον εξής κώδικα
Dim strSQL As String
strSQL = "UPDATE Periexomena_Paraggelias SET Periexomena_Paraggelias.need_call = " & _
Nz(Me.need_call) & " WHERE [code] =" & Nz(Me.code)
If Me.need_call = True Then
CurrentDb.Execute strSQL
End If
Me.Refresh
Ο λόγος που χρησιμοποίησα την If είναι γιατί δεν μπορούσα στο Where να βάλω δεύτερο κριτήριο.
Έγραφα λοιπόν το εξής.
Dim strSQL As String
strSQL = "UPDATE Periexomena_Paraggelias SET Periexomena_Paraggelias.need_call = " & _
Nz(Me.need_call) & " WHERE [code] =" & Nz(Me.code) and Me.need_call = true
CurrentDb.Execute strSQL
Me.Refresh
End Sub
Αυτό που ήθελα να κάνω το πέτυχα με If, αλλά θα ήθελα να ξέρω πως γράφω σωστά τον παραπάνω κώδικα.
|