Instruction Select in sql using vba

[radek225]

In my procedure I want to select content of "status" (text) column where "id_status" (number) = "spr_skrocony_obieg" (variable as long)

How should I write procedure of this case?

dim strSQL as string
dim spr_skrocony_obieg as long
dim db as DAO.Database
Set db = CurrentDb

spr_skrocony_obieg = 1
strSQL = "SELECT Status from tblStatus WHERE ID_Status[COLOR="Red"]...[/COLOR] "
CurrentDb.Execute strSQL

 

[pr2-eugin]

You mean this?

strSQL = "SELECT status FROM tblStatus WHERE ID_Status = " & spr_skrocony_obieg

 

[pbaldy]

Except you can't execute a SELECT query. You can open a recordset on that SQL or use DLookup().

 

[radek225]

exactly that's my problem. Why can't I execute a SELECT query? So What should I do, to take value from that and use it in further vba code?

 

[pbaldy]

"Execute" implies an action; there is no action in a SELECT query. You can execute an append, update or delete query. I already gave you two ways to move forward, a recordset or DLookup.

http://www.mvps.org/access/general/gen0018.htm