Usuário com melhor resposta
ACcess - VBA - Consulta vazia

Pergunta
-
Olá colegas,
Espero que esteja tudo bem com vocês.
Meu problema é o seguinte:
Tenho uma consulta aqui que é a seguinte:
sSql = "SELECT TB_Controle_Contrato.Numero, TB_Controle_Contrato.Carta_Fornecedor, " & _
" TB_Controle_Contrato.Resposta_Fornecedor, Tb_Contratos.Fiscal_Ctr " & _
"FROM TB_Controle_Contrato " & _
"INNER JOIN Tb_Contratos ON TB_Controle_Contrato.Numero = Tb_Contratos.Numero " & _
"WHERE (((TB_Controle_Contrato.Carta_Fornecedor)='Enviado' " & _
"OR (TB_Controle_Contrato.Carta_Fornecedor)='Reiterado') " & _
"AND ((TB_Controle_Contrato.Resposta_Fornecedor)=False) " & _
"AND ((Tb_Contratos.Fiscal_Ctr)=[Forms]![Frm_Fiscais]![TxtFiscal]));"On Error Resume Next
Set rs7 = db.OpenRecordset(sSql)Não vem ao caso a sintaxe dela que está certa.. o problema é quando eu vou abrir isso e não tem um valor pra retornar..
Tem vários usuários no banco de dados, alguns essa consulta retorna um valor, e em outras não.. e quando não retorna ele não ta "on error resume next"
ele da erro de parametros insuficientes e trava..
Alguém sabe o que eu posso fazer?
Respostas
-
"AND ((Tb_Contratos.Fiscal_Ctr)=[Forms]![Frm_Fiscais]![TxtFiscal]));"
Tente isso:
"AND ((Tb_Contratos.Fiscal_Ctr)='" & Forms![Frm_Fiscais]![TxtFiscal] & "'));"
- Sugerido como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:25
- Marcado como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:25
Todas as Respostas
-
-
-
"AND ((Tb_Contratos.Fiscal_Ctr)=[Forms]![Frm_Fiscais]![TxtFiscal]));"
Tente isso:
"AND ((Tb_Contratos.Fiscal_Ctr)='" & Forms![Frm_Fiscais]![TxtFiscal] & "'));"
- Sugerido como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:25
- Marcado como Resposta Felipe Costa GualbertoMVP, Moderator sábado, 14 de junho de 2014 17:25