Manipulating LDM relationships from VBScript

Does anyone have any VBScript examples of how to manipulate relationships in an LDM?  Specifically, I want to be able to:

1. change parent identifiers from PK to AK
2. select a different child attribute for a given parent attribute

Thanks!