Udostępnij za pośrednictwem


clsCubeAnalyzer

Ostrzeżenie

  Ta funkcja zostanie usunięta z następnej wersji programu Microsoft SQL Server. Nie należy stosować tej funkcji w nowych projektach oraz jak najszybciej należy zmodyfikować aplikacje, w których obecnie jest używana ta funkcja.

Obiekt Decision Support Objects (DSO) ClassType clsCubeAnalyzer zawiera jedną metoda wyodrębnić informacji z kwerendy możnaDziennik kwerend przechowuje opisy kwerend wykonywanych na serwerze analizy.Ten obiekt zawiera metoda za pomocą własnego wewnętrznego interfejs.

Nie ma żadnych kolekcje lub właściwości skojarzonych z obiektu ClassType clsCubeAnalyzer.

Przykłady

Pobieranie modułu dziennika kwerend

Poniższy przykład kodu pobiera całą zawartość moduł dziennika kwerend z serwera analiz i drukuje liczbę rekordów w okienku bezpośrednim:

Option Explicit

Public dsoServer As DSO.Server
Public dsoDB As DSO.MDStore
Public dsoCube As DSO.MDStore
Public dsoCubeAnalyzer As DSO.CubeAnalyzer
Public ADODBRecSet As ADODB.Recordset

Public Sub AnalyzeCube()
    If dsoServer Is Nothing Then
       Set dsoServer = New DSO.Server
         'MyServer is the name of the Analysis server.
         dsoServer.Connect ("MyServer")
    End If
    
    'Get first database from server.
    Set dsoDB = dsoServer.MDStores(1)
    
    'Get first cube from database.
    Set dsoCube = dsoDB.MDStores(1)
    
    'Get analyzer object from cube.
    Set dsoCubeAnalyzer = dsoCube.Analyzer
    
    'Get recordset from log.
    Set ADODBRecSet = dsoCubeAnalyzer.OpenQueryLogRecordset _
      ("SELECT * FROM QueryLog")
      
    If ADODBRecSet.BOF And ADODBRecSet.EOF Then
        Debug.Print "<<No records in query log>>"
    Else
        ADODBRecSet.MoveLast
       Debug.Print "   Record count: " & ADODBRecSet.RecordCount
    End If
End Sub
 

Zobacz także

Odwołanie