[acces] te weinig parameters.

[Verwijderd]

Dim stDocName As String
Dim stDocName2 As String
Dim nr As Integer
Dim pas As Integer
Dim rst As Recordset
Dim sqlqry As String

nr = Keuzelijst_met_invoervak27.Value
pas = password.Value
stDocName = "Form werknemer2"
stDocName2 = "Form beheer werknemer2"
sqlqry = "SELECT werknemer.[werknemer nr], werknemer.password FROM afdelingen INNER JOIN werknemer ON afdelingen.afdelingscode = werknemer.afdelingscode WHERE (((werknemer.[werknemer nr]) = nr) And ((werknemer.password) = pas)) ORDER BY werknemer.[werknemer nr]"
Set rst = CurrentDb.OpenRecordset(sqlqry, dbOpenDynaset, dbReadOnly)
MsgBox "OKE"

foutmelding = "er zijn te weinig parameters, het verwachte aantal is 2."

waarom? wat doe ik fout?

[whoami]

Geef eerst eens een beetje meer uitleg.
Lees voor de fun eens de P&W Quickstart.

Waarschijnlijk heb je ergens een fout geschreven in uw query, verkeerde tablenaam, verkeerd veldnaam, ...