Relasion Ships I Access2000

  • Thread starter Thread starter Klaus L Jensen
  • Start date Start date
K

Klaus L Jensen

I have made a tool to make 2 Databases alike, it generates scripts but som
times I get a "Could not change field, within a relation" is there anyway to
see these relationships??

Please help me....


Med venlig hilsen
Klaus Ladegaard Jensen
 
I have made a tool to make 2 Databases alike, it generates scripts but som
times I get a "Could not change field, within a relation" is there anyway to
see these relationships??

Please help me....

Here's some VBA code to list all the relationships:

Public Sub ShowAllRelations2()
Dim db As DAO.Database
Dim rel As Relation
Set db = DBEngine(0)(0)
For Each rel In db.Relations
Debug.Print "Relation "; rel.Name, rel.Table, rel.ForeignTable
Next rel
End Sub
 
Thanks, but I use Delphi (ADO)

Do not know any VB

Can I get a translated version ??

Med venlig hilsen
Klaus Ladegaard Jensen
 
Thanks, but I use Delphi (ADO)

Do not know any VB

Can I get a translated version ??

Med venlig hilsen
Klaus Ladegaard Jensen

I'm not all that familiar with the ADO object model, but on a quick
look at some references it appears that (unlike the JET-specific DAO
objects) it doesn't expose a Relationships object. Perhaps someone
else can help? Or you can look at the MSysRelationships hidden systems
table and loop through it.
 
Back
Top