[Resolvido]botão novo em controle de guia

Gostaria de fazer com que o botão novo cliente adiciona-se somente novo cliente e o botão novo animal adiciona-se somente novo animal. pois eles adicionam tanto novo cliente quento novo animal juntos. lembrando que é um formulário principal com um controle de guia abaixo com as paginas como as da foto. nome do formulÁrio é FRM_CADASTRO_DE_CLIENTES e o nome do controle de guia é PAGINAS. onde os campos das paginas do controle de guia estão em outra tabela chamada TBL_CADASTRO_DE_ANIMAIS e a tabela dos clientes é TBL_CADASTRO_DE_CLIENTES... grato pela atenção de todos.

Renato

Está usando guias, mas seria necessário mais detalhes.

Aqui está a imagem do formulário de Proprietários (o animal aqui e o cliente), de um aplicativo feito em A97 e que fui atualizado para o A2010,

trabalhando até hoje, sem nenhum problemas.

Veja que após cadastrar o proprietário, é que se cadastra o mascote.

Acredito que olhando o formulário, ajudará.

[ ]'s

Boa tarde. estou tentado fazer este sistema de três formas... onde uma gostaria de criar o formulário CLIENTES os outros formulários como: ANIMAIS, VACINAÇÃO, INTERNAÇÃO, ANAMNESE e outros. onde crio um botão no formulário CLIENTES que abra os outros formulários sendo que os outros formulários sejam relacionados e abram somente com os dados relacionados aos cadastros individuais. ou seja cadastro um cliente e os outros formularios ao abrirem exibam somente os dados ao cliente no momento no formulário e assim sucessivamente. obrigado pela atenção.

Boa tarde. então estou com tres tipos. um com relatorios um com guia de controle e outro com subformularios.

Eu gostaria de criar um sistema que abra formularios independentes, porem relacionados que exibam os dados somente dos cadastros especificos de cada um.

tipo: formulário CADASTRO_DE_CLIENTES cadastro o cliente e clico no botão para abrir o formulário CADASTRO_DE_ANIMAIS e cadastro os animais referentes ao cliente do formulário anterior. e quando voltar ao sistema os dados sejam exibidos cada um relacionado a outro.

poço enviar o sistema para voce avaliar...

Veja:

Colocar tudo num mesmo formulário, vai dar rolo no futuro,sei por experiencia própria.

Fica bonitinho tudo ali junto, mas para quem não é do ramo de informática, sentirá dificuldades.

Mas isso é contigo, cada um tem uma maneira de trabalhar.

Um detalhe muito importante, vai precisar de um formulário do consultório, onde tem a ficha do animal e principalmente,

o histórico clínico,

Aqui no fórum tem vários tipos de agendas, utilize uma delas para a agenda de vacinas.

[ ]'s

Boa noite. ok meu amigo é isso que estou fazendo. tenho uma tabela para cada tipo de cadastro. veja no exemplo que te mandei... tenho as seguintes tabelas.
1 TBL_CADASTRO_DE_CLIENTES
2 TBL_CADASTRO_DE_ANIMAIS
3 TBL_CADASTRO_DE_ANAMNES ( esta é a tabela do histórico do animal )
4 TBL_CADASTRO_DE_ATENDIMENTOS
5 TBL_CADASTRO_DE_INTERNAÇÕES
6 TBL_CADASTRO_DE_VACINAS

  E seus formulários respectivos. porem gostaria de criar no formulário FRM_CADASTRO_DE_CLIENTES um botão para abrir o FRM_CADASTRO_DE_ANIMAIS  e neste formulário os botões para abrir os (ANAMNESE, INTERNAÇÕES e VACINAS) sendo que ao abrir cada formulário somente deviria aparecer os dados relacionados ao cliente e seus animais.

  O que acontece é que quando faço isso. os formulário sempre abrem no primeiro registro. não fica do modo que eu gostaria. você sabe como poço fazer isso. fazer com que cada formulário so exiba os dados que sejam relacionados.

  Na TBL_CADASTRO_DE_CLIENTES a chave primária é CODIGO_CLIENTE
  Na TBL_CADASTRO_DE_ANIMAIS a chave primaria é CODIGO_ANIMAL. e o campo CODIGO_CLIENTE como número que esta relacionado com a TBL_CADASTRO_DE_CLIENTES.
  Nas outras TBL existe um campo CODIGO_ANIMAL que estão relacionadas com o campo CODIGO_ANIMAL que é a chave primária da TBL_CADASTRO_DE_ANIMAIS.

No botão Incluir animal nor formulário cliente
Lembre-se que no meu aplicativo, o animal é o cliente

Código:


Private Sub Incluir_Clientes_Click()
On Error GoTo Incluir_Clientes_Err
    
        ' Salva o registro atual do formulário Proprietários caso este ainda não esteja salvo.
        DoCmd.RunCommand acCmdSaveRecord
    
        ' Abre o formulário Incluir Clientes.
        
        If (Eval("[Forms]![frmProprietários]![CódProp] Is Null")) Then
            Beep
            Dialog.Box "Inexistência de Proprietário, impossível incluir Clientes.", vbCritical, "Impossível Incluir"
            Exit Sub
        End If
        
        DoCmd.OpenForm "frmClientes", acNormal, , , , acDialog
  
End Sub


No evento AoAlterar da caixa de texto NomedoAnimal coloque:

   
     ' Define o Número do Proprietário como o proprietário atual no formulário Proprietários.
       Forms![frmClientes]![CódProp] = Forms!frmProprietários![CódProp]
       Forms![frmClientes]![NomeProp] = Forms!frmProprietários![NomeProp]
       

Utilizei o evento Ao alterar, para só pegar o código e nome do dono do animal,  após realmente começar a digitar, evitando assim,  cadastrar registros vazios na tabela de Animais.

[ ]'s

Bom dia. amigo seu condigo funcionou perfeitamente com as renomeações dos campos, muito obrigado... tenho outras duvidas se você poder me ajudar, agradeço muito... estou remodelando o sistema e preciso fazer novas funções básicas.

Renato

Ajudo no que puder.

Como este tópico foi solucionado, coloque o resolvido no título dele,

clicando no botão resolvido abaixo do retângulo de edição de mensagens.

Você pode editar qualquer mensagem para fazer isso.

Quando precisar é só abrir um novo tópico.

Cada tópico é tratado somente dele, para que haja uma organização no fórum,

e assim, ficar mais fácil para quem quiser pesquisar sobre o mesmo assunto.

[ ]'s

Obrigado pelas dicas... estou conseguindo criar o sistema...