Invoke-WebBrowser.ps1
|
Function Invoke-WebBrowser { [CmdletBinding()] param ( [Parameter(Mandatory=$true)] [String]$Url ) Add-Type -AssemblyName System.Windows.Forms Add-Type -AssemblyName System.Web $Form = New-Object -TypeName System.Windows.Forms.Form -Property @{Width=440;Height=640} $WebBrowser = New-Object -TypeName System.Windows.Forms.WebBrowser -Property @{Width=420;Height=600;Url=($Url) } $DocComp = { $Global:uri = $WebBrowser.Url.AbsoluteUri if ($Global:uri -match "error=[^&]*|code=[^&]*") {$Form.Close() } } $WebBrowser.ScriptErrorsSuppressed = $true $WebBrowser.Add_DocumentCompleted($DocComp) $Form.AutoScaleMode = 'Dpi' $Form.text = "Azure AD Authentication" $Form.ShowIcon = $False $Form.AutoSizeMode = 'GrowAndShrink' $Form.StartPosition = 'CenterScreen' $Form.Controls.Add($WebBrowser) $Form.Add_Shown({$Form.Activate()}) [Void]$Form.ShowDialog() $QueryOutput = [System.Web.HttpUtility]::ParseQueryString($WebBrowser.Url.Query) $Output = @{} foreach($Key in $QueryOutput.Keys){ $Output["$Key"] = $QueryOutput[$Key] } Return $Output } |