Incomple Query Clause

[sherriross81]

Hello,

I am trying to retreive a value from my database depending on which value
the user selects in a combo box. Here is my code:

Dim strSQL As String

strSQL = "Select ID FROM 'Computer Inventory' " _
& "WHERE 'PC Name' = " & Me.cboComputerName & ""
CurrentDb.Execute strSQL, dbFailOnError

Me.Requery

I keep getting an incomplete query clause error. I can't seem to figure out
what is missing.

Thanks in advance.

 

[mscertified]

Try:

strSQL = "Select ID FROM [Computer Inventory] " _
& "WHERE [PC Name] = '" & Me.cboComputerName & "'"
CurrentDb.Execute strSQL, dbFailOnError

Note the [] around the table and column names (it's best NOT to use embedded
blanks in names!) and you need a single quote after the =

-Dorian

 

[sherriross81]

Thank you for the advice on column names.

I tried updating the code as you directed and I get an error that says
Cannot Execute Select Statement Run time error 3065.

 

[sherriross81]

Nevermind I just realized I can't used currentdb.execute with a select
statement.

Thanks for helping with the code.

Try:

strSQL = "Select ID FROM [Computer Inventory] " _
& "WHERE [PC Name] = '" & Me.cboComputerName & "'"
CurrentDb.Execute strSQL, dbFailOnError

Note the [] around the table and column names (it's best NOT to use embedded
blanks in names!) and you need a single quote after the =

-Dorian

Hello,

I am trying to retreive a value from my database depending on which value
the user selects in a combo box. Here is my code:

Dim strSQL As String

strSQL = "Select ID FROM 'Computer Inventory' " _
& "WHERE 'PC Name' = " & Me.cboComputerName & ""
CurrentDb.Execute strSQL, dbFailOnError

Me.Requery

I keep getting an incomplete query clause error. I can't seem to figure out
what is missing.

Thanks in advance.

 

[mscertified]

you need CurrentProject.Connection.Execute strSQL

-Dorian

Nevermind I just realized I can't used currentdb.execute with a select
statement.

Thanks for helping with the code.

Try:

strSQL = "Select ID FROM [Computer Inventory] " _
& "WHERE [PC Name] = '" & Me.cboComputerName & "'"
CurrentDb.Execute strSQL, dbFailOnError

Note the [] around the table and column names (it's best NOT to use embedded
blanks in names!) and you need a single quote after the =

-Dorian

Hello,

I am trying to retreive a value from my database depending on which value
the user selects in a combo box. Here is my code:

Dim strSQL As String

strSQL = "Select ID FROM 'Computer Inventory' " _
& "WHERE 'PC Name' = " & Me.cboComputerName & ""
CurrentDb.Execute strSQL, dbFailOnError

Me.Requery

I keep getting an incomplete query clause error. I can't seem to figure out
what is missing.

Thanks in advance.