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


    [Resolvido]Recordset Não possibilita atualizar Caixa de listagem

    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1007
    Registrado : 23/08/2010

    [Resolvido]Recordset Não possibilita atualizar Caixa de listagem Empty [Resolvido]Recordset Não possibilita atualizar Caixa de listagem

    Mensagem  Mylton 3/12/2017, 13:29

    Bom dia.
    No exemplo abaixo, tenho 4 tabelas e 2 consultas: 01 união e outra criar tabela.
    O objetivo é buscar os dados dessa consulta união ou criartabela e disponibilizar no form.
    Não consegui utilizar a criartabela para usufruir no form.
    Na união a caixa de listagem não disponibiliza nos campos os dados dessa consulta.
    Ao clicar na caxa de listagem refere erro de execução número.. informando que este recordset não pode ser utilizado.
    ao depurarmos apresenta erro nessa linha...

    Private Sub Lista1_AfterUpdate()
           Me.IdPJuridica = Me.Lista1.Column(0)
           Me.Nome = Me.Lista1.Column(1)
           Me.Endereco = Me.Lista1.Column(2)
           Me.Complemento = Me.Lista1.Column(3)
           Me.Numero = Me.Lista1.Column(4)
           Me.Bairro = Me.Lista1.Column(5)
           Me.Cidade = Me.Lista1.Column(6)
           Me.Estado = Me.Lista1.Column(7)
           Me.CEP = Me.Lista1.Column(Cool
           Me.Telefone01 = Me.Lista1.Column(9)
           Me.Telefone02 = Me.Lista1.Column(10)
           Me.Email = Me.Lista1.Column(11)
    End Sub

    e assim sucessivamente.

    Bom seriam 2 duvidas:
    1) Como resolvo esse conflito?
    2) Se fosse utilizar a consulta criar tabela, como poderia usar essa num form?

    Obrigado.

    Onde
    Anexos
    [Resolvido]Recordset Não possibilita atualizar Caixa de listagem AttachmentDuvidaConsulta.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (229 Kb) Baixado 4 vez(es)
    avatar
    Convidado
    Convidado


    [Resolvido]Recordset Não possibilita atualizar Caixa de listagem Empty Re: [Resolvido]Recordset Não possibilita atualizar Caixa de listagem

    Mensagem  Convidado 3/12/2017, 22:06

    Boa tarde.

    Foi alterado o código e acrescentado critério a consulta

    Teste e veja se lhe serve.
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1007
    Registrado : 23/08/2010

    [Resolvido]Recordset Não possibilita atualizar Caixa de listagem Empty Re: [Resolvido]Recordset Não possibilita atualizar Caixa de listagem

    Mensagem  Mylton 3/12/2017, 23:45

    Muito obrigado.
    Boa semana.
    avatar
    Convidado
    Convidado


    [Resolvido]Recordset Não possibilita atualizar Caixa de listagem Empty Re: [Resolvido]Recordset Não possibilita atualizar Caixa de listagem

    Mensagem  Convidado 4/12/2017, 00:19

    Obrigado pelo retorno.

    O fórum agradece.

    Conteúdo patrocinado


    [Resolvido]Recordset Não possibilita atualizar Caixa de listagem Empty Re: [Resolvido]Recordset Não possibilita atualizar Caixa de listagem

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 09:27