Привязать базу данных в Дельфи7

ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=biblio.mdb;Persist Security Info=False';
    ADOConnection1.LoginPrompt:=false;
    ADOTable1.Connection:= ADOConnection1;
    ADOTable1.TableName:='Здесь название таблицы';
    ADOTable1.Active:=true;
    DataSource1.DataSet:=ADOTable1;

var
  FileName: string; //Путь к БД
begin
  FileName:=ExtractFilePath(application.ExeName)+'База данных.mdb'; //получаем путь к БД
  DataModule2.ADOConnection1.Close; //Закрываем соединение
  if FileExists(FileName) then //Если БД существует
  begin
    DataModule2.ADOConnection1.ConnectionString:= //Заполняем строку с настройками для соединения с БД
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+FileName+';'+
      'Mode=Share Deny None;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";'+
      'Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;'+
      'Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;'+
      'Jet OLEDB:Encrypt Database=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False';
    DataModule2.ADOConnection1.Open; //Открываем соединение с БД
  end
  else //если БД нет
  begin
    showmessage('База данных не найдена'); //Выводим сообщение о том что БД нет
    exit; //выходим и процедуры
  end;