AUTONUMERAR REGISTRO EXISTENTE

 Tópico anterior Próximo tópico Novo tópico

AUTONUMERAR REGISTRO EXISTENTE

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#491466 - 24/11/2019 12:00:30

AMELINHACODE
SAO PAULO
Cadast. em:Junho/2019


bom dia Pessoal

Tenho uma tabela com 30mil produtos e apaguei 10mil produtos variados...

Porem a sequencia ficou falhada

Cod_produto
01
02
05
12

precisava via código, autonumerar todos os registros novamente, para ficar na sequencia correta (01, 02, 03, 04....)

OBS: o campo é do tipo INT

tentei algo do tipo
update Produtos set codigo = codigo + 1


mais como o proprio update já tá nitido... ele vai pegar o valor atual e acrescentar mais 1.... e na verdade quero começar do 1 e seguir a sequencia... 1, 2, 3...





#491467 - 24/11/2019 12:29:52

LUCS
BALNEARIO CAMBORIU
Cadast. em:Novembro/2018


   Bom dia, AMELINHACODE!

eu uso desta forma, vê se te ajuda,


  Private Sub CodFornec()

      ConnectDB
          rs.Open "Select max(NumReg) from TbSuaTabelar", db, 2, 4
             If rs.RecordCount = 0 Then
                 txtNumerica = Format(1, "00")
             Else
                Do Until rs.EOF
                       txtNumerica = "" & Format(rs(0) + 1, "00")
                      rs.MoveNext
                  Loop
            End If
      FechaDB
           If txtNumerica = "" Then txtNumerica = Format(1, "00")
End Sub




#491473 - 24/11/2019 14:56:54

AMELINHACODE
SAO PAULO
Cadast. em:Junho/2019


boa tarde

Na verdade, preciso zera e começar do 1 meus registro já existente (via comando sql), sem usar objetos



#491487 - 25/11/2019 09:57:47

FOXMAN
BARRETOS
Cadast. em:Janeiro/2001


Membro da equipe

Última edição em 25/11/2019 10:00:53 por FOXMAN

Eu faria da seguinte maneira :

ALTER TABLE `tblprodutos`
        DROP COLUMN `ID`;

ALTER TABLE `tblprodutos`
    ADD COLUMN `ID` INT NOT NULL AUTO_INCREMENT FIRST,
    ADD PRIMARY KEY (`ID`);


Tomando o cuidado claro de informar a coluna correta....
No meu exemplo, a coluna desejada chama-se ID, para seu exemplo basta trocar pelo nome da coluna autonumerica desejada.


Grupo DotNet.Br no FaceBook

Grupo WhatsDev



#491508 - 25/11/2019 19:14:39

AMELINHACODE
SAO PAULO
Cadast. em:Junho/2019


Última edição em 25/11/2019 19:15:23 por AMELINHACODE

Boa noite,

tentei assim
ALTER TABLE [dbo].[produtos]
DROP COLUMN codigo;
GO

ALTER TABLE [dbo].[produtos]
ADD COLUMN codigo INT NOT NULL AUTO_INCREMENT FIRST
GO


deu erro no "ADD COLUMN codigo..."
Mensagem 156, Nível 15, Estado 1, Linha 4
Sintaxe incorreta próxima à palavra-chave 'COLUMN'.


tirei o COLUMN e executei e deu o erro
Mensagem 102, Nível 15, Estado 1, Linha 3
Sintaxe incorreta próxima a 'AUTO_INCREMENT'.


Uso SQL2008






#491516 - 25/11/2019 20:47:59

FOXMAN
BARRETOS
Cadast. em:Janeiro/2001


Membro da equipe
Citação:
:
Boa noite,

tentei assim
ALTER TABLE [dbo].[produtos]
DROP COLUMN codigo;
GO

ALTER TABLE [dbo].[produtos]
ADD COLUMN codigo INT NOT NULL AUTO_INCREMENT FIRST
GO


deu erro no "ADD COLUMN codigo..."
Mensagem 156, Nível 15, Estado 1, Linha 4
Sintaxe incorreta próxima à palavra-chave 'COLUMN'.


tirei o COLUMN e executei e deu o erro
Mensagem 102, Nível 15, Estado 1, Linha 3
Sintaxe incorreta próxima a 'AUTO_INCREMENT'.


Uso SQL2008




Por isso é importante informar o banco de dados....

Veja se te ajuda :
DBCC CHECKIDENT('[Produtos]', RESEED, 0);




Grupo DotNet.Br no FaceBook

Grupo WhatsDev



 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário