How to capture the SSAS server response to an XMLA command issued in VB Script

Question

Hi all,
I have an SSIS package that contains a VB script task that sends XMLA commands to my SSAS server.  (I am using a script task and not the DDL task because there is lengthy logic required to build the XMLA command and send it to the appropriate
server.)
The problem I have is that while I have been able execute the XMLA command against the SSAS server, I am not able to capture the full response from the server.  Warnings are not being captured and other data is missing.  My code currently is as
follows:
Dim cn As New AdomdClient.AdomdConnection
Dim cmd As New AdomdClient.AdomdCommand
Dim returnValue As Object
cn.ConnectionString = "Data Source=MyServer;Initial Catalog=MyDB;Provider=MSOLAP.5;Integrated Security=SSPI;"
cn.Open()
cmd.Connection = cn
cmd.CommandText = fileReader
On Error Resume Next
returnValue = cmd.Execute()
MsgBox(Err.Description)
cn.Close()
Note that "fileReader" is the string containing the XMLA command.
If the xmla processes a dimension, and there are duplicate keys (for which it is set to error and stop), Management Studio give the response shown below, which includes the warning indicating there are duplicate keys:
<return xmlns="urn:schemas-microsoft-com:xml-analysis">
<results xmlns="http://schemas.microsoft.com/analysisservices/2003/xmla-multipleresults">
<root xmlns="urn:schemas-microsoft-com:xml-analysis:empty">
<Exception xmlns="urn:schemas-microsoft-com:xml-analysis:exception" />
<Messages xmlns="urn:schemas-microsoft-com:xml-analysis:exception">
<Warning WarningCode="1092550658" Description="Errors in the OLAP storage engine: A duplicate attribute key has been found when processing: Table: 'MyDim', Column: 'MyCol', Value: 'XYZ'. The attribute is 'MyAttr'." Source="Microsoft SQL Server 2012 Analysis Services" HelpFile="" />
<Error ErrorCode="3238002695" Description="Internal error: The operation terminated unsuccessfully." Source="Microsoft SQL Server 2012 Analysis Services" HelpFile="" />
However, in the VB script it captured in Err.description just some of the error: "Errors in the OLAP storage engine: An error occurred while the "MyAttr" attribute of the "MyDim" was being processed".
Is there anyway to capture in the VB Script the full XML error as it appears in Management Studio?
Help would be much appreciated!
Thanks
Guy

Answer 1

Another method for executing XMLA is using Microsoft.AnalysisServices.Xmla;
C# code will look like below:
using Microsoft.AnalysisServices.Xmla;
  XmlaClient clnt = new XmlaClient();
                  string strOut = "", strMsg="";
                  string strXmla = File.ReadAllText(strXmlaFileName);
  clnt.Connect(strServer);
                  clnt.Execute(strXmla, "", out strOut, false, true);
                  clnt.Disconnect();
                  //check status
                  //Create the XmlDocument.
                  XmlDocument doc = new XmlDocument();
                  doc.LoadXml(strOut);
                  //display Error
                  XmlNodeList elemList = doc.GetElementsByTagName("Error");
                  for (int i = 0; i < elemList.Count; i++)
                      Console.WriteLine(elemList[i].Attributes["Description"].Value);
                      strMsg += elemList[i].Attributes["Description"].Value + "\r\n" ;
                      ++intExitCode;
                  //display warnings
                  elemList = doc.GetElementsByTagName("Warning");
                  for (int i = 0; i < elemList.Count; i++)
                      Console.WriteLine("Warning:" + elemList[i].Attributes["Description"].Value);
                      strMsg += elemList[i].Attributes["Description"].Value + "\r\n" ;
Hope this helps.
Arun