Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.
Dim lngNoBookings as Long Dim stDocName As String lngNoBookings = DCount("*", "tJDWBookings", "jdwb_Event=" & lngEventID & " And jdwb_BookingID=" & lngBookingID & " and jdwb_Status=" & Chr(34) & strStatus & Chr(34)) If lngNoBookings > 0 Then stDocName = "fJDWEventPay" DoCmd.OpenForm stDocName, , , , , acDialog, lngBookingID ' pass Open Args Else MsGBox "No Bookings ... " 'etc End If
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
7 Experts available now in Live!