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]Consulta no Subform para Form

    avatar
    ivoro
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 20/12/2011

    [Resolvido]Consulta no Subform para Form Empty Consulta no Subform para Form

    Mensagem  ivoro 6/12/2012, 01:52

    Boa noite,

    primeiro quero parabenizar os colaboradores deste fórum pelo excelente trabalho.
    Consegui com ajuda de vocês(pela respostas do fórum) montar um sistema quase funcionando.
    Tenho um form com 3 subforms, todos vinculados e tenho 2 combos que fazem a pesquisa e preenchem os subforms.
    No form principal tenho um textbox "OBS" que preciso preencher com a consulta na tabela, mas não estou conseguindo.
    Dá um erro #Nome?
    A consulta está no subform assim como o campo "OBS" e preciso deste campo no Form principal
    Agradeço de antecipadamente

    Set db = CurrentDb
    Set rs = db.OpenRecordset("TBL_PEDIDO", dbOpenDynaset)

    Forms![FRM]![SUBFRM].Form.RecordSource = "SELECT [TBL_PEDIDO].[NUM_PEDIDO], [TBL_PEDIDO].[NUM_CORREIO]_
    AS [TBL_PEDIDO_NUM_CORREIO], [TBL_CORREIO].[NUM_CORREIO] AS [TBL_CORREIO_NUM_CORREIO],[TBL_CORREIO]._
    [NUM_CORREIO], [TBL_CORREIO].[DATA_CORREIO], [TBL_CORREIO].[OBS], [TBL_CORREIO].[NUM_PREFIXO],_
    [TBL_CORREIO].[STATUS] FROM [TBL_CORREIO] INNER JOIN [TBL_PEDIDO] ON [TBL_CORREIO].[NUM_CORREIO] _
    = [TBL_PEDIDO].[NUM_CORREIO] WHERE NUM_PEDIDO='" & Me.comboPedido & "'"

    Forms![FRM]![SUBFRM].Form![CORREIO].ControlSource = "NUM_CORREIO"
    Forms![FRM]![SUBFRM].Form![DATA].ControlSource = "DATA_CORREIO"
    Forms![FRM]![SUBFRM].Form![PREFIXO].ControlSource = "NUM_PREFIXO"
    Forms![FRM]![SUBFRM].Form![STATUS].ControlSource = "STATUS"
    Forms![FRM]![txtObs].ControlSource = "OBS"

    [SUBFRM].Requery
    [SUBFRM1].Requery
    [SUBFRM2].Requery

    End Sub
    avatar
    ivoro
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 20/12/2011

    [Resolvido]Consulta no Subform para Form Empty Consulta no Subform para Form

    Mensagem  ivoro 6/12/2012, 02:17

    Pessoal,

    não é necessário responder,

    já achei a resposta do criquio no fórum.
    Usei Me.txtObs = Forms![FRM]![SUBFRM].Form![OBS]
    Funcionou perfeito.
    Fiquem com Deus

    Abs

    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    [Resolvido]Consulta no Subform para Form Empty Re: [Resolvido]Consulta no Subform para Form

    Mensagem  Silvio 6/12/2012, 09:54

    Bom dia Ivo.

    Não esqueça de colocar o resolvido no teu tópico !


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    ivoro
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 20/12/2011

    [Resolvido]Consulta no Subform para Form Empty [Resolvido]Consulta no Subform para Form

    Mensagem  ivoro 7/12/2012, 12:43

    Ok obrigado

    Conteúdo patrocinado


    [Resolvido]Consulta no Subform para Form Empty Re: [Resolvido]Consulta no Subform para Form

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 11:21