> When attempting to run the following code (event from a
> combobox) I get the following error:
> "A RunSQL action requires an argument consisting of an SQL
> statement." Run-time error 2342

> Private Sub cboDeptStrategy_AfterUpdate()

> On Error GoTo EH

> 'after the user selects a dept. strategy in the dropdown
> box
> 'this code will run to collect all the other information
> related
> 'to the dept. strategy. Currently will not recognize the
> sql statement.

> Dim stSQL As String 'variable for sql statement

> 'sql statement to select everything from the table with
> the dept. strategy.
> stSQL = "Select * From dbo_tblDeptStrategy;"

> 'run the sql statement
> DoCmd.RunSQL stSQL

> Exit_eh:
>     Exit Sub

> EH:
>     MsgBox Err.Description & Err.Number
>     Resume Exit_eh

> End Sub

> any help would be greatly appreciated.
> Thanks, JR

>-----Original Message-----
>The DoCmd.RunSQL command does not work for non-action

>to use it to run a "select" query, which is a non-action
query. ("Action"
>queries are "append", "delete", "make-table", etc. type
of queries.)

>What are you wanting to do with the results of the query?
That info is
>needed in order to give you some suggestions.

>--
>       Ken Snell
><MS ACCESS MVP>

>> When attempting to run the following code (event from a
>> combobox) I get the following error:
>> "A RunSQL action requires an argument consisting of an
SQL
>> statement." Run-time error 2342

>> Private Sub cboDeptStrategy_AfterUpdate()

>> On Error GoTo EH

>> 'after the user selects a dept. strategy in the dropdown
>> box
>> 'this code will run to collect all the other information
>> related
>> 'to the dept. strategy. Currently will not recognize the
>> sql statement.

>> Dim stSQL As String 'variable for sql statement

>> 'sql statement to select everything from the table with
>> the dept. strategy.
>> stSQL = "Select * From dbo_tblDeptStrategy;"

>> 'run the sql statement
>> DoCmd.RunSQL stSQL

>> Exit_eh:
>>     Exit Sub

>> EH:
>>     MsgBox Err.Description & Err.Number
>>     Resume Exit_eh

>> End Sub

>> any help would be greatly appreciated.
>> Thanks, JR

>.

> My plan is to store the information in variables, display
> the information in text boxes for the users review then
> later (in the same screen) write the information to the
> proper table.

> Thanks for the information regarding the difference in a
> action vs. non-action query. I think I may have an idea
> but any suggestion you have would be greatly appreciated.

> Thanks, JR
> >-----Original Message-----
> >The DoCmd.RunSQL command does not work for non-action
> queries. You're trying
> >to use it to run a "select" query, which is a non-action
> query. ("Action"
> >queries are "append", "delete", "make-table", etc. type
> of queries.)

> >What are you wanting to do with the results of the query?
> That info is
> >needed in order to give you some suggestions.

> >--
> >       Ken Snell
> ><MS ACCESS MVP>

> >> When attempting to run the following code (event from a
> >> combobox) I get the following error:
> >> "A RunSQL action requires an argument consisting of an
> SQL
> >> statement." Run-time error 2342

> >> Private Sub cboDeptStrategy_AfterUpdate()

> >> On Error GoTo EH

> >> 'after the user selects a dept. strategy in the dropdown
> >> box
> >> 'this code will run to collect all the other information
> >> related
> >> 'to the dept. strategy. Currently will not recognize the
> >> sql statement.

> >> Dim stSQL As String 'variable for sql statement

> >> 'sql statement to select everything from the table with
> >> the dept. strategy.
> >> stSQL = "Select * From dbo_tblDeptStrategy;"

> >> 'run the sql statement
> >> DoCmd.RunSQL stSQL

> >> Exit_eh:
> >>     Exit Sub

> >> EH:
> >>     MsgBox Err.Description & Err.Number
> >>     Resume Exit_eh

> >> End Sub

> >> any help would be greatly appreciated.
> >> Thanks, JR

> >.

>-----Original Message-----
>If you want to display the results of the query in

>subform in the form, and set the recordsource of the
subform to the SQL
>statement that you're building (and then requery the
subform's
>recordsource)?

>--
>       Ken Snell
><MS ACCESS MVP>

>> My plan is to store the information in variables,
display
>> the information in text boxes for the users review then
>> later (in the same screen) write the information to the
>> proper table.

>> Thanks for the information regarding the difference in a
>> action vs. non-action query. I think I may have an idea
>> but any suggestion you have would be greatly
appreciated.

>> Thanks, JR
>> >-----Original Message-----
>> >The DoCmd.RunSQL command does not work for non-action
>> queries. You're trying
>> >to use it to run a "select" query, which is a non-
action
>> query. ("Action"
>> >queries are "append", "delete", "make-table", etc. type
>> of queries.)

>> >What are you wanting to do with the results of the
query?
>> That info is
>> >needed in order to give you some suggestions.

>> >--
>> >       Ken Snell
>> ><MS ACCESS MVP>

>> >> When attempting to run the following code (event
from a
>> >> combobox) I get the following error:
>> >> "A RunSQL action requires an argument consisting of
an
>> SQL
>> >> statement." Run-time error 2342

>> >> Private Sub cboDeptStrategy_AfterUpdate()

>> >> On Error GoTo EH

>> >> 'after the user selects a dept. strategy in the
dropdown
>> >> box
>> >> 'this code will run to collect all the other
information
>> >> related
>> >> 'to the dept. strategy. Currently will not recognize
the
>> >> sql statement.

>> >> Dim stSQL As String 'variable for sql statement

>> >> 'sql statement to select everything from the table
with
>> >> the dept. strategy.
>> >> stSQL = "Select * From dbo_tblDeptStrategy;"

>> >> 'run the sql statement
>> >> DoCmd.RunSQL stSQL

>> >> Exit_eh:
>> >>     Exit Sub

>> >> EH:
>> >>     MsgBox Err.Description & Err.Number
>> >>     Resume Exit_eh

>> >> End Sub

>> >> any help would be greatly appreciated.
>> >> Thanks, JR

>> >.

>.

> That's a good idea! I will give it a try. Thank you for
> the help you've provided, it is very much appreciated.
> JR
> >-----Original Message-----
> >If you want to display the results of the query in
> textboxes, why not use a
> >subform in the form, and set the recordsource of the
> subform to the SQL
> >statement that you're building (and then requery the
> subform's
> >recordsource)?

> >--
> >       Ken Snell
> ><MS ACCESS MVP>

> >> My plan is to store the information in variables,
> display
> >> the information in text boxes for the users review then
> >> later (in the same screen) write the information to the
> >> proper table.

> >> Thanks for the information regarding the difference in a
> >> action vs. non-action query. I think I may have an idea
> >> but any suggestion you have would be greatly
> appreciated.

> >> Thanks, JR
> >> >-----Original Message-----
> >> >The DoCmd.RunSQL command does not work for non-action
> >> queries. You're trying
> >> >to use it to run a "select" query, which is a non-
> action
> >> query. ("Action"
> >> >queries are "append", "delete", "make-table", etc. type
> >> of queries.)

> >> >What are you wanting to do with the results of the
> query?
> >> That info is
> >> >needed in order to give you some suggestions.

> >> >--
> >> >       Ken Snell
> >> ><MS ACCESS MVP>

> >> >> When attempting to run the following code (event
> from a
> >> >> combobox) I get the following error:
> >> >> "A RunSQL action requires an argument consisting of
> an
> >> SQL
> >> >> statement." Run-time error 2342

> >> >> Private Sub cboDeptStrategy_AfterUpdate()

> >> >> On Error GoTo EH

> >> >> 'after the user selects a dept. strategy in the
> dropdown
> >> >> box
> >> >> 'this code will run to collect all the other
> information
> >> >> related
> >> >> 'to the dept. strategy. Currently will not recognize
> the
> >> >> sql statement.

> >> >> Dim stSQL As String 'variable for sql statement

> >> >> 'sql statement to select everything from the table
> with
> >> >> the dept. strategy.
> >> >> stSQL = "Select * From dbo_tblDeptStrategy;"

> >> >> 'run the sql statement
> >> >> DoCmd.RunSQL stSQL

> >> >> Exit_eh:
> >> >>     Exit Sub

> >> >> EH:
> >> >>     MsgBox Err.Description & Err.Number
> >> >>     Resume Exit_eh

> >> >> End Sub

> >> >> any help would be greatly appreciated.
> >> >> Thanks, JR

> >> >.

> >.