Eu quero passar um parâmetro para uma consulta salva no MS Access 2010 e, em seguida, também obter os resultados da consulta: sua consulta salva:

SELECT Count(*)
FROM tb_KonzeptDaten
WHERE ( Konzept=[fzg_ID] and (DCMFile is null or (DCMFile='')));

e aqui está o meu código VBA para invocar esta consulta:

Dim db As DAO.Database
Dim qry As DAO.QueryDef
Set qry = db.QueryDefs("Test_qr_emptyDCM")
qry.Parameters("fzg_ID").Value = ID
Set rs = qry.OpenRecordset("Test_qr_emptyDCM")

também o tipo de identificação no código do VBA éLongo e o campo do Konzept é Banco de Dados éInteiro longo Por que recebo este erro e como posso resolvê-lo?