IAdoMdCatalog.Driver

Fore Syntax

Driver: String;

Fore.NET Syntax

Driver: string;

Description

The Driver property determines driver identifier used at opening of the ADOMD catalog.

Comments

The property is relevant, if the WellKnownDriver property is not specified. Programmatic identifier of the provider, used to connect to the server, must be specified as the value of the Driver property. The following values are available for use in the current implementation:

Programmatic identifier (ProgId)	Provider description
MSOLAP.4	Microsoft OLE DB Provider for Analysis Services 10.0.
MSOLAP.2	Microsoft OLE DB Provider for OLAP Services 8.0.

Fore Example

Sub UserProc;
Var
    MB: IMetabase;
    CrInfo: IMetabaseObjectCreateInfo;
    CatAdo: IAdoMdCatalog;
Begin
    MB := MetabaseClass.Active;
    CrInfo := MB.CreateCreateInfo;
    CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_ADOMD_CATALOG;
    CrInfo.Id := "MAS_TEST";
    CrInfo.Name := "Catalog based on MSSQL Analysis Services";
    CrInfo.Parent := MB.Root;
    CatAdo := MB.CreateObject(CrInfo).Edit As IAdoMdCatalog;
    CatAdo.Driver := "MSOLAP.4";
    CatAdo.Server := "MAS_TEST";
    CatAdo.Name := "TEST_CUBE";
    (CatAdo As IMetabaseObject).Save;
End Sub UserProc;

After executing the example a new ADOMD catalog is created in the repository root directory. The catalog is set up to connect to the TEST_CUBE database located on the MAS_TEST server. The Microsoft OLE DB Provider for Analysis Services 10.0 driver is used at connection.

Fore.NET Example

This example is an entry point of the .NET assembly.

Imports Prognoz.Platform.Interop.AdoMd;
Imports Prognoz.Platform.Interop.Metabase;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    CrInfo: IMetabaseObjectCreateInfo;
    CatAdo: IAdoMdCatalog;
Begin
    MB := Params.Metabase;
    CrInfo := MB.CreateCreateInfo();
    CrInfo.ClassID := Convert.ToInt32(MetabaseObjectClass.KE_CLASS_ADOMD_CATALOG);
    CrInfo.Id := "MAS_TEST";
    CrInfo.Name := "Catalog based on MSSQL Analysis Services";
    CrInfo.Parent := MB.Root;
    CatAdo := MB.CreateObject(CrInfo).Edit() As IAdoMdCatalog;
    CatAdo.Driver := "MSOLAP.4";
    CatAdo.Server := "MAS_TEST";
    CatAdo.Name := "TEST_CUBE";
    (CatAdo As IMetabaseObject).Save();
End Sub;