DoCmd.RunSQL error Help

From: Kate (anonymous_at_discussions.microsoft.com)
Date: 04/29/04 

Date: Thu, 29 Apr 2004 13:33:23 -0700

I'm trying to execute an SQL statement in a macro attached
to a form but get error A RunSQL action requires an
argument consisting of an SQL statement. What is wrong?

Dim strSQL As String

strSQL = "SELECT AVAILABILITY.BookingDate,
AVAILABILITY.Period, AVAILABILITY.Room," _
 & "AVAILABILITY.[Day Number], AVAILABILITY.[Booking ID] "
_
 & "FROM AVAILABILITY " _
 & "WHERE (((AVAILABILITY.BookingDate)=Forms![SINGLE
BOOKING AVAILABILITY]" _
 & "!BookingDate) & ((AVAILABILITY.Period)=Forms![SINGLE
BOOKING AVAILABILITY]" _
 & "!Combo8) & ((AVAILABILITY.Room)=Forms![SINGLE BOOKING
AVAILABILITY]!Combo10))"

DoCmd.RunSQL strSQL

SQL should look like this:

SELECT AVAILABILITY.BookingDate, AVAILABILITY.Period,
AVAILABILITY.Room, AVAILABILITY.[Day Number], AVAILABILITY.
[Booking ID]
FROM AVAILABILITY
WHERE (((AVAILABILITY.BookingDate)=Forms![SINGLE BOOKING
AVAILABILITY]!BookingDate) And ((AVAILABILITY.Period)
=Forms![SINGLE BOOKING AVAILABILITY]!Combo8) And
((AVAILABILITY.Room)=Forms![SINGLE BOOKING AVAILABILITY]!
Combo10));

Relevant Pages

  • syntax error? Help
    ... I'm trying to execute an SQL statement in a macro attached ... argument consisting of an SQL statement. ... Dim strSQL As String ... BOOKING AVAILABILITY]" _ ...
    (microsoft.public.access.formscoding)
  • Re: syntax error? Help
    ... (No private e-mails, please) ... > argument consisting of an SQL statement. ... > Dim strSQL As String ... > BOOKING AVAILABILITY]" _ ...
    (microsoft.public.access.formscoding)
  • Re: Too few parameters, expected n when executing SQL from VBA
    ... desired SQL statement, either, so I suggest a completely different approach ... Public Sub TestQuery(ByVal strFieldName As String) ... Dim strSQL As String, strTemp As String ...
    (microsoft.public.access.modulesdaovba)
  • Re: Too few parameters, expected n when executing SQL from VBA
    ... desired SQL statement, either, so I suggest a completely different approach ... Public Sub TestQuery(ByVal strFieldName As String) ... Dim strSQL As String, strTemp As String ...
    (microsoft.public.access.modulesdaovba)
  • Re: Parameter as field name
    ... SQL statement in VBA on the fly. ... Dim strSql as String ... (These techniques avoid the user choosing invalid field ... second column, I want to show the actual value of this field for the ...
    (comp.databases.ms-access)