Fórum Copiar estrutura de um BD Paradox #191743
30/10/2003
0
Caros colegas,
Tenho um aplicativo que utiliza várias tabelas em paradox, que estão alocados em um servidor. Mas cada vez que adiciono um campo ou modifico a estrutura do bd, obrigatóriamente preciso modificar a extrutura em todos os locais redes distintas.
Desde já agradeço.
Marcos Cesar Martins Simões
marcos.info@ig.com.br
Tenho um aplicativo que utiliza várias tabelas em paradox, que estão alocados em um servidor. Mas cada vez que adiciono um campo ou modifico a estrutura do bd, obrigatóriamente preciso modificar a extrutura em todos os locais redes distintas.
Desde já agradeço.
Marcos Cesar Martins Simões
marcos.info@ig.com.br
Mcsimoes
Curtir tópico
+ 0
Responder
Posts
30/10/2003
Mcsimoes
Corrigindo a pergunta.
Como posso copiar somente a extruturado BD, sem copiar os dados ?
Como posso copiar somente a extruturado BD, sem copiar os dados ?
Responder
Gostei + 0
30/10/2003
Alemao-top
Seguinte, tenta copiar e depois da um empty na tabela..
e se tiver campo autoincrement usa essa função:
resetautoinc(nomedoarquivo,valorinicial);
------------------------------------------------------------------------------
function TForm1.ResetAutoInc(FileName: TFileName; Base: Longint): Boolean;
begin
with TFileStream.Create(FileName, fmOpenReadWrite) do
Result := (Seek($49, soFromBeginning) = $49) and (Write(Base, 4) = 4);
end;
e se tiver campo autoincrement usa essa função:
resetautoinc(nomedoarquivo,valorinicial);
------------------------------------------------------------------------------
function TForm1.ResetAutoInc(FileName: TFileName; Base: Longint): Boolean;
begin
with TFileStream.Create(FileName, fmOpenReadWrite) do
Result := (Seek($49, soFromBeginning) = $49) and (Write(Base, 4) = 4);
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)