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]Inserir dados de uma caixa de texto de um formulário a uma tabela

    avatar
    Cleniroweb
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 16/03/2014

    [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela Empty [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela

    Mensagem  Cleniroweb 28/2/2021, 22:56

    Caros colegas,

    Criei uma caixa de texto ( txtData) em um formário, assim gostaria que esta caixa de texto deverá alimentar um campo de uma tabela (TblData) campo (Data) mas o problema é que essa tabela não tem vínculo com o formulário em questão, isso é possível pela fonte de controle ou VB?

    Agradeço por toda ajuda,
    Cleniro
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1811
    Registrado : 23/01/2018

    [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela Empty Re: [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela

    Mensagem  crysostomo 28/2/2021, 23:38

    Código:
    Dim DB As Database
    Dim sSQL    As String
        Set DB = CurrentDb
            sSQL = "INSERT INTO sua  tabela"
            'CAMPOS----------------------------------------
            sSQL = sSQL & "("
            sSQL = sSQL & "  campo da tabela"
          
            sSQL = sSQL & ")"
            'VALORES -------------------------------------
            sSQL = sSQL & " VALUES"
            sSQL = sSQL & "("
           sSQL = sSQL & " '" & Trim(capo do formulário) & "'"
            sSQL = sSQL & ")"
            DB.Execute sSQL
            Me.Requery


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Cleniroweb gosta desta mensagem

    avatar
    Cleniroweb
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 16/03/2014

    [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela Empty Inserir dados de uma caixa de texto de um formulário a uma tabela

    Mensagem  Cleniroweb 1/3/2021, 02:47

    Crysostomo,

    Uma dúvida, esse código ficaria no construtor de códigos da caixa de texto no formulário?

    Cleniroweb gosta desta mensagem

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1811
    Registrado : 23/01/2018

    [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela Empty Re: [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela

    Mensagem  crysostomo 1/3/2021, 03:03

    Fica no botão que você vai inserido dados do form para tabela


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Cleniroweb gosta desta mensagem

    avatar
    Cleniroweb
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 16/03/2014

    [Resolvido]Inserir dados de uma caixa de texto de um formulário a uma tabela Empty Inserir dados de uma caixa de texto de um formulário a uma tabela

    Mensagem  Cleniroweb 2/3/2021, 02:39

    Crysostomo,

    Tudo certinho, adaptei aqui para a minha necessidade, e tudo funcionando, muito obrigado pela ajuda.

      Data/hora atual: 18/9/2021, 16:54