ADO连接DSN的小异常, 有代码

ADO连接DSN的小错误, 有代码.
//   使用DELPHI   7.0,   以下代码产生异常。DSN数据源db1,   指向db1.mdb文件，其中有tab1表，这个表并没有什么特殊性，我就随便建了两个文本字段，还有一个自动编号。这个异常似乎与数据库的内容没有关系。

uses   DB,   ADODB;

var
    Table:   TADOTable;

procedure   TForm1.FormCreate(Sender:   TObject);
begin
    Table   :=   TADOTable.Create(self);
    Table.ConnectionString   :=   'Provider=MSDASQL.1;Persist   Security   Info=False;Data   Source=db1 ';
    Table.CursorType   :=   ctStatic;
    Table.TableName   :=   'tab1 ';
end;

procedure   TForm1.FormClick(Sender:   TObject);
begin
    Table.Open();
end;



[解决办法]
哦....那你换ADOQuery吧，它可以的，我刚才D6下试了。ODBC数据源名test

uses DB,ADODB;

var
Table: TADOquery;

procedure TForm1.FormCreate(Sender: TObject);
begin
Table := TADOquery.Create(self);
Table.ConnectionString := 'Provider=MSDASQL.1;Persist Security Info=False;Data Source=test ';
Table.CursorType := ctStatic;
table.SQL.Text := 'select * from 表名 ';
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Table.Open;
datasource1.DataSet := table;
end;