AMO Extract MDXScript.ps1

$serverName="localhost"
$databaseName = "AdventureWorks"
$cubeName = "Model"
$outputFolder = "d:\data"

# load the AMO into the current runspace
[System.Reflection.Assembly]::LoadwithpartialName("Microsoft.AnalysisServices") > $null

# connect to the server
$svr = new-Object Microsoft.analysisservices.Server
$svr.Connect($serverName)
$db = $svr.Databases.GetByName($databaseName)
$cube = $db.Cubes.GetByName($cubeName)
$dateStamp = [DateTime]::Now.ToString("yyyyMMdd_HHmm")
$mdxScript = $cube.MDXScripts[0]

"Scripting $($db.name)"

# write out MDXScript XMLA
$xw = new-object System.Xml.XmlTextWriter("$($outputFolder)\MDXScript_$($db.Name)_$($dateStamp).xmla", [System.Text.Encoding]::UTF8)
$xw.Formatting = [System.Xml.Formatting]::Indented
[Microsoft.AnalysisServices.Scripter]::WriteAlter($xw, $mdxScript,$true,$true)

# clean up
$xw.Close()
$svr.Disconnect()