Udostępnij przez

Praca z serwerami

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.

Przykład kodu w tym temacie przedstawiono sposób nawiązywania połączenia z serwerem analizy za pomocą Decision Support Objects (DSO) oraz listę niektórych wartości jego właściwość.

Jeśli serwer analiz nie jest zainstalowany na komputerze, na którym są uruchomione w tym przykładzie, zmienić LocalHost nazwę komputera Microsoft ® Windows NT ® Server 4.0 lub Windows ® 2000, którym jest zainstalowany serwer analiz i uruchomiony.

Lista serwerów

Poniższy przykład kodu ilustruje użycie DSO.Server obiektu połączenie i pobieranie atrybutów z serwera analizy.Poniższy przykład kodu, który łączy się z lokalnym analizy serwer używa Connect metoda DSO.Server obiekt, a następnie wyświetla niektóre właściwości podstawowego serwera w bezpośrednim:

Private Sub ListServerProps()
    Dim dsoServer As DSO.Server
    Dim enuClassType As DSO.ClassTypes

    ' Create instance of server and connect.
    ' "LocalHost" will default to the
    ' local Windows NT Server 4.0 where the
    ' Analysis server is installed.
    Set dsoServer = New DSO.Server
    dsoServer.Connect "LocalHost"

    ' Show the server's information to the user.
    If dsoServer.ClassType = clsServer Then
        Debug.Print "Server Properties:"
        Debug.Print "       Name: " & dsoServer.Name
        Debug.Print "Description: " & dsoServer.Description
    End If

End Sub
  • Last updated on