MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Código VBA não Deleta itens da Tabela.

    Compartilhe
    avatar
    abjinfo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 91
    Registrado : 02/07/2015

    [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  abjinfo em Sex 02 Fev 2018, 11:14

    Olá Forum!

    Coloquei uma linha de código ao abrir o formulário para zerar a tabela e o numero automático e não está funcionando.

    Alguém pode me ajudar?


    Private Sub Form_Load()
    DoCmd.Hourglass True

    strSql = "DELETE * FROM tblLinhas WHERE isnull(IdLinha)"
    DoCmd.SetWarnings False
    DoCmd.RunSQL strSql
    DoCmd.SetWarnings True
    DoEvents

    DoCmd.Echo True, "Compactando a tabela produtos"

    DoCmd.Hourglass False

    Beep
    MsgBox "Operação realizada com êxito!", vbInformation, "Ajuste de arquivos"
    End Sub

    Meu versão do Access 2010.

    Obrigado.
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3899
    Registrado : 14/08/2013

    Re: [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  FabioPaes em Sex 02 Fev 2018, 12:38

    Olá, amigo a Instrução SQL está correta! Porém, observe que ela tem um Critério!

    "DELETE * FROM tblLinhas WHERE isnull(IdLinha)" <== Irá excluir a LINHA inteira do Registro se o Campo IdLinha for NULO.

    Se não for isso que pretende, explique o que pretendia com ela.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    abjinfo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 91
    Registrado : 02/07/2015

    Re: [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  abjinfo em Sex 02 Fev 2018, 18:20

    Olá Fabio!

    Obrigado por me responder.

    Vou tentar explicar o que eu quero:

    Tenho um Formulário que ao carregar quero que zere a Tabela Linha, inclusive o Id de Número Automático, pois no mesmo formulário vou ter um Botão para filtrar novamente por data os dados e alimentar a mesma tabela.

    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3899
    Registrado : 14/08/2013

    Re: [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  FabioPaes em Sex 02 Fev 2018, 19:00

    Se quer que APAGUE TUDO da tabela, rode a instrução sem o Critério.

    *** Atenção! Irá apagar tudo da tabela tbLinhas
    "DELETE * FROM tblLinhas"


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    abjinfo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 91
    Registrado : 02/07/2015

    Re: [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  abjinfo em Sex 02 Fev 2018, 19:16

    Fábio!

    Funcionou, apagou tudo, mais eu também quero que o Campo Id (Número Automático) volte a contar do 0 quando eu incluir novamente os dados.
    Tem como?
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3899
    Registrado : 14/08/2013

    Re: [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  FabioPaes em Sab 03 Fev 2018, 14:40

    Olá, se o campo ID for Auto numeração (Nativo do Access) ele não volta!

    Só volta se apos o delete, vc compactar e reparar o BD, caso contrário não reinicia!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    abjinfo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 91
    Registrado : 02/07/2015

    Re: [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  abjinfo em Sab 03 Fev 2018, 15:10

    Fábio!
    Valeu e muito obrigado.
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3899
    Registrado : 14/08/2013

    Re: [Resolvido]Código VBA não Deleta itens da Tabela.

    Mensagem  FabioPaes em Sab 03 Fev 2018, 15:25

    Grato pelo retorno, até a próxima se Deus quiser!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

      Data/hora atual: Qui 24 Maio 2018, 01:16