Editing SSRS Shared Data Sources with PowerShell 3.0

I have recently had a need to edit the server in the connection string of data sources for several dozen SSRS 2008 R2 reports. Easy I know but this was to be a part of a failover scenario. That means I might not be the one doing it.

So the requirements I had, were:

1.       Automate as much as possible to prevent human error.

2.       Make it easy enough for a trained monkey.

Thankfully there were only a few data sources but due to the requirements just documenting the manual process with pretty pictures wasn’t an option.

I want this scripted in PowerShell.

I want to touch as little as possible with the script. (Should it bugger something up.)

I want it to be simple.

I don’t want to have to answer questions for the trained monkeys.

Originally I was going to run a query against the SSRS servers ReportServer DB with invoke-sqlcmd, edit the output and update the line back in the same way. I ran the query in SSMS to make sure I was getting the correct fields and results.

The results were not what I expected and needed to be converted before it was in plain English. Unfortunately I am not knowledgeable enough in SQL to convert it back, even after some lengthy Google searches. Due to this limitation of my knowledge I started looking at using the SSRS Reportserver service.

When connecting to an SSRS Service through a URL it MUST have “.asmx?wsdl” at the end. Also you should know if your SSRS server is running in “native”, “integrated” or “SharePoint” mode. This tells you which of the following service classes the address needs to include.

ReportService2010

http://msdn.microsoft.com/en-us/library/reportservice2010%28v=sql.105%29.aspx

ReportService2006

http://msdn.microsoft.com/en-us/library/reportservice2006%28v=sql.105%29.aspx

ReportExecution2005

http://msdn.microsoft.com/en-us/library/reportexecution2005%28v=sql.105%29.aspx

ReportService2005

http://msdn.microsoft.com/en-us/library/reportservice2005%28v=sql.105%29.aspx

ReportServiceAuthentication

http://msdn.microsoft.com/en-us/library/reportserviceauthentication%28v=sql.105%29.aspx

So the following code will connect to your MSSQL SSRS 2008 R2 server, look for all shared data sources in the specified “folder”. If the connection string matches the $OldSource variable value it is replaced with the $NewSource variable value and updated. I did many on-line searches so I wouldn’t have to reinvent the wheel but all of them were long, complex and difficult to follow. I think the method I came up with is much easier.

	$OldSource = 'MySQLServer-01'
	$NewSource = 'MySQLServer-02'
	$URL = 'http://ReportServerName/ReportServer/ReportService2010.asmx?wsdl'
	$URI = New-Object System.Uri($URL)
	$SSRS = New-WebServiceProxy -Uri $URI -UseDefaultCredential
	$DataSources = ($SSRS.ListChildren("/data sources", $true)).path
	ForEach($Source in $DataSources){
	$DS = $SSRS.GetDataSourceContents($Source)
	IF($DS.ConnectString -like "*$OldSource*"){
	$String = $DS
	$String.ConnectString = $String.ConnectString.Replace($OldSource,$NewSource)
	$SSRS.SetDataSourceContents($Source,$string)
	}
	}

view raw Update-SSRS_Datasources hosted with ❤ by GitHub

Getting Powershell commands, functions, modules, etc without installing anything.

Dave:    Hey Buddy, you should look at this cool script that I found.

Buddy:  Really, what does it do?

Dave:    It’s so cool. It will connect to any SQL server and report back information about each database that is hosted on it.

Buddy:  That’s cool. Did you tell the SQL admin about it?

Dave:    Yup, he said it was easier than the expensive product we just spent 50k on. Plus he didn’t need to do anything extra.

Buddy:  I just tried it but it keeps giving me errors.

Dave:    Well do you have SQL installed on your workstation? Greg and I do.

Buddy:  No, where can I install it from? Do I need a license? How much space does it need?

Dave:    Here try running Import-RemoteCommands.ps1 –Computername someSQLservername instead then try it again.

Buddy:  Awesome it works now, what did that do?

Dave:   The Import-RemoteCommands.ps1 script temporarily imports all commands, functions, modules, etc. from a remote computer to your local session so you can run almost any PowerShell script without having to install things locally to a system.

Buddy:  But what if I want to run something like that on a server? Will I need to submit a change so the boss doesn’t have an aneurism?

Dave:    You shouldn’t because as soon as you close the PowerShell window all those commands go away! You can even use it for a list of computers, so if you want SQL plugins, the AD module and the SCOM module, just list all those server names separated by a coma.

Buddy:  I just opened a new console window but Import-RemoteCommands is giving me an error now.

Dave:    For it to work you need two things, 1. PowerShell remoting needs to be enabled on the computers you list. 2. You need local admin or PowerShell remoting access on those computers.

 OK, so this didn't happen quite the way I portrayed it but it's pretty close.

	#* FileName: Import-RemoteCommands.ps1
	#*=============================================
	#* Script Name: Import-RemoteCommands
	#* Created: 07/10/2014-published
	#* Author: David S. Elias
	#* Email: daveselias@gmail.com
	#* Requirements: PowerShell v2.0+
	#* Keywords: Function, module, command, cmdlet, import, remoting
	#*=============================================
	#*=============================================
	#* REVISION HISTORY
	#*=============================================
	#* Date: 07/15/2014
	#* Time: 1:50PM
	#* Issue: Get-PSSnapin, Import-Module and Import-PSSession
	#* always cause warnings or errors
	#* Solution: Changed ErrorActions from Stop to
	#* SilentlyContinue
	#*=============================================
	<#
	.Synopsis
	Imports all Commands, functions, modules and snapins not already found in the active console session
	.DESCRIPTION
	Imports all Commands, functions, modules and snapins not already found in the active console session
	from the specified computer(s).
	.EXAMPLE
	Import-RemoteCommands.ps1 -ComputerName DC1
	Attempting Remote session connection to DC1 using New-PSSession
	Attempting Get-Pssnapin on DC1
	Attempting Import-Module on DC1
	Attempting Import-PSSession from DC1
	###################################################
	Congratulations, you have imported 907 new commands
	###################################################
	.EXAMPLE
	Import-RemoteCommands.ps1 -ComputerName DC1, DC2
	Attempting Remote session connection to DC1 using New-PSSession
	Attempting Get-Pssnapin on DC1
	Attempting Import-Module on DC1
	Attempting Import-PSSession from DC1
	Attempting Remote session connection to DC2 using New-PSSession
	Attempting Get-Pssnapin on DC2
	Attempting Import-Module on DC2
	Attempting Import-PSSession from DC2
	###################################################
	Congratulations, you have imported 1207 new commands
	###################################################
	#>
	Param
	(
	# Server Name(s) to import modules, functions and cmdlets from
	[Parameter(Mandatory=$true,
	ValueFromPipelineByPropertyName=$false,
	Position=0)]
	[array]
	$ComputerName
	)
	Begin{
	[array]$ALL = $ComputerName
	IF($ALL.count -lt 1){
	Write-Error -Message "No Server Names Were Provided" -ErrorAction Stop
	EXIT 1
	}
	$List=@()
	ForEach($item in $ALL){
	Try{
	$Alive = Test-Connection -ComputerName $item -Count 1 -Quiet -ErrorAction Stop
	IF($Alive -eq $true){
	$List += $item
	}
	}Catch{
	Write-Warning -Message "Unable to find $item"
	}
	}
	$PSV = $PSVersionTable.PSVersion.major
	IF($PSV -eq 2){
	$LocalCommands = Get-Command
	}ELSEIF($PSV -ge 3){
	$LocalCommands = Get-Command -All
	}
	}
	Process{
	ForEach($Server in $List){
	Try{
	Write-Host "Attempting Remote session connection to $Server using New-PSSession" -ForegroundColor Green
	$Active = New-PSSession -ComputerName $Server -ErrorAction Stop
	Try{
	Write-Host "Attempting Get-Pssnapin on $Server" -ForegroundColor Green
	Invoke-Command -Session $Active { Get-PSSnapin -Registered | ForEach-Object { Add-PSSnapin -Name $_.name } } -ErrorAction SilentlyContinue
	Try{
	Write-Host "Attempting Import-Module on $Server" -ForegroundColor Green
	Invoke-Command -Session $Active { Get-Module -ListAvailable | ForEach-Object { Import-Module -Name $_.Name } } -ErrorAction SilentlyContinue
	Try{
	Write-Host "Attempting Import-PSSession from $Server" -ForegroundColor Green
	Import-PSSession -Session $Active -ErrorAction SilentlyContinue
	}Catch{
	Write-Warning -Message "Unable to execute Import-PSSession on $Server"
	}
	}Catch{
	Write-Warning -Message "Unable to execute Import-Module on $Server"
	}
	}Catch{
	Write-Warning -Message "Unable to execute Get-Pssnapin on $Server"
	}
	}Catch{
	Write-Error -Message "Unable to connect to remote session on $Server and import requested functions, cmdlets, modules" -ErrorAction Stop
	}
	}
	}
	End{
	########################### Compare commands to verify if any new commands were imported ###########################
	IF($PSV -eq 2){
	$AfterCommands = Get-Command
	$NewCommands = Compare-Object -ReferenceObject $LocalCommands -DifferenceObject $AfterCommands
	}ELSEIF($PSV -ge 3){
	$AfterCommands = Get-Command -All
	$NewCommands = Compare-Object -ReferenceObject $LocalCommands.Name -DifferenceObject $AfterCommands.Name
	}
	IF($NewCommands.count -lt 1){
	Write-Error -Message "No New functions, cmdlets or modules were imported"
	}ELSEIF($NewCommands.count -gt 1){
	Clear-Host
	Write-Host "###################################################" -ForegroundColor Cyan
	Write-Host " " -ForegroundColor Cyan
	Write-Host "Congratulations, you have imported $($NewCommands.count) new commands" -ForegroundColor Green
	Write-Host " " -ForegroundColor Cyan
	Write-Host "###################################################" -ForegroundColor Cyan
	}
	}

view raw Import-RemoteCommands.ps1 hosted with ❤ by GitHub

Rampant RDP sessions

I've been seeing more and more instances of developers and administrators just disconnecting from RDP sessions on our servers instead of logging off. One I just find this irritating and two It leaves possible applications open on the servers and using resources. So to combat this issue I finally put the following scripts together. 

The first looks for all RDP sessions that have been idle for more than 59 minutes on a filtered list of servers. It then compiles a list of all sessions with the same userID. It looks up the e-mail address of each userID in Active Directory and puts together a report of that list and e-mails it to the individual. Once all individual reports have been sent it sends a master list to a specified address (me). The function that gathers the RDP session info was written by Jaap Brasser http://www.jaapbrasser.com, I was half way through writing my own when I stumbled upon it but why would I want to reinvent the wheel?

	Function Get-LoggedOnUser {
	<#
	.Synopsis
	Queries a computer to check for interactive sessions
	.DESCRIPTION
	This script takes the output from the quser program and parses this to PowerShell objects
	.NOTES
	Name: Get-LoggedOnUser
	Author: Jaap Brasser
	Version: 1.1
	DateUpdated: 2013-06-26
	.LINK
	http://www.jaapbrasser.com
	.PARAMETER ComputerName
	The string or array of string for which a query will be executed
	.EXAMPLE
	.\Get-LoggedOnUser.ps1 -ComputerName server01,server02
	Description:
	Will display the session information on server01 and server02
	.EXAMPLE
	'server01','server02' | .\Get-LoggedOnUser.ps1
	Description:
	Will display the session information on server01 and server02
	#>
	param(
	[CmdletBinding()]
	[Parameter(ValueFromPipeline=$true,
	ValueFromPipelineByPropertyName=$true)]
	[string[]]$ComputerName = 'localhost'
	)
	process {
	foreach ($Computer in $ComputerName) {
	quser /server:$Computer | Select-Object -Skip 1 | ForEach-Object {
	$CurrentLine = $_.Trim() -Replace '\s+',' ' -Split '\s'
	$HashProps = @{
	UserName = $CurrentLine[0]
	ComputerName = $Computer
	}
	# If session is disconnected different fields will be selected
	if ($CurrentLine[2] -eq 'Disc') {
	$HashProps.SessionName = $null
	$HashProps.Id = $CurrentLine[1]
	$HashProps.State = $CurrentLine[2]
	$HashProps.IdleTime = $CurrentLine[3]
	$HashProps.LogonTime = $CurrentLine[4..6] -join ' '
	} else {
	$HashProps.SessionName = $CurrentLine[1]
	$HashProps.Id = $CurrentLine[2]
	$HashProps.State = $CurrentLine[3]
	$HashProps.IdleTime = $CurrentLine[4]
	$HashProps.LogonTime = $CurrentLine[5..7] -join ' '
	}
	New-Object -TypeName PSCustomObject -Property $HashProps |
	Select-Object -Property UserName,ComputerName,SessionName,Id,State,IdleTime,LogonTime
	}
	}
	}
	}
	#get list of all servers to check sessions on from Active Directory
	$AllServers = (Get-ADComputer -filter {name -like "*servernameconvention*"}).name
	#Check all sessions on Servers one by one
	$AllSessions=$List=$MasterList=@()
	ForEach($ComputerName in $AllServers){
	$AllSessions += (Get-LoggedOnUser -ComputerName $ComputerName -ErrorAction SilentlyContinue)
	}
	#Filter results down to Sessions older than 1 Hour
	$AllSessions = $AllSessions | Where-Object {($_.IdleTime -like "*:*") -and ($_.IdleTime -gt "00:59")}
	#Find User information from Active Directory
	$Users = ($AllSessions | select Username -Unique)
	ForEach($U in ($Users).username){
	$List += (Get-ADUser $U -Properties * | select Samaccountname, Name, mail, company)
	}
	#If username designated as a Domain Admin account Drop the "-DA" and locate the e-mail address of the account owner
	ForEach($u in $list){
	IF(($u.mail -eq $null) -and ($u.samaccountname -like "*-DA")){
	$SAM = $u.Samaccountname.substring(0,6)
	$U.mail = ((Get-ADUser $SAM -Properties mail).mail)
	}
	$MasterList += $U
	}
	#Add e-mail addresses from contacts (typically vendor accounts i.e. DELL, HP, etc.)
	$Contacts = Get-ADObject -Filter {Objectclass -like "contact"} -Properties *
	ForEach($U in $MasterList){
	IF($U.mail -eq $null){
	$Name = $U.name.split(',')[0]
	$Mail = $Contacts | Where-Object {($_.name -like "*$Name*") -and ($_.mail -like "*$($u.company)*")}
	$U.mail = $Mail.mail
	}
	}
	# Setup email parameters
	$today = Get-Date
	$priority = "Normal"
	$smtpServer = "mail.EmailServer.com"
	$emailFrom = "Notifications@EmailServer.com"
	#Send Individual Reports
	ForEach($u in $MasterList){
	$subject = "Remote Server Sessions Report for $($u.samaccountname) - " + $today
	$Body = '<font face="Arial">'
	$Body += "<H4> Your UserID $($u.samaccountname), was found to have sessions exceeding 1 hour of idle time on the following servers. Please connect back in and log off properly.</H4><p>`n`n"
	$Body += "`n"
	$Body += '<font color="FF0000">'
	$Body += "<H5>This is an automated e-mail, please do not reply</H5><p>"
	$Body += "</font>"
	$Body += "`n"
	$Body += ($AllSessions | Where-Object {($_.username -like ($u).samaccountname)} | ConvertTo-html)
	$Body += "`n"
	IF($u.mail.count -gt 0){
	$Body += "</font>"
	Write-Host "$($U.name), $($u.mail)"
	$emailTo = "$($u.mail)"
	Send-MailMessage -To $emailTo -Subject $subject -Body $Body -BodyAsHtml -SmtpServer $smtpServer -From $emailFrom -Priority $priority
	}ELSE{
	$emailTo = "Admin@EmailServer.com"
	$Body += "`n `n"
	$Body += $U | Select Samaccountname, Name, Company | ConvertTo-Html
	$Body += "</font>"
	Send-MailMessage -To $emailTo -Subject $subject -Body $Body -BodyAsHtml -SmtpServer $smtpServer -From $emailFrom -Priority $priority
	}
	}
	#Master Report
	$emailTo = "Admin@EmailServer.com"
	$Subject = "Remote Server Sessions Report for - " + $today
	$Body = '<font face="Arial">'
	$Body += "Remote Server Sessions Report for - " + $today
	$Body += "`n"
	$Body += "`n"
	$Body += "The following is a list of sessions that have exceeded 1 hour"
	$Body += "`n"
	$Body += $AllSessions | Sort-Object Username | ConvertTo-Html
	$Body += "</font>"
	Send-MailMessage -To $emailTo -Subject $subject -Body $Body -BodyAsHtml -SmtpServer $smtpServer -From $emailFrom -Priority $priority

view raw Send-RDPReport.ps1 hosted with ❤ by GitHub

The Second one I use to kill RDP sessions remotely quickly and easily. It uses Jaap's "Get-LoggedonUser" function as well but I've omitted it from the script box to save space.

	Function Kill-Sessions{
	Param(
	[Array]$Computer
	)
	$AllSessions=@()
	[int]$Number = 0
	ForEach($ComputerName in $Computer){
	$SystemSessions = (Get-LoggedOnUser -ComputerName $ComputerName -ErrorAction SilentlyContinue)
	ForEach($Session in $SystemSessions){
	$Number=($Number+1)
	$Session | Add-Member -MemberType NoteProperty -Name "Number" -Value $Number
	$AllSessions += $Session
	}
	}
	$AllSessions = $AllSessions | Where-Object {($_.IdleTime -like "*:*") -and ($_.IdleTime -gt "00:59")}
	$AllSessions | Select Number, `|, ComputerName, UserName, State, IdleTime, SessionName | ft -AutoSize
	$Terminate=@()
	$Terminate = Read-Host "Would you like to end one of the above sessions?"
	IF($Terminate -like "Y*"){
	$End = Read-Host "Enter the Number of the session you would like to end"
	$KillSession = ($Allsessions | ? {$_.number -eq $End})
	$Serv = ($Killsession).ServerName.ToString()
	$ID = ($KillSession).SessionID.tostring()
	Invoke-Expression "& `"LOGOFF`" /SERVER:$Serv $ID /V"
	}
	}
	$AllServers = (Get-ADComputer -filter {name -like "*Servername*"}).name
	Kill-Sessions -Computer $AllServers

view raw Kill-Sessions.ps1 hosted with ❤ by GitHub

My office is located in EST and we have a data center onsite but we also have another data center in CST. I don't know why but every so often we get some developers that don't understand that. So I have to sometimes find out why their code is an hour wrong or show them that they need to make their code time insensitive. I use this to do it.

	Function Get-TimeZone {
	Param(
	[Parameter(Mandatory=$True,Position=1)]
	[Array]$ComputerName
	)
	$AllTime=@()
	ForEach ($Computer in $ComputerName ) {
	IF((gwmi -class Win32_SystemTimeZone -ComputerName $Computer -ErrorAction SilentlyContinue) -gt $null){
	$Time = (Get-Time $Computer)
	$Zone1 = (gwmi -class Win32_SystemTimeZone -ComputerName $Computer).setting
	$Zone = $Zone1.split('=')[-1]
	$obj=New-Object PSObject
	$obj | Add-Member -MemberType NoteProperty -Name "ServerName" -Value $Time.ServerName
	$obj | Add-Member -MemberType NoteProperty -Name "DateTime" -Value $Time.DateTime
	$obj | Add-Member -MemberType NoteProperty -Name "TimeZone" -Value $Zone
	$AllTime += $obj
	}ELSE{
	Write-Output "Your current Credentials do not have access to this system ($Computer)"
	}
	}
	IF($AllTime.count -gt 0){
	Write-Output $AllTime
	}
	}

view raw Get-TimeZones.ps1 hosted with ❤ by GitHub

I decided to give up on the code highlighter and throw some business the way of https://gist.github.com

Sorry for the sloppy  script window here, still trying to figure out how to get it to show all neat and tidy on Blogger.

This Function I have found supper useful since at work to save drive letters many of our servers use mount points but we still haven't found a friendly way to check on the capacity and storage usage of them. This in combination of some other functions have become a staple of mine when checking system health and planning for additional storage needs.

 

 

 

1. Function get-mountpoints {  
2. Param(  
3.     [Parameter(Mandatory=$True,Position=1)]  
4.     [Array]$PC  
5. )  
6.     $volumes=@()  
7.     $TotalGB = @{Name="Capacity(GB)";expression={[math]::round(($_.Capacity/ 1073741824),2)}}  
8.     $FreeGB = @{Name="FreeSpace(GB)";expression={[math]::round(($_.FreeSpace / 1073741824),2)}}  
9.     $FreePerc = @{Name="Free(%)";expression={[math]::round(((($_.FreeSpace / 1073741824)/($_.Capacity / 1073741824)) * 100),0)}}  
10.     $volumes = Get-WmiObject -computer $PC win32_volume | Where-object {$_.name -notlike '\\?\*'}  
11.     $volumes | Select SystemName, Label, Name, $TotalGB, $FreeGB, $FreePerc | Sort-Object name | Write-Output  
12. }  

First Post

I've just decided to create this blog where I hope to share some of the many scripts, functions and modules I've created. I also hope to share some of the lessons I've learned, usual the hard way to that others don't have to go through the hell I put myself through.