![](/forum/profile/get-photo.asp?memberid=27&type=profile&rnd=376) Elite Veteran
Beiträge: 860
![500](http://www.donkarl.com/forum/images/decorations/multiple/500.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) Ort: Wien | Hallo!
haprill - 12.07.13
auf einem anderen Rechner Windows 7, Runtime Access 2010 mit dem Fehler
"Kompilierungsfehler. in Abfrageausdruck (((t_Auftrag.Bezahlt)=False) AND (([RG-Datum]+14)<Date()))" anzeigt.
Auslöser ist die mit einem Formular verbundene Abfrage
...
Nach verschiedenen Anpassungen habe auch schon die Fehlermeldung: "Funktion steht in Ausdrücken nicht zur Verfügung" erhalten...
Wenn der Fehler nur mit Date() auftritt - das gibt's mysteriöserweise manchmal - dann kannst du es mit einem Workaround versuchen. Eine Variante wäre:
CLng(Now())
Eine andere Variante wäre in einem Standardmodul das zu schreiben:
Public Function myDate() As Date
myDate = CLng(Now)
End Function
Dann ersetzt du überall Date() durch myDate(). Vielleicht kannst du in VBA sogar mit Date() arbeiten, wenn das Problem eher mit dem Expression Service statt mit den Verweisen zu tun hat. Ich habe nur zur Vorsicht hier auch Now verwendet.
Den Hinweis auf das Sicherheitsrisiko habe ich ebenfalls trotz entsprechender Anpassung des Pfades nicht unterdrücken können.
Vielleicht helfen dir Gunters Hinweise weiter bzw. die AddPath.exe: http://www.accessribbon.de/index.php?Sicherheit:Vertrauenswuerdige_...
----- Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |