remove relationship programaticaly

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is It possible to remove relationships between tables, programaticaly,
without Access IDE. I need that because of huge reorganisation. When I use:
DROP INDEX PrimaryKey ON tblItems, that is parent to tblItemDetail I get an
error message:
Cannot delete index it is either the current index or is used on relationship.
I know how to solve this on local computer within IDE Tools, but I am using
ASP so I have to do remotely, by script.
Thanx for help.
 
Yes...this should give you an idea of what needs to be done...

Dim dbe
Dim wrk
Dim db
Dim rel
Dim strRelName

Set dbe = CreateObject("DAO.DBEngine.36")
dbe.SystemDB = "path to MDW" 'Use system.mdw or omit this line, if
database isn't secure
Set wrk = dbe.CreateWorkspace("whatever","User Name Here","password
here") 'Admin and "" if unsecured database
Set db = wrk.OpenDatabase("path to MDB")

For each rel in db.Relations
If rel.Table = "The Table" And rel.ForeignTable = "The Related
Table" Then
strRelName = rel.Name
Exit For
End if
Next

db.Relations.Delete strRelName
 
Is It possible to remove relationships between tables, programaticaly,
without Access IDE. I need that because of huge reorganisation.
Click to expand...

ALTER TABLE DROP CONSTRAINT etc



HTH


Tim F
 
Back
Top