2016-05-17 4 views
0

Можно ли делать запросы MDX с помощью VBScript? Я успешно выполнил SQL-запросы через VBScript, любую идею о том, как обращаться к MDX-запросам?Запросы MDX с использованием VBScript

В настоящее время я использую строку соединения, как следующее:

strConn = "Driver={SQL Server};" & _ 
"Server=10.0.0.1;" & _ 
"Address=10.0.0.1,1433;" & _ 
"Network=DBMSSOCN;" & _ 
"Database=databasename;" & _ 
"UID=user;" & _ 
"PWD=password;" 

Что бы я должен изменить его, чтобы заставить его работать?

+1

Это полезно? http://stackoverflow.com/questions/11188747/any-mdx-query-within-excel-vba – dsolimano

+0

Это просто использование другого провайдера, поэтому я не понимаю, почему нет, просто отрегулируйте строку подключения и пройдите. – Lankymart

+0

Определенно полезно. Мне очень нравится VBScript, и поэтому он дает мне большую свободу в получении необходимой мне информации. В настоящее время для этого требуется значительная работа через различные электронные таблицы Excel. – user3017424

ответ

0

Я думаю, что-то вроде следующего:

strConn = _ 
    "Provider=MSOLAP.6;" & _ 
    "Data Source=imxxxxxx;" & _          '<<<name of your server here 
    "Initial Catalog=AdventureWorksDW2012Multidimensional-EE;" & _ '<<<name of your Adv Wrks db here 
    "Integrated Security=SSPI" 

Вот пример его использования против некоторых mdx:

Dim pubConn As ADODB.Connection 
Set pubConn = New ADODB.Connection 
pubConn.CommandTimeout = 0 
pubConn.Open strConn 

Dim cs As ADOMD.Cellset 
Set cs = New ADOMD.Cellset 

Dim myMdx As String 
myMdx = _ 
    " SELECT" & _ 
    " NON EMPTY" & _ 
    " [Customer].[Customer Geography].[State-Province].&[AB]&[CA] ON 0," & _ 
    " NON EMPTY" & _ 
    " [Measures].[Internet Sales Amount] ON 1" & _ 
    " FROM [Adventure Works];" 

cs.Open myMdx, pubConn 

Выше от моего ответа (в VBA) здесь: VBA Reptitive MDX query to Analysis Services

+0

Спасибо, немного завалены прямо сейчас, как только смогу, я отдам его. – user3017424

Смежные вопросы