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]Verificar se campo já existe na tabela e se não existir criar

    avatar
    silvrod
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 16/12/2011

    [Resolvido]Verificar se campo já existe na tabela e se não existir criar Empty [Resolvido]Verificar se campo já existe na tabela e se não existir criar

    Mensagem  silvrod 1/9/2014, 16:12

    Boa tarde,

    Tenho uma tabela que eu guardo valores mensal e tenho um código que cria o campo do ano_mês na tabela, porém gostaria de saber se existe uma maneira de antes de criar o campo houvesse uma verificação se o campo existe o não.

    Seria mais ou menos assim:

    minha tabela chama Tb_LoteCessão e o nome do campo é sempre o Ano_Mês corrente.

    Obrigado!

    Rodrigo
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8175
    Registrado : 05/11/2009

    [Resolvido]Verificar se campo já existe na tabela e se não existir criar Empty Re: [Resolvido]Verificar se campo já existe na tabela e se não existir criar

    Mensagem  Alexandre Neves 1/9/2014, 16:22

    Boa tarde,
    Podia ter apresentado o código que utiliza para tentar ajudar.
    Utilize o If com DCount para verificar se já existe o valor no campo


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    silvrod
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 16/12/2011

    [Resolvido]Verificar se campo já existe na tabela e se não existir criar Empty Re: [Resolvido]Verificar se campo já existe na tabela e se não existir criar

    Mensagem  silvrod 1/9/2014, 16:24

    segue o código

    Dim strField As String
    Dim curDatabase As Object
    Dim tblTeste As Object
    Dim fldNew As Object
    Dim nomecampo As String

    nomecampo = Year(Me.DT_FIM) & "_" & Month(Me.DT_FIM)


    Set curDatabase = CurrentDb
    Set Tb_LoteCessão = curDatabase.TableDefs("Tb_LoteCessão")

    strField = nomecampo


    Set fldNew = Tb_LoteCessão.CreateField(strField, dbDouble)

    Tb_LoteCessão.Fields.Append fldNew
    avatar
    silvrod
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 16/12/2011

    [Resolvido]Verificar se campo já existe na tabela e se não existir criar Empty Solução

    Mensagem  silvrod 3/9/2014, 15:18

    Achei uma solução fora do Access, criei uma rotina no agendador do Windows que vai abrir o sistema todo ai 01 de cada mês as 00:02hs e no formulário de inicialização coloquei uma condição onde se o dia for igual 1 e a hora for igual a 0 ele executa o código postado abaixo.


      Data/hora atual: 10/8/2022, 17:52