I need to delete a cube so that I can replace it with a VB script.

Can anyone provide me with a pointer or example of how to do this?

Bob

Bob Segrest, PMP
BSegE LLC
(540) 937-5875
http://www.BSegE.com

See the following code, it assumes you've declared and passed in strServer
(the OLAP server), strDatabase (the OLAP Database) and strCube (the name of
the cube you want to delete):



Dim dsoServer As DSO.Server
Dim dsoDatabase As DSO.Database

Set dsoServer = New DSO.Server
dsoServer.Connect (strServer)
Set dsoDatabase = dsoServer.MDStores(strDatabase)

dsoDatabase.MDStores.Remove (strCube)




Good luck.


"Bob Segrest" wrote:

Thank you very much!

That took care of my problem nicely... ;^)


Bob Segrest, PMP
BSegE LLC
(540) 937-5875
http://www.BSegE.com