We just moved our production web site to Windows 2003. We have asp
pages that access OLAP cubes via the 'cn.Open "provider=MSOLAP.2;Data

Source=dbname;user id=sid;password=pw;Initial Catalog=Balanced

Scorecard;SSPI=anonymous"' provider code. We are running Analysis
Services SP3. This works fine under our Windows 2000 environment. Now,
it takes approx. 45 seconds for MDX statements to return data. Any
thoughts/suggestions on where I can look to see what might cause this?
The data does return back succesfully after the 45 seconds. The SQL
Server box where Analysis Services is installed did not change.
As always, thanks!
PD

PD wrote:
I was able to narrow down the code that is causing the delay..

set cn = Server.CreateObject ("ADODB.Connection")
cn.Open "provider=MSOLAP.2;Data Source=dbname;user
id=sid;password=pw;Initial Catalog=Balanced Scorecard;SSPI=anonymous"

set cs = Server.CreateObject ("ADOMD.Cellset")

''DELAY HAPPENS ON THE FOLLOWING LINE OF CODE
cs.ActiveConnection = cn

It takes approx. 5 seconds per connection on the Windwos 2003 box and
less than a second on the Windows 2000 box. I could see if it was a
rights/privilege/IIS issue then I would not be able to get a
connection, but since I am able to get a connection (after the 5
seconds), I'm not sure where to look next. I'm running MDAC 2.8,
Analysis Services sp3, Pivot Table 8.0.1.94.

How do you see the information in your cube on the screen? As a kind of pivot table or just a steady table?

--
Message posted via http://www.sqlmonster.com

Helma Schapendonk-Maas via SQLMonster.com wrote:

By looping through the ADOMD.Cellset object via the following code:

set cs_phones = Server.CreateObject ("ADOMD.Cellset")

set colSales = cs_phones.Axes(0)
set rowSales = cs_phones.Axes(1)
cube_total = 0
For Each posFMRow In rowSales.Positions '' Determine if phone data
exists by looping through Calls rows
For Each posFMCol In colSales.Positions
if posFMRow.Members(0).Caption = "Calls" then
cube_total = cube_total + cs_phones(posFMCol.Ordinal,
posFMRow.Ordinal).FormattedValue
end if
Next
Next