BusinessObjects SDK: Change a Universe's Data Connection

Change a Universe’s Data Connection without using the Universe COM SDK.


'get the Universe infoObjects
Dim universeInfoObject As InfoObject = infoStore.Query("SELECT SI_ID, SI_NAME, SI_DATACONNECTION FROM CI_APPOBJECTS WHERE SI_ID=" & )(1)

'cast InfoObject into a Universe
Dim universe As BusinessObjects.Enterprise.Desktop.Universe = CType(universeInfoObject, Universe)

With universe
'clear all data connections
.DataConnections.Clear()

'add new data connection
.DataConnections.Add()

'save to repository
.Save()
End With

One thought on “BusinessObjects SDK: Change a Universe's Data Connection

Leave a Reply

Your email address will not be published. Required fields are marked *