Hi all:

Is anybody can tell me how to update a cube?(not process cube)
Following is my code that runs with no exception, but doesn't work at all.

Dim cn As New ADODB.Connection
Dim strSource As String
...
cn.ConnectionString = "Data Source=bigman;Provider=msolap;Initial Catalog=cubes"
cn.Open
strSource = "UPDATE CUBE [cube1] SET ([All book_type], [All bookstore]).VALUE = 3333"
cn.Execute strSource
cn.Close
...

Thanks

zhiguang