MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

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

    Compartilhe

    Edgar Massa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 33
    Registrado : 08/01/2017

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

    Mensagem  Edgar Massa em 24/12/2017, 20:48

    Galera
    Boa tarde

    estou usando este código para retornar uma consulta em um textbox mas retornou um erro "Parâmetros insuficientes. Eram esperados 1."

    Public Function PegarCodigo() As Variant
    Dim db As dao.Database
    Dim rs As dao.Recordset
    Dim strSQL As String
    strSQL = "SELECT TB_IMPRESSORA.Código FROM TB_IMPRESSORA WHERE (((TB_IMPRESSORA.[Modelo da Impressora])=[Forms]![frm_Cadastro_Requisitos]![cmb_Modelo]));"

    Set db = CurrentDb()
    Set rs = db.OpenRecordset(strSQL, dbOpenSnapshot)
    If rs.RecordCount = 0 Then
    PegarCodigo = Null
    Else
    PegarCodigo = rs(0)
    End If
    rs.Close
    Set rs = Nothing
    Set db = Nothing
    End Function

    Tem algo errado ?
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10294
    Registrado : 04/11/2009

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

    Mensagem  JPaulo em 26/12/2017, 09:21

    Assim:

    Código:
    strSQL = "SELECT TB_IMPRESSORA.Código FROM TB_IMPRESSORA WHERE TB_IMPRESSORA.[Modelo da Impressora]='" & [Forms]![frm_Cadastro_Requisitos]![cmb_Modelo] & "'"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    Edgar Massa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 33
    Registrado : 08/01/2017

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

    Mensagem  Edgar Massa em 31/12/2017, 19:12

    J Paulo

    Boa tarde man!

    Então, coloquei pra chamar a função ao alterar um combobox, porém o textbox que deveria aparecer o número nao aparece, continua 0.
    O que da pra fazer?
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10294
    Registrado : 04/11/2009

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

    Mensagem  JPaulo em 2/1/2018, 14:04

    As combobox`s começam pela coluna zero (0), verifique em que coluna estão os dados para o filtro.

    Se não conseguir, anexe aqui parte do seu banco.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    Edgar Massa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 33
    Registrado : 08/01/2017

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

    Mensagem  Edgar Massa em 3/1/2018, 15:36

    Desculpa J Paulo,

    no lugar do combox, estou utilizando um textbox, se usa o mesmo código?

    Edgar Massa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 33
    Registrado : 08/01/2017

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

    Mensagem  Edgar Massa em 8/1/2018, 17:14

    Conseguii cheers cheers

    utilizei outra forma como esta neste tópico.

    [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: 19/12/2018, 16:21