PS Script to convert a PS1 into a HTA that creates and executes a PS1

For one of my earlier posts I made a comment about creating a ps1 that is generated by a hta file and executed. Here is my shortcut script that I use to make the process a lot easier. Also the resulting hta file executes the powershell script in a non admin session and in the native OS architecture. So if you are running a 64bit OS it will make sure to run the 64bit Powershell even though the hta is running in 32bit mode.

$a = Get-Content "c:\temp\original.ps1"
$b = "c:\temp\original.hta"

"<head>"| Out-File -FilePath $b
"<title>Application Installation Helper Triggering Script- `${number}</title>"| Out-File -FilePath $b -Append
"<HTA:APPLICATION "| Out-File -FilePath $b -Append
"APPLICATIONNAME=""Application Triggering Script"""| Out-File -FilePath $b -Append
"SCROLL=""yes"""| Out-File -FilePath $b -Append
"SINGLEINSTANCE=""yes"""| Out-File -FilePath $b -Append
">"| Out-File -FilePath $b -Append
"</head>"| Out-File -FilePath $b -Append
"<body>"| Out-File -FilePath $b -Append
"<h3>Your request will be processed shortly.</h3>"| Out-File -FilePath $b -Append
"<h3>Thank You</h3>"| Out-File -FilePath $b -Append
"</body>"| Out-File -FilePath $b -Append
"<script language=""VBScript"">"| Out-File -FilePath $b -Append
"set fso = CreateObject(""Scripting.FileSystemObject"")"| Out-File -FilePath $b -Append
"Set oShell = CreateObject(""WScript.Shell"")"| Out-File -FilePath $b -Append
"CurrentDirectory = oShell.ExpandEnvironmentStrings(""%temp%"")"| Out-File -FilePath $b -Append
"sFilePath = CurrentDirectory & ""\ServiceNowCatalog.ps1"""| Out-File -FilePath $b -Append
"Set objFSO = CreateObject(""Scripting.FileSystemObject"")"| Out-File -FilePath $b -Append
"Set objTextFile = objFSO.CreateTextFile(sFilePath, True)"| Out-File -FilePath $b -Append

foreach ($i in $a)
    {
    $i = $i -replace """", """"""
    "objTextFile.Write (""$i""& vbNewLine)" | Out-File -FilePath $b -Append
    }

"objTextFile.Close"| Out-File -FilePath $b -Append
"command_string = ""-ExecutionPolicy ByPass "" & sFilePath"| Out-File -FilePath $b -Append
"set objShell = CreateObject(""shell.application"")"| Out-File -FilePath $b -Append
"powersehllexe = oShell.ExpandEnvironmentStrings(""%windir%"") & ""\sysnative\WindowsPowerShell\v1.0\powershell.exe """| Out-File -FilePath $b -Append
"If not fso.fileexists(powersehllexe) then powersehllexe=oShell.ExpandEnvironmentStrings(""%windir%"") & ""\system32\WindowsPowerShell\v1.0\powershell.exe """| Out-File -FilePath $b -Append
"objShell.ShellExecute powersehllexe, command_string,"""", """", 0"| Out-File -FilePath $b -Append
"Self.Close()"| Out-File -FilePath $b -Append
"</script>"| Out-File -FilePath $b -Append

Comments

Post a Comment

Popular posts from this blog

Intune Hybrid - NDES Cert Issue

As many of you who might be running a SCCM/Intune hybrid scenario for MDM will have learned. There are a few to many certificates in use between NDES, Intune, Wifi Profiles, VPN profiles, and well anything else that may have a cert buried in it. We had an instance were the NDES wasn't handing out the certs for WiFi and VPN profiles. However it was handing out the base communication certificate so phones could sync correctly. This was one of those head scratchers on our park, but if you know where to look it makes sense. Problem is (at least in my opinion) there is a lack of useful documentation and the logging leaves a little to be desired. Therefore, I'm going to give a bit about our journey and hopefully help some of you folks out if you run into something similar. When we were notified of this issue, we started to look at the usual logs, you know CRP.log NDESPlugin.log those types of things. First thing you will notice is that the CRP.log will show the same message ove...
Read more

Stuck @ "Waiting for user logon"

This may or may not be something that you would commonly see in your environment. We only see it occasionally but it used to be a pretty common problem. One of my teammates found a technet forum post that addressed this specifically. Pretty interesting read if you are fighting this issue on a particular client. https://social.technet.microsoft.com/Forums/en-US/1569e1e2-91bc-435d-8998-beb817d5b453/waiting-for-user-logon?forum=configmanagergeneral Here is the meat and potatoes of the forum discussion. $CITask = get-wmiobject -query "select * from CCM_CITask where TaskState != ' PendingSoftReboot' AND TaskState != 'PendingHardReboot' AND TaskState != 'InProgress'" -namespace root\ccm\CITasks if ($CITask -ne $NULL) { $CITask | remove-wmiobject -Whatif $CITask | remove-wmiobject } ELSE { "CCM_CITasks is empty. Nothing to do" }
Read more

Triggering a software update install via Powershell

Howdy Folks This post is a holiday slice of pie. Today we focus on triggering update(s) that are deployed to a machine. Now for the pie filling. Triggering an update scan on a client: ([wmiclass]'ROOT\ccm:SMS_Client').TriggerSchedule('{00000000-0000-0000-0000-000000000113}') Trigger install of all updates: ([wmiclass]'ROOT\ccm\ClientSDK:CCM_SoftwareUpdatesManager').InstallUpdates() Here is a nice addition if you only want to install specific update(s) you just have to modify the select statement: ([wmiclass]'ROOT\ccm\ClientSDK:CCM_SoftwareUpdatesManager').InstallUpdates([System.Management.ManagementObject[]] (get-wmiobject -query 'SELECT * FROM CCM_SoftwareUpdate' -namespace 'ROOT\ccm\ClientSDK')) If you would like to see if there are updates applying, if true they are running: $CCMUpdate = get-wmiobject -query "SELECT * FROM CCM_SoftwareUpdate" -namespace "ROOT\ccm\ClientSDK" if(@($CCMUpdate | where { ...
Read more