| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

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

denissoft ©   (2007-02-24 09:20:00) 

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

---

denissoft   (2007-02-24 14:02:00) [1]

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

---

sniknik   (2007-02-24 13:58:00) [2]

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

---

denissoft   (2007-02-24 13:16:00) [3]

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


 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

---

Palladin   (2007-02-24 12:48:00) [4]

select * from MSysRelationships

---

denissoft   (2007-02-24 12:43:00) [5]

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

---

Виталий Панасенко   (2007-02-24 09:40:00) [6]

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

---

Наверх