Function Invoke-AsSystem {

param(

[Parameter(Mandatory=$true)]

[scriptblock]$Process={},

[scriptblock]$Begin={},

[scriptblock]$End={},

[parameter(ValueFromPipeline=$true)]

[object]$InputObject=$null,

[int]$Depth = 3

)

begin {

Function Test-Elevated {

$wid=[System.Security.Principal.WindowsIdentity]::GetCurrent()

$prp=new-object System.Security.Principal.WindowsPrincipal($wid)

$adm=[System.Security.Principal.WindowsBuiltInRole]::Administrator

$prp.IsInRole($adm)

}

$code = @"

if( -not (Test-Elevated)) {

throw "Process is not running as an eleveated process. Please run as elevated."

}

[void][System.Reflection.Assembly]::LoadWithPartialName("System.ServiceProcess")

$serviceNamePrefix = "MyTempPowershellSvc"

$timeStamp = get-date -Format yyyyMMdd-HHmmss

$serviceName = "{0}-{1}" -f $serviceNamePrefix,$timeStamp

$tempPSexe = "{0}.exe" -f $serviceName,$timeStamp

$tempPSout = "{0}.out" -f $serviceName,$timeStamp

$tempPSin = "{0}.in" -f $serviceName,$timeStamp

$tempPSscr = "{0}.ps1" -f $serviceName,$timeStamp

$tempPScomplete = "{0}.end" -f $serviceName,$timeStamp

$servicePath = Join-Path $env:temp $tempPSexe

$outPath = Join-Path $env:temp $tempPSout

$inPath = Join-Path $env:temp $tempPSin

$scrPath = Join-Path $env:temp $tempPSscr

$completePath = Join-Path $env:temp $tempPScomplete

$serviceImagePath = "`"{0}`" `"{1}`" `"{2}`" `"{3}`" `"{4}`" {5}" -f $servicePath,$inPath,$scrPath,$outPath,$completePath,$depth

Add-Type $code -ReferencedAssemblies "System.ServiceProcess" -OutputAssembly $servicePath -OutputType WindowsApplication | Out-Null

$objectsFromPipeline = new-object Collections.ArrayList

$script = "BEGIN {{{0}}}`nPROCESS {{{1}}}`nEND {{{2}}}" -f $Begin.ToString(),$Process.ToString(),$End.ToString()

$script.ToString() | Out-File -FilePath $scrPath -Force

}

process {

[void]$objectsFromPipeline.Add($InputObject)

}

end

{

$objectsFromPipeline | Export-Clixml -Path $inPath -Depth $Depth

New-Service -Name $serviceName -BinaryPathName $serviceImagePath -DisplayName $serviceName -Description $serviceName -StartupType Manual | out-null

$service = Get-Service $serviceName

$service | Start-Service

while ( -not (test-path $completePath)) {

Write-Progress -Activity "Executing"

start-sleep -Milliseconds 100

}

$service | Stop-Service -Force

do {

Write-Progress -Activity "Stopping temporary services $serviceName"

$service = Get-Service $serviceName

} while($service.Status -ne "Stopped")

$wmiSvcObj = Get-WmiObject win32_service -Filter "name='$serviceName'"

$wmiSvcObj.delete() | Out-Null

Import-Clixml -Path $outPath

Remove-Item $servicePath -Force -ErrorAction Continue

Remove-Item $inPath -Force -ErrorAction Continue

Remove-Item $outPath -Force -ErrorAction Continue

Remove-Item $scrPath -Force -ErrorAction Continue

Remove-Item $completePath -Force -ErrorAction Continue

}

}