[Resolvido]Quem Introduziu e quem Alterou

O BD Quem introduziu e quem alterou criado pelo mestre Jpaulo possui um BD à parte que registra o que foi editado e o que foi alterado chamado Histórico que fica na raiz C:
pergunto: Como podemos acrescentar nomes de campos para registrarmos alterações ???

Abraços,

Gerson

Você quer acrescentar campos na tabela via código? Se for isso, tente fazer uma busca por ALTER TABLE aqui no forum.

Criquio,
Eu não quero acrescentar campos na tabela via código o BD de exemplo do Jpaulo registra:
Utilizador
LogData
NomeForm
NomeCampo
ValorAntigo
ValorAtual
São 2 BD O primeiro BD você insere os dados e o 2 BD fica tudo registrado gostaria de registrar qualquer alteração em qualquer formurmulario doprimeiro BD.

Tente assim


Dim Msg, style, Title
Msg = "Instalação bem sucedida. Por favor instale a actualização 2!"
style = vbInformation
Title = "Instalação"
Dim strAltera As String
Dim strBancoExterno As Access.Application
Const strCaminho = "C:\EasyAdvo2.0\Data\bd1.mdb"
Set strBancoExterno = CreateObject("Access.Application")
strBancoExterno.OpenCurrentDatabase strCaminho
strAltera = "ALTER TABLE docshistorico ADD COLUMN NovaPasta TEXT(50),Pasta1 TEXT(50);"
strBancoExterno.DoCmd.RunSQL strAltera
strBancoExterno.CloseCurrentDatabase
Set strBancoExterno = Nothing
Msg = MsgBox(Msg, style, Title)

Este é um exemplo retirado de uma aplicação minha. adapte.

Olá Pessoal consegui fazer as adaptações e ficou do jeito que eu queria bastou adaptar os Bds exemplos Quem introduziu e quem alterou, com o BD Registra alteração do mestre Jpaulo agradeço a colaboraçaõ dos companheiros até a próxima.Obs: esse BD Registra alterações possui um outro Bd que tem que ser salvo no C: e nele fica guardado todas as ações. Muito bom.
Abraços,

Gerson

Valeu pelo retorno. Abraços.