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]Ignorar um campo da tabela na hora de inserir dados.

    avatar
    .pL-
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 03/06/2011

    [Resolvido]Ignorar um campo da tabela na hora de inserir dados. Empty Ignorar um campo da tabela na hora de inserir dados.

    Mensagem  .pL- 3/6/2011, 23:19

    Olá, como vão todos?! Espero que bem.
    Bom pessoa, estou com uma dificuldade, segue o problema.

    Eu estou criando um aplicativo que uma das funções seria armazernar produtos em uma tabela para uso posterior.
    Nesta tabela, deveria possuir os seguintes dados:
    código (numeração automática)
    descricao(texto)
    Quantidade(texto)
    Valor_unitario(Unidade Monetária)

    Já no formulário de cadastro, eu não quero que apareca o campo relacionado a código.
    Eis meu código para inseris os dados ao clicar no botão incluir:

    Private Sub cmd_incluir_Click()
    sql = "select * from tab_produtos where descricao='" & txt_descricao & "'"
    validar
    If rs.EOF = True Then
    sql = "insert into tab_produtos values ('" & txt_descricao & "'," & txt_quantidade & ",'" & txt_valorunitario & "')"
    db.Execute (sql)
    MsgBox ("Dados Inseridos com sucesso")
    limpar_produtos
    Else
    MsgBox ("Produto já cadastrado")
    limpar_produtos
    End If
    End Sub

    Os outros eventos funcionam (deletar, consultar) mas no caso de inserir ou alterar da seguinte mensagem de erro:
    "Erro em tempo de execução '3346':
    Número de valores da consulta e campos de destino não coicidem.

    No caso eu sei que o erro esta nesse campo de codigo, pois ao deletar ele, funcionou normalmente.

    Gostaria de saber se existe uma maneira de inserir todos os campos do formulário na tabela, ignorando o campo de codigo em questão, fazendo com ele já crie um número automático para cada registro.

    Obrigado desde já!
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Ignorar um campo da tabela na hora de inserir dados. Empty Re: [Resolvido]Ignorar um campo da tabela na hora de inserir dados.

    Mensagem  criquio 3/6/2011, 23:30

    Isso pode ser feito com uma única linha:

    CurrentDb.Execute "insert into tab_produtos(descrição, quantidade, valorunitário) values ('" & txt_descricao & "'," & txt_quantidade & ",'" & txt_valorunitario & "')"


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    .pL-
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 03/06/2011

    [Resolvido]Ignorar um campo da tabela na hora de inserir dados. Empty Re: [Resolvido]Ignorar um campo da tabela na hora de inserir dados.

    Mensagem  .pL- 3/6/2011, 23:40

    Criquio, sou muito agradecido pela sua ajuda de maneira tão rápida, fiz a alteração que sugeriu e deu certo.
    Muito obrigado, novamente!
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Ignorar um campo da tabela na hora de inserir dados. Empty Re: [Resolvido]Ignorar um campo da tabela na hora de inserir dados.

    Mensagem  criquio 4/6/2011, 00:16

    Grato pelo retorno. Só faltou o Resolvido. Dessa vez eu coloco.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    Conteúdo patrocinado


    [Resolvido]Ignorar um campo da tabela na hora de inserir dados. Empty Re: [Resolvido]Ignorar um campo da tabela na hora de inserir dados.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 08:12