RE: Huge Relationship Problems (Microsoft Access)

RE: Huge Relationship Problems
message from =?Utf-8?B?U21pdGg=?= on 11 May 2004
I have just experience similar problems. All of a sudden most of my relationships have disappeared. I try recreating & saving new relationships but after closing the relationship window and reopening it, the relationships are gone & are not saved at all. If anyone can help me with this problem, it would be much appreciated. (Using Access 2002)

John Vinson replied to =?Utf-8?B?U21pdGg=?= on 12 May 2004

I suspect that the *relationships* are still there - it's just the
*graphical display* that's messed up.

Try running this VBA code. Create a new Module; copy and paste this
code into it; then in the Immediate window type

ShowAllRelations

Sub ShowAllRelations()
Dim db As DAO.Database
Dim rel As Relation
Dim fld As Field
Set db = CurrentDb
For Each rel In db.Relations
Debug.Print "Relation "; rel.Name, rel.Table, _
rel.ForeignTable, Hex(rel.Attributes)
For Each fld In rel.Fields
Debug.Print fld.Name; " linked to "; fld.ForeignName
Next fld
Next rel
End Sub

John W. Vinson[MVP]
Come for live chats every Tuesday and Thursday
http://go.compuserve.com/msdevapps?loc=us&access=public

Archived message: RE: Huge Relationship Problems (Microsoft Access Error Message)