Как установить связь

← →
denissoft © (2007-02-24 09:20) [0]

Как импортировать связь между таблицами из Microsoft Office Access 2003 (MDB) в свою программу? ADO

← →
Виталий Панасенко © (2007-02-24 09:40) [1]

А зачем что-то импортировать ? Если я правильно понял суть вопроса, это нен нужно - все отношения определены в MDB

← →
denissoft © (2007-02-24 12:43) [2]

Ставлю вопрос проще, как достучаться до системной таблицы MSysRelationships

← →
Palladin © (2007-02-24 12:48) [3]

select * from MSysRelationships

← →
denissoft © (2007-02-24 13:16) [4]

Пробовал так, пишет что “Отсутствует разрешение на чтение данных”

object ADOConnection1: TADOConnection Connected = True ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\db1.mdb;Persist " + "Security Info=False" LoginPrompt = False Mode = cmShareDenyNone Provider = "Microsoft.Jet.OLEDB.4.0" Left = 96 Top = 32 end object ADOQuery1: TADOQuery Connection = ADOConnection1 Parameters = <> SQL.Strings = ( "select * from MSysRelationships") Left = 96 Top = 64 end
connectString =
Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=D:\db1.mdb;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:Don"t Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False

> пишет что “Отсутствует разрешение на чтение данных”
ну так, прав нет (не находит)
надо указать системную базу в которой они прописаны, т.е. добавь к своей строке параметр со значением (своим естественно) -> "Jet OLEDB:System database=C:\Documents and Settings\User\Application Data\Microsoft\Access\System.mdw"

Большое спасибо!

Как установить связь Найти похожие ветки