MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Parâmetros insuficientes. Eram esperados 1.

    avatar
    FelipeDias
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 05/06/2016

    [Resolvido]Parâmetros insuficientes. Eram esperados 1. Empty [Resolvido]Parâmetros insuficientes. Eram esperados 1.

    Mensagem  FelipeDias 3/10/2016, 16:07

    Boa tarde, estou fazendo uma consulta SQL, logo ao abrir o formulário todavia está sendo exibida a seguinte mensagem: "Parâmetros insuficientes. Eram esperados 1.", já tentei de diversas formas mais não estou conseguindo, poderiam me auxiliar?
    Código:

     Private Sub Form_Open(Cancel As Integer)
        DoCmd.SetWarnings (False)
        Dim rs As DAO.Recordset
        Dim db As Database
        Dim sSql As String
        Dim iContador As Integer
        Dim identificacao  As Integer
       
        If Me.txt_Usuario.Value = DLookup("[RACF]", "[Tbl_Funcionario]", "[RACF]= '" & Me.txt_Usuario & "'") Then
          identificacao = DLookup("[ITAUAGENCIAS]", "[Tbl_Funcionario]", "[RACF] = '" & Me.txt_Usuario & "'")
            Select Case identificacao
              Case True
                sSql = "SELECT CHAVE"
                sSql = sSql & " FROM Tbl_Analise"
                sSql = sSql & " WHERE ANALISE = FALSE"
                sSql = sSql & " AND USUARIO IS NULL AND SEGMENTO = [ITAU AGENCIAS] ORDER BY DATAPRIMEIROENVIO"
                Set rs = CurrentDb.OpenRecordset(sSql)


    Obrigado.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    [Resolvido]Parâmetros insuficientes. Eram esperados 1. Empty Re: [Resolvido]Parâmetros insuficientes. Eram esperados 1.

    Mensagem  Alvaro Teixeira 3/10/2016, 17:43

    Olá, verifique o tipo de dados de [ITAU AGENCIAS]
    Será string deve colocar plica '
    Abraço
    avatar
    FelipeDias
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 05/06/2016

    [Resolvido]Parâmetros insuficientes. Eram esperados 1. Empty Obrigado

    Mensagem  FelipeDias 9/10/2016, 05:27

    deu certo, obrigado.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    [Resolvido]Parâmetros insuficientes. Eram esperados 1. Empty Re: [Resolvido]Parâmetros insuficientes. Eram esperados 1.

    Mensagem  Alvaro Teixeira 9/10/2016, 11:22

    Olá Felipe, obrigado pelo retorno.
    Abraço

    Conteúdo patrocinado


    [Resolvido]Parâmetros insuficientes. Eram esperados 1. Empty Re: [Resolvido]Parâmetros insuficientes. Eram esperados 1.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/3/2024, 07:40