with tablenome do begin
        Active := False;
        databasename:='teste'; // nome do database
        tableName:= nome; // nome da tabela
        tableType:= ttDbase; // tipo da tabela, no seu caso MSACCESS
        with fieldDefs do  begin
         clear;
           add('campo1',ftstring,7,false);
           add('campo2',ftinteger,0,false);
           add('campo3',ftstring,7,false);
           end;
           with indexdefs do
           begin
           clear;
            add('campo1','campo2',[]);
            end;
            if not tableuser.Exists then
             createtable;
             tablenome.Open;
            end;
              end;
Acho que isso vai te ajudar a ter uma idéia caso ainda tenha duvia 
digite createtable na ajuda do Delphi.
Té +

Cristina <[EMAIL PROTECTED]> escreveu:
Olá pessoal,


    Como posso fazer via linha de programação se uma tabela existe no 
Access 97 e se não existir como faço para criá-la.


-- 

Atenciosamente
----------------------------------------
Cristina Orthmann da Silva
HACON Automação e Tecnologia Ltda
Rua Lauro Linhares 589 - Bairro Trindade
Florianópolis - SC - Brasil
CEP 88036-001
Fone/Fax: 55 48 333-0699
Site: http://www.hacon.com.br/
Email: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
----------------------------------------



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 

---------------------------------
Links do Yahoo! Grupos

   Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
   Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 


                
---------------------------------
 Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e 
muito mais. Instale agora!

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a