dbTalk Databases Forums  

Finding AS2000 version

microsoft.public.sqlserver.olap microsoft.public.sqlserver.olap


Discuss Finding AS2000 version in the microsoft.public.sqlserver.olap forum.



Reply
 
Thread Tools Display Modes
  #1  
Old   
badlydressedboy
 
Posts: n/a

Default Finding AS2000 version - 05-15-2006 , 10:03 AM






It's always the simple things...

Does anyone know how to find out if you are running standard or enterprise
edition of AS.
I am just running AS with no SQL Server as I have an Oracle data warehouse.

I *think* I am running enterprise because I can partition my cubes. There
must be a better way to know what you are running than this though...?

TIA

Al

Reply With Quote
  #2  
Old   
AT
 
Posts: n/a

Default Re: Finding AS2000 version - 05-15-2006 , 06:26 PM






Hi Al,

Try running this VB script:

'VB syntax:
' Dim dsoServer As New DSO.Server
' Enumerated olapXXXXXXX constants already defined when
' you added the DSO COM object to your project
'VBS syntax:
Dim dsoServer
Set dsoServer = CreateObject("DSO.Server")
Const olapEditionUnlimited = 0
Const olapEditionPivotOnly = 1
Const olapEditionNoPartitions = 2
Const olapEditionError = &HFFFFFFFF
'-------------------------------------------------------
' Connect to the local Analysis server.
dsoServer.Connect "LocalHost"
' Check the Edition property.
Select Case 0 'dsoServer.Edition
Case olapEditionUnlimited
' Insert code for Enterprise Edition features.
Msgbox "EE"
Case olapEditionPivotOnly
' Reserved for future use.
Msgbox "Reserved"
Case olapEditionNoPartitions
' Insert code for Standard Edition features.
Msgbox "Standard Edition"
Case olapEditionError
' An error occurred while retrieving this information.
Msgbox "An error occurred"
Case Other
' Invalid return value
Msgbox "Invalid return value seen"
End Select
dsoServer.CloseServer
Set dsoServer = Nothing

HTH,
Yaniv


Reply With Quote
  #3  
Old   
badlydressedboy
 
Posts: n/a

Default Re: Finding AS2000 version - 05-16-2006 , 03:27 AM



Thanks Yaniv - that is perfect.

"yaniv.mor (AT) mail (DOT) com" wrote:

Quote:
Hi Al,

Try running this VB script:

'VB syntax:
' Dim dsoServer As New DSO.Server
' Enumerated olapXXXXXXX constants already defined when
' you added the DSO COM object to your project
'VBS syntax:
Dim dsoServer
Set dsoServer = CreateObject("DSO.Server")
Const olapEditionUnlimited = 0
Const olapEditionPivotOnly = 1
Const olapEditionNoPartitions = 2
Const olapEditionError = &HFFFFFFFF
'-------------------------------------------------------
' Connect to the local Analysis server.
dsoServer.Connect "LocalHost"
' Check the Edition property.
Select Case 0 'dsoServer.Edition
Case olapEditionUnlimited
' Insert code for Enterprise Edition features.
Msgbox "EE"
Case olapEditionPivotOnly
' Reserved for future use.
Msgbox "Reserved"
Case olapEditionNoPartitions
' Insert code for Standard Edition features.
Msgbox "Standard Edition"
Case olapEditionError
' An error occurred while retrieving this information.
Msgbox "An error occurred"
Case Other
' Invalid return value
Msgbox "Invalid return value seen"
End Select
dsoServer.CloseServer
Set dsoServer = Nothing

HTH,
Yaniv



Reply With Quote
Reply




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off



Powered by vBulletin Version 3.5.3
Copyright ©2000 - 2012, Jelsoft Enterprises Ltd.