Shulou(Shulou.com)06/02 Report--

# Defined Connection String

$connstring = "server=lync\ rtclocal;database=rtcdyn;trusted_connection=true;" $connstring2 = "server=lync2\ rtclocal;database=rtcdyn

Trusted_connection=true; "

# Define SQL Command

$command = New-Object System.Data.SqlClient.SqlCommand

$command.CommandText = "Select (cast (RE.ClientApp as varchar (100) as ClientVersion

R.UserAtHost as UserName, Reg.Fqdn

From rtcdyn.dbo.RegistrarEndpoint RE

Inner Join rtc.dbo.Resource R on R.ResourceId = RE.OwnerId

Inner Join rtcdyn.dbo.Registrar Reg on Reg.RegistrarId =

RE.PrimaryRegistrarClusterId `

Order By ClientVersion, UserName "

# Make the connection to Server 1

$connection = New-Object System.Data.SqlClient.SqlConnection

$connection.ConnectionString = $connstring

$connection.Open ()

$command.Connection = $connection

$sqladapter = New-Object System.Data.SqlClient.SqlDataAdapter

$sqladapter.SelectCommand = $command

$results = New-Object System.Data.Dataset

$recordcount=$sqladapter.Fill ($results)

$connection.Close ()

$overallrecords = $overallrecords + $Results.Tables [0]

# Make the connection to Server 2

$connection.ConnectionString = $connstring2

$connection.Open ()

$command.Connection = $connection

$results = New-Object System.Data.Dataset

$recordcount=$sqladapter.Fill ($results)

$connection.Close ()

$overallrecords = $overallrecords + $Results.Tables [0]

# End Section 2

$overallrecords | Export-Csv "PoolDistribution.csv"

Write-Host-ForegroundColor Green "Query complete"

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.