Azure Powershell获取指定订阅下的虚拟机信息（ASM）

为方便Azure用户导出已创建虚拟机的相关信息，特编写如下脚本：

详情脚本：

# 登陆Azure Account
Add-AzureAccount -Environment AzureChinaCloud

# 设置订阅ID
$sub = "******"
Select-AzureSubscription -SubscriptionName $sub

# 设置Excel格式
$excel = New-Object -ComObject Excel.Application
$workbook = $excel.Workbooks.add()
$sheet = $workbook.worksheets.Item(1)
$sheet.cells.item(1,1) = "Test"
$excel.Visible = $true

for($b = 1 ; $b -le 13 ; $b++)
{
$sheet.cells.item(1,$b).font.bold = $true
#$sheet.cells.item(1,$b).borders.LineStyle = $lineStyle::xlDashDot
$sheet.cells.item(1,$b).borders.ColorIndex = $colorIndex::xlColorIndexAutomatic
$sheet.cells.item(1,$b).borders.weight = $borderWeight::xlMedium
}

$x = 2
$lineStyle = "microsoft.office.interop.excel.xlLineStyle" -as [type]
$colorIndex = "microsoft.office.interop.excel.xlColorIndex" -as [type]
$borderWeight = "microsoft.office.interop.excel.xlBorderWeight" -as [type]
$chartType = "microsoft.office.interop.excel.xlChartType" -as [type]
$sheet.cells.item(1,1) = "名称"
$sheet.cells.item(1,2) = "类型"
$sheet.cells.item(1,3) = "状态"
$sheet.cells.item(1,4) = "云服务"
$sheet.cells.item(1,5) = "位置"
$sheet.cells.item(1,6) = "订阅ID"
$sheet.cells.item(1,7) = "内网IP"
$sheet.cells.item(1,8) = "配置信息"
$sheet.cells.item(1,9) = "系统"
$sheet.cells.item(1,10) = "DNS域名"
$sheet.cells.item(1,11) = "公网IP"
$sheet.cells.item(1,12) = "公共端口"
$sheet.cells.item(1,13) = "私有端口"

# 定义变量
$vms = Get-AzureVM
$vmCount = $vms.Count

# 提取变量Value
for($i=0; $i -lt $vmCount; $i++)
{
$vm = $vms[$i];
$sheet.cells.item($x,1) = $vm.name
$sheet.cells.item($x,2) = "虚拟机(经典)"
$sheet.cells.item($x,3) = $vm.status
$sheet.cells.item($x,4) = $vm.ServiceName
$uri=$vm.VM.OSVirtualHardDisk.MediaLink.AbsoluteUri
$location=Get-AzureDisk | Where-Object {$_.MediaLink -eq $uri}| Select-Object Location
$sheet.cells.item($x,5) = $location.Location
$sheet.cells.item($x,6) = $sub
$sheet.cells.item($x,7) = $vm.IpAddress
$sheet.cells.item($x,8) = $vm.InstanceSize
$sheet.cells.item($x,9) = $vm.VM.OSVirtualHardDisk.OS
$sheet.cells.item($x,10) = $vm.ServiceName+".chinacloudapp.cn"
$endpoints = Get-AzureEndpoint -VM $vm
$endpointsCount = $endpoints.Count
for($j=0; $j -lt $endpointsCount; $j++)
{
$endpoint = $endpoints[$j];
$sheet.cells.item($x,11) = $endpoint.vip
$sheet.cells.item($x,12) = $endpoint.port
$sheet.cells.item($x,13) = $endpoint.localport

$x++
}
}
$range = $sheet.usedRange
$range.EntireColumn.AutoFit() | out-null

$uri=$vm.VM.OSVirtualHardDisk.MediaLink.AbsoluteUri
$location=Get-AzureDisk | Where-Object {$_.MediaLink -eq $uri}| Select-Object Location

输出项及格式见下：



备注：

1.运行脚本期间可能会出现如下报错，忽略即可，不影响最终的结果统计。



2.该脚本运行前，需要事先定义好订阅

3.该脚本输出的为一个Excel表格，输出期间不要关闭正在运行的Excel

4.如果需要对指定Azure账号下的所有订阅进行统计，可参考如下脚本的遍历订阅方法，参考链接：

https://blogs.msdn.microsoft.com/tomholl/2016/11/22/dumping-details-of-azure-virtual-machines-to-csvexcel/

param(
[string]$file="Azure-Classic-VMs.csv"
)

add-azureaccount -Environment AzureChinaCloud

$subs = Get-AzureSubscription
$vmobjs = @()

foreach ($sub in $subs)
{
Write-Host Processing subscription $sub.SubscriptionName

try
{
Select-AzureSubscription -SubscriptionId $sub.SubscriptionId -ErrorAction Continue

$vms = Get-AzureVm
$svcs = Get-AzureService

foreach ($vm in $vms)
{
$service = $svcs | where-object { $_.ServiceName -eq $vm.ServiceName }

$vmInfo = [pscustomobject]@{
'Subscription'=$sub.SubscriptionName
'Mode'='Classic'
'Name'=$vm.Name
'ServiceName' = $vm.ServiceName
'Location' = $service.Location
'VMSize' = $vm.InstanceSize
'Status' = $vm.Status
'AvailabilitySet' = $vm.AvailabilitySetName}

$vmobjs += $vmInfo

}
}
catch
{
Write-Host $error[0]
}
}