Enumerations (DSO)

注意：
下一版本的 Microsoft SQL Server 将删除该功能。请不要在新的开发工作中使用该功能，并尽快修改当前还在使用该功能的应用程序。

The Decision Support Objects (DSO) object model provides a number of enumerations. The following table lists the public enumerated types available through DSO. Click the name of an enumeration for a more detailed description.

Examples

Using the ClassTypes Enumeration

The following code uses the ClassTypes enumeration to retrieve the class type of an object and determine whether the object is a cube, a virtual cube, or some other object:

' Assume that the object dsoServer of ClassType clsServer exists.
Dim dsoDB as MDStore
Dim dsoCube as MDStore
Dim CubeCounter as Integer

Set dsoDB = dsoServer.MDStores(1)
For CubeCounter = 1 To dsoDB.MDStores.Count
  Set dsoCube = dsoDB.MDStores(CubeCounter)
  Debug.Print "  Cube: " & dsoCube.Name
  If dsoCube.SubClassType = sbclsRegular Then
    Debug.Print "       SubClassType: Regular"
    Debug.Print "        SourceTable: " & dsoCube.SourceTable
  Else
    Debug.Print "       SubClassType: Virtual"
  End If
Next CubeCounter