网上都是基于TDatebase的,用Jet的如何实现

解决方案 »

  1.   

    用「TADOConnection」控件連接「Access」
    ConnectionString的値:
    Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\path\AccessDB.mdb;Persist Security Info=False
      

  2.   

    最原始的方法是把表的数据复制到一个你所想改名的表里,
    SQL实现方法:
    //建立新表,并复制数据到新表
    s:='SELECT * INTO <DESIRE TABLE NAME> FROM <TABLE NAME>';
    ADOQUERY1.CLOSE;
    ADOQUERY1.SQL.CLEAR;
    ADOQUERY1.SQL.ADD(S);
    ADOQUERY1.ExecSQL;
    //删除原来的表
    s:='Drop Table <table>';
    ADOQUERY1.CLOSE;
    ADOQUERY1.SQL.CLEAR;
    ADOQUERY1.SQL.ADD(S);
    ADOQUERY1.ExecSQL;