在ACCESS中如何判断一个表是否存在并删除,详细点,谢谢!!

解决方案 »

  1.   

    adoQuery1lsql.text:='select * from TableName'
    adoquery1.sql.add:="drop table tableName";
    try
      adoquery1.execSQL;
    except
      on e:exception do
        showMessage('Table is Not Found');//执行select如果不存在则会出错,跳转到这里显示出错信息
    end;
      

  2.   

    如果你认为这个表是必定要删的,这样就行了。
    adoquery1.sql.add:="drop table tableName";
    try
      adoquery1.execSQL;
    except
      on e:exception do
        showMessage('Table is Not Found');//执行select如果不存在则会出错,跳转到这里显示出错信息
    end;
      

  3.   

    下面的代码怎么不行呀!
    procedure TForm1.Button1Click(Sender: TObject);
    begin
      ADOQuery1.Close;  ADOQuery1.sql.Text:='select * from baojiad_mx';
    try
      ADOQuery1.open;  ADOQuery1.close;
      if messagebox(form1.Handle,'表存在你想删除吗?','提示',MB_OKCANCEL+MB_ICONINFORMATION)=idok then
      begin
      ADOQuery1.SQL.text:='drop tabel baojiad_mx';
      ADOQuery1.ExecSQL;
      end;
    except
      on e:exception do
        showMessage('Table is Not Found');//执行select如果不存在则会出错,跳转到这里显示出错信息
    end;
    end;