Не получается прочитать через ADO из таблицы MSysRelationships - нет прав.
Пытался разными способами добавить права, но возникют различные ошибки.
К примеру, через ADOX:

  DB := CoCatalog.Create;
  DB.Set_ActiveConnection(FormatConnectionString(DBName) + ';Persist Security Info=False;');
  try
    DB.Users['Admin'].SetPermissions('MSysRelationships', adPermObjTable,
      adAccessSet, adRightRead, adInheritNone, EmptyParam);
  finally
    DB := nil;
  end;

Или через ADO: con.Execute('GRANT SELECT ON MSysRelationships TO Admin;') тоже возникает ошибка.

Для чего это надо? Для того, чтобы определить, какие индексы у таблиц являются системными (автоматически сгенерированными), чтобы их не трогать при переносе структуры базы. Через ADOX такие индексы не отличаются от обычных индексов, но в списке индексов у таблицы Access их не показывает.

Есть ли у кого какие идеи, как ещё можно получить доступ к MSysRelationships?

http://www.sql.ru/forum/1144371/prochitat-dannye-msysrelationships