Connect to PowerPivot engine with c#

Question

I am developing an addin for excel 2010 and i need to interact with powerpivot engine. Is that possible? Can i interact with powerpivot engine using AMO? How can i do that? I am trying with this
Server
svr = new
Server();
svr.Connect(
"Initial Catalog=Microsoft_SQLServer_AnalysisServices;Data Source=$Embedded$");
but, i have "data source must be specified..." error.
Thanks

Answer 1

Javier
Correct. Based on the article of Chris Webb I created the VBA routine as below to get an insight of what's available as information in PowerPivot. Like view DBSCHEMA_COLUMNS I use to retrieve the columns for each measuregroup and store it on a worksheet.
Than I can start commenting the meaning of the columns. Sometimes formulas are more complex (when you start with ranking tricks) and need some extra explanation. Currently there are not a lot of people who have much experience
with PowerPivot. This way we lower the barrier and help them to understand more easily the DAX functions and its power. 
The problem with the DMV's I have are the missing formulas. This would be handy, now is copy and paste which is realy time consuming. 
PS. I used the information of view MDSCHEMA_MEASURES to retrieve PowerPivot data from other workbooks.    
The routine below creates for each DMV defined a worksheet.
Some views will return an error:
DISCOVER_DIMENSION_STAT - Application-defined or object-defined error
DISCOVER_INSTANCES - Application-defined or object-defined error
DISCOVER_LOCKS - Application-defined or object-defined error
DISCOVER_PARTITION_DIMENSION_STAT - Application-defined or object-defined error
DISCOVER_PARTITION_STAT - Application-defined or object-defined error
DISCOVER_PERFORMANCE_COUNTERS - Application-defined or object-defined error
MDSCHEMA_PROPERTIES - Cannot rename a sheet to the same name as another sheet, a referenced object library or a workbook referenced by Visual Basic.
MDSCHEMA_PROPERTIES - Select method of Range class failed
Sub GetDMVs()
    On Error GoTo Errhandler
    Dim sDMV       As String
    Dim sSheet     As String
    Dim vArray(56) As String
    vArray(0) = "DBSCHEMA_CATALOGS"
    vArray(1) = "DBSCHEMA_COLUMNS"
    vArray(2) = "DBSCHEMA_PROVIDER_TYPES"
    vArray(3) = "DBSCHEMA_TABLES"
    vArray(4) = "DISCOVER_COMMAND_OBJECTS"
    vArray(5) = "DISCOVER_COMMANDS"
    vArray(6) = "DISCOVER_CONNECTIONS"
    vArray(7) = "DISCOVER_DB_CONNECTIONS"
    vArray(8) = "DISCOVER_DIMENSION_STAT"
    vArray(9) = "DISCOVER_ENUMERATORS"
    vArray(10) = "DISCOVER_INSTANCES"
    vArray(11) = "DISCOVER_JOBS"
    vArray(12) = "DISCOVER_KEYWORDS"
    vArray(13) = "DISCOVER_LITERALS"
    vArray(14) = "DISCOVER_LOCKS"
    vArray(15) = "DISCOVER_MASTER_KEY"
    vArray(16) = "DISCOVER_MEMORYGRANT"
    vArray(17) = "DISCOVER_MEMORYUSAGE"
    vArray(18) = "DISCOVER_OBJECT_ACTIVITY"
    vArray(19) = "DISCOVER_OBJECT_MEMORY_USAGE"
    vArray(20) = "DISCOVER_PARTITION_DIMENSION_STAT"
    vArray(21) = "DISCOVER_PARTITION_STAT"
    vArray(22) = "DISCOVER_PERFORMANCE_COUNTERS"
    vArray(23) = "DISCOVER_PROPERTIES"
    vArray(24) = "DISCOVER_SCHEMA_ROWSETS"
    vArray(25) = "DISCOVER_SESSIONS"
    vArray(26) = "DISCOVER_STORAGE_TABLE_COLUMN_SEGMENTS"
    vArray(27) = "DISCOVER_STORAGE_TABLE_COLUMNS"
    vArray(28) = "DISCOVER_STORAGE_TABLES"
    vArray(29) = "DISCOVER_TRACE_COLUMNS"
    vArray(30) = "DISCOVER_TRACE_DEFINITION_PROVIDERINFO"
    vArray(31) = "DISCOVER_TRACE_EVENT_CATEGORIES"
    vArray(32) = "DISCOVER_TRACES"
    vArray(33) = "DISCOVER_TRANSACTIONS"
    vArray(34) = "DMSCHEMA_MINING_COLUMNS"
    vArray(35) = "DMSCHEMA_MINING_FUNCTIONS"
    vArray(36) = "DMSCHEMA_MINING_MODEL_CONTENT"
    vArray(37) = "DMSCHEMA_MINING_MODEL_CONTENT_PMML"
    vArray(38) = "DMSCHEMA_MINING_MODEL_XML"
    vArray(39) = "DMSCHEMA_MINING_MODELS"
    vArray(40) = "DMSCHEMA_MINING_SERVICE_PARAMETERS"
    vArray(41) = "DMSCHEMA_MINING_SERVICES"
    vArray(42) = "DMSCHEMA_MINING_STRUCTURE_COLUMNS"
    vArray(43) = "DMSCHEMA_MINING_STRUCTURES"
    vArray(44) = "MDSCHEMA_CUBES"
    vArray(45) = "MDSCHEMA_DIMENSIONS"
    vArray(46) = "MDSCHEMA_FUNCTIONS"
    vArray(47) = "MDSCHEMA_HIERARCHIES"
    vArray(48) = "MDSCHEMA_INPUT_DATASOURCES"
    vArray(49) = "MDSCHEMA_KPIS"
    vArray(50) = "MDSCHEMA_LEVELS"
    vArray(51) = "MDSCHEMA_MEASUREGROUP_DIMENSIONS"
    vArray(52) = "MDSCHEMA_MEASUREGROUPS"
    vArray(53) = "MDSCHEMA_MEASURES"
    vArray(54) = "MDSCHEMA_MEMBERS"
    vArray(55) = "MDSCHEMA_PROPERTIES"
    vArray(56) = "MDSCHEMA_SETS"
    For i = 0 To UBound(vArray, 1)
        sDMV = vArray(i)
        sSheet = Mid(sDMV, InStr(sDMV, "_") + 1, 22)
        Sheets.Add
        ActiveSheet.Name = sSheet
        Worksheets(sSheet).Range("A1").Select
        With ActiveSheet.ListObjects.Add(SourceType:=0, Source:=Array( _
            "OLEDB;Provider=MSOLAP.4;Persist Security Info=True;Initial Catalog=Microsoft_SQLServer_AnalysisServices;Data Source=$Embedded$;MDX Compatibility=1;Safety Options=2;MDX Missing Member Mode=Error;Optimize
Response=3;Cell Error Mode=TextValue"), Destination:=Range("$A$1")).QueryTable
            .CommandType = xlCmdDefault
            '.CommandText = Array("select TABLE_NAME, COLUMN_NAME from $system." & sDMV)
            .CommandText = Array("select * from $system." & sDMV)
            .RowNumbers = False
            .FillAdjacentFormulas = False
            .PreserveFormatting = True
            .RefreshOnFileOpen = False
            .BackgroundQuery = True
            .RefreshStyle = xlInsertDeleteCells
            .SavePassword = False
            .SaveData = True
            .AdjustColumnWidth = True
            .RefreshPeriod = 0
            .PreserveColumnInfo = True
            .ListObject.DisplayName = sDMV
            .Refresh BackgroundQuery:=False
        End With
   Next i
Exit Sub
Errhandler:
    Debug.Print sDMV & " - " & Err.Description
    Resume Next
End Sub
Eddy N.