To Few Parameters Error

[mcdhappy80]

I have this query:

SELECT tblDete.txtSifraDetetaID, tblDete.txtMBDeteta, tblDete.txtIme, tblDete.txtSrednjeIme, tblDete.txtPrezime, tblDete.dteDatumRodjenja, tblDete.txtMestoPohID, tblMestaPohadjanja.txtNazivMesta, tblDete.bolDrugoDete, tblDete.bolTreceDete, tblDete.bolCetvrtoDete, tblDete.bolDeteRadnika, tblDete.txtFDZBrUgovora, tblDete.bolSituacija1, tblDete.bolSituacija2, tblDete.bolSituacija3, tblDete.bolKorekcijaSkale, tblDete.dblVrednoskKorekcije, tblDete.bolOslobodjenPlacanja
FROM tblMestaPohadjanja INNER JOIN tblDete ON tblMestaPohadjanja.txtMestoPohID = tblDete.txtMestoPohID
WHERE tblDete.txtSifraDetetaID = [B]SifraDeteta[/B]
ORDER BY tblDete.txtSifraDetetaID;

In the bolded field I enter the value when I run query from acces and I specify the paramater and query works fine.
I've entered the same query in VBA, and that part of my code looks like this:

txtSifraDetetaID = Me.txtSifraDetetaID

'tblMestoPohadjanja.txtMestPohID, tblMestaPohadjanja.txtNazivMesta, "
strSQL = "SELECT tblDete.txtSifraDetetaID, tblDete.txtMBDeteta, tblDete.txtIme, tblDete.txtSrednjeIme, tblDete.txtPrezime, tblDete.dteDatumRodjenja, tblDete.txtMestoPohID,  tblMestaPohadjanja.txtNazivMesta, " _
        & "tblDete.bolDrugoDete, tblDete.bolTreceDete, tblDete.bolCetvrtoDete, tblDete.bolDeteRadnika, tblDete.txtFDZBrUgovora, tblDete.bolSituacija1, tblDete.bolSituacija2, tblDete.bolSituacija3, " _
        & "tblDete.bolKorekcijaSkale, tblDete.dblVrednostKorekcije, tblDete.bolOslobodjenPlacanja " _
        & "FROM tblMestaPohadjanja INNER JOIN tblDete ON tblMestaPohadjanja.txtMestoPohID = tblDete.txtMestoPohID " _
        & "WHERE tblDete.txtSifraDetetaID = '" & txtSifraDetetaID & "' " _
        & "ORDER BY tblDete.txtSifraDetetaID;"

MsgBox strSQL

Set rs = CurrentDb.OpenRecordset(strSQL)

When I run my code I'm getting error "3061 - To few parameters. Expected 1"
What am I missing in my query?

Thank You

 

[ajetrumpet]

sort and tab this query out so its readable and i'll bet you'll get hel p with it