使用VBScript的MDX查询

vbscript
mdx

2016-05-17 89 views 0 likes

是否可以使用VBScript来执行MDX查询？我已经成功地通过VBScript完成SQL查询，了解如何处理MDX查询的任何想法？使用VBScript的MDX查询

目前我使用一个连接字符串，如下所示：

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

什么会我必须要改变它来得到它的工作？

来源

2016-05-17 user3017424

这个有用吗？ http://stackoverflow.com/questions/11188747/any-mdx-query-within-excel-vba – dsolimano

它只是使用不同的提供商，所以我不明白为什么不，只需调整连接字符串，然后离开你。 – Lankymart

绝对有用。我对VBScript很满意，因此它给了我很多自由来获取我需要的信息。目前，它需要通过各种Excel电子表格进行相当数量的工作。 – user3017424

回答

我觉得像下面这样：

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

来源

2016-05-17 16:46:03 whytheq

谢谢，现在有点淹没，只要我可以，我会放弃它。 – user3017424

使用VBScript的MDX查询

回答

相关问题