Skip to content

Instantly share code, notes, and snippets.

@jamesfreeman959
Last active December 23, 2024 21:20
Show Gist options
  • Save jamesfreeman959/231b068c3d1ed6557675f21c0e346a9c to your computer and use it in GitHub Desktop.
Save jamesfreeman959/231b068c3d1ed6557675f21c0e346a9c to your computer and use it in GitHub Desktop.
A very simple PowerShell script to keep a Windows PC awake and make lync think the user is active on the keyboard
# Useful references:
#
# https://superuser.com/questions/992511/emulate-a-keyboard-button-via-the-command-line
# https://ss64.com/vb/sendkeys.html
# https://social.technet.microsoft.com/Forums/windowsserver/en-US/96b339e2-e9da-4802-a66d-be619aeb21ac/execute-function-one-time-in-every-10-mins-in-windows-powershell?forum=winserverpowershell
# https://learn-powershell.net/2013/02/08/powershell-and-events-object-events/
#
# Future enhancements - use events rather than an infinite loop
$wsh = New-Object -ComObject WScript.Shell
while (1) {
# Send Shift+F15 - this is the least intrusive key combination I can think of and is also used as default by:
# http://www.zhornsoftware.co.uk/caffeine/
# Unfortunately the above triggers a malware alert on Sophos so I needed to find a native solution - hence this script...
$wsh.SendKeys('+{F15}')
Start-Sleep -seconds 59
}
@tsuke35
Copy link

tsuke35 commented Sep 23, 2022

If you don't want to save anything and need to bypass policy checks, you can just paste the code as a one-liner and run it in a powershell window (so no need for ISE)

$wsh = New-Object -ComObject WScript.Shell; while (1) {$wsh.SendKeys('+{F15}'); Start-Sleep -seconds 59}

and next time you open the shell, just tap arrow up on the keyboard and you can continue where you left off ;)

@cleansteve
Copy link

cleansteve commented Jan 9, 2023

To add a simple time limit to run I changed the while condition to compare current time vs target time. I just wanted to leave this here in case someone finds it useful. I'm fairly new to Powershell but I assume it's defaulting to my system date format. Be sure to modify that if you use a different format as it's currently US "MM-dd-yyyy".

Microsoft's Get-Date Doc
Comparison Operators Doc

$wsh = New-Object -ComObject WScript.Shell
   $a = Get-Date # Current time
   $b = Get-Date "01-09-2023  10:40:00" # Target time
   while ($a -lt $b) {
     $wsh.SendKeys('+{F15}')
     Start-Sleep -seconds 59
     $a = Get-Date
  }

Hope it helps someone!

@tsuke35
Copy link

tsuke35 commented Feb 2, 2023

To add a simple time limit to run I changed the while condition to compare current time vs target time. I just wanted to leave this here in case someone finds it useful. I'm fairly new to Powershell but I assume it's defaulting to my system date format. Be sure to modify that if you use a different format as it's currently US "MM-dd-yyyy".

Microsoft's Get-Date Doc Comparison Operators Doc

$wsh = New-Object -ComObject WScript.Shell
   $a = Get-Date # Current time
   $b = Get-Date "01-09-2023  10:40:00" # Target time
   while ($a -lt $b) {
     $wsh.SendKeys('+{F15}')
     Start-Sleep -seconds 59
     $a = Get-Date
  }

Hope it helps someone!

Good addition with the timer! You could make it little more easily managable by replacing the $b datetime with a bit more flexible solution by using .AddMinutes() method.. This way you only need to change the amount of minutes for each using occasion, instead of the whole target datetime.

$wsh = New-Object -ComObject WScript.Shell
$a = Get-Date # Current time
$b = (Get-Date).AddMinutes(120) # Target time

while ($a -lt $b) {
    $wsh.SendKeys('+{F15}')
    Start-Sleep -seconds 59
    $a = Get-Date
}

@0scvr
Copy link

0scvr commented Apr 13, 2023

I'll leave my modified version here in case it may be useful to someone else:

param([int]$minutes=60)  # input param, 60 minutes if no value provided

$wsh = New-Object -ComObject WScript.Shell
$a = Get-Date # Current time
$b = $a.AddMinutes($minutes) # Target time

while ($a -lt $b) {
# Send Shift+F15    
$wsh.SendKeys('+{F15}')
    Start-Sleep -seconds 240  # sleep for 4 minutes
    $a = Get-Date
}

Use it with: powershell.exe -file keepawake.ps1 -minutes 20

@ldhelms
Copy link

ldhelms commented Jun 22, 2023

I do the following inside the while loop... This RANDOMLY sleeps between 30 and 200 seconds (3.33 mins). If you have some sort of AI type activity tracker installed you should change it to shorter intervals to look human-ish (something like 1 - 5 seconds)

   $WShell.sendkeys("{SCROLLLOCK}")
   Start-Sleep -Milliseconds 100
   $WShell.sendkeys("{SCROLLLOCK}")

   $RNDSleep = Get-Random -Minimum 30 -Maximum 200
   $MINS = RNDSleep / 60
   Write-Host $NOW $RNDSleep "("$MINS" mins )"

   Start-Sleep -Seconds $RNDSleep

@TheBeerGenius
Copy link

Hello there; I am not sure if it was the most recent Windows 11 update that was forced, but I have been exposed to this [new to me] "Constrained Language Mode" within PS. Here is the Keepalive script I normally run:

image

The above script (and any script that tries to leverage the "New-Object -ComObject WScript.Shell" command (or series of commands)) is met with the following error dialog (I will redact certain elements with an asterisk (*).

--- Begin Error Output ---

New-Object : Cannot create type. Only core types are supported in this language mode.
At C:\Users*REDACTED*\OneDrive - PATHREDACTED\Documents\PowerShell\Alive.ps1:7 char:11

  • $WShell = New-Object -com "Wscript.Shell"
  •       ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
    • CategoryInfo : PermissionDenied: (:) [New-Object], PSNotSupportedException
    • FullyQualifiedErrorId : CannotCreateComTypeConstrainedLanguage,Microsoft.PowerShell.Commands.NewObjectCommand

You cannot call a method on a null-valued expression.
At C:\Users*REDACTED*\OneDrive - PATHREDACTED\Documents\PowerShell\Alive.ps1:15 char:3

  • $WShell.sendkeys("{SCROLLLOCK}")
  • + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull
    
    

You cannot call a method on a null-valued expression.
At C:\Users*REDACTED*\OneDrive - PATHREDACTED\Documents\PowerShell\Alive.ps1:19 char:3

  • $WShell.sendkeys("{SCROLLLOCK}")
  • + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull 
    
    

--- End Error Output ---

I can see that there's the whole permission denied bit, but that's interesting [at least to me] because previous permissions issues were cleared up by running the following:

Set-ExecutionPolicy -Scope CurrentUser Unrestricted

So, that Execution Policy is still in effect (verified by running Get-ExecutionPolicy; still set to Unrestricted). Which brings me to the root of my question; was this Constrained Language Mode automatically pushed by Microsoft for Windows 11, i.e., is the Language Mode being unconstrained a vulnerability [that has now been modified as to not be exploited]?

Background -- this keep alive PS Script was useful for kiosks in customer lobbies or in some cases where a presentation deck is run in a cyclical manner all day (in a common area or in an auditorium). It is also useful for operational type situations, such as air operations, where a particular status board needs to remain up and visible without a screen saver turning on or a display going to sleep.

I'd appreciate any guidance or even workarounds on how to make keep alive type PS scripts function in this new [to me] Constrained Language paradigm.

Thank you in advance,
The Beer Genius

@ps29
Copy link

ps29 commented Sep 27, 2023

This works great without admin privilege in work computer on windows 10. Thanks :)

@TheBeerGenius
Copy link

This works great without admin privilege in work computer on windows 10. Thanks :)

Indeed... and it did work on Windows 11 without admin privilege until about a week ago [when an update of some sort was pushed that changed/added the Constrained Language mode].

((Commenting to bump in order to solicit possible replies))

@Skhmt
Copy link

Skhmt commented Apr 1, 2024

This works great without admin privilege in work computer on windows 10. Thanks :)

Indeed... and it did work on Windows 11 without admin privilege until about a week ago [when an update of some sort was pushed that changed/added the Constrained Language mode].

((Commenting to bump in order to solicit possible replies))

Try this (it must be in a .bat file):

@if (@a==@a) @end /*

@echo off

set SendKeys=CScript //nologo //E:JScript "%~F0"

set starttime=%TIME%

:loop

cls
set /a rng = %RANDOM% * 60 / 32768 + 30
echo Sending [Shift]+[F15]
echo Start:  %starttime%
echo Latest: %TIME%
%SendKeys% "+{F15}"
timeout /t %rng% /nobreak

goto loop

*/

var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.SendKeys(WScript.Arguments(0));

@stringTrimmer
Copy link

I realize the original use case was to keep the Windows computer awake AND for another app (lync) to see keyboard activity. However for anyone who just needs the 1st part (to prevent Windows from sleeping and optionally keep the screen on) another solution was posted by @dend on his blog. You can also use the Awake utility from PowerToys which was created by the same author.

My use case: to keep the Windows machine hosting OpenSSH server awake when there is an active ssh connection using a pwsh session (seems like a bug in Windows OpenSSH tbh). I didn't need the screen to stay on and also didn't seem to require using a background thread as Den originally did (maybe something changed in .NET or PowerShell versions since his post, idk). So I just put this in my pwsh $PROFILE:

if (Test-Path env:SSH_CLIENT) { # only do this for a remote ssh user's session, but if that's not your thing remove this conditional
  $Signature=@"
    [DllImport("kernel32.dll", CharSet = CharSet.Auto, SetLastError = true)]
    public static extern void SetThreadExecutionState(uint esFlags);
  "@

    $ES_SYSTEM_REQUIRED = [uint32]"0x00000001"
    $ES_CONTINUOUS = [uint32]"0x80000000"
    $stes = Add-Type -MemberDefinition $Signature -Name System -Namespace Win32 -PassThru
    $stes::SetThreadExecutionState($ES_CONTINUOUS -bor $ES_SYSTEM_REQUIRED)
    Write-Host "Keeping computer awake"
}

If you need the screen to stay on change the script to use the appropriate flags with SetThreadExecutionState.

Thank you @dend

@dend
Copy link

dend commented Apr 18, 2024

@stringTrimmer thank you for the shout-out! 🥳

@jheinrichs79
Copy link

I added some extra features and built an EXE using some of your code.
Random keep alive time
Dynamic time to run (application will ask you if you didn't enter it at run time)
Add a Pause at completion (optional)
Included a compiled version

https://github.com/jheinrichs79/Public/blob/main/Powershell/Utilities/Start-KeepAwake/
https://github.com/jheinrichs79/Public/blob/main/Powershell/Utilities/Start-KeepAwake/Start-KeepAwake.ps1
https://github.com/jheinrichs79/Public/blob/main/Powershell/Utilities/Start-KeepAwake/Start-KeepAwake.exe

@noviceboomer
Copy link

Is keepawake.ps1 intended to work on Windows Home? I got unauthorized error. This work provisioned laptop really sucks!!

File C:\Users\user1\Documents\MyScripts\keepawake.ps1 cannot be loaded because running scripts is disabled on this
system. For more information, see about_Execution_Policies at https:/go.microsoft.com/fwlink/?LinkID=135170.
+ CategoryInfo : SecurityError: (:) [], ParentContainsErrorRecordException
+ FullyQualifiedErrorId : UnauthorizedAccess

p.s. apologies probably not in the correct venue. Stumbled on this thread looking for solution. former programmer but 90's-00s

@noviceboomer
Copy link

Nevermind! the .exe works just fine. I've recently run into other limitations of Windows Home so I was projecting blame to Home b4 even digging.

Thank you @jheinrichs79

@jheinrichs79
Copy link

Is keepawake.ps1 intended to work on Windows Home? I got unauthorized error. This work provisioned laptop really sucks!!

File C:\Users\user1\Documents\MyScripts\keepawake.ps1 cannot be loaded because running scripts is disabled on this system. For more information, see about_Execution_Policies at https:/go.microsoft.com/fwlink/?LinkID=135170. + CategoryInfo : SecurityError: (:) [], ParentContainsErrorRecordException + FullyQualifiedErrorId : UnauthorizedAccess

p.s. apologies probably not in the correct venue. Stumbled on this thread looking for solution. former programmer but 90's-00s

@noviceboomer - Any time you run any Powershell script you need to make sure your security policies allow for you to run a powershell script. You most likely have a policy that states not to run a public or non-sign script. Google "Set-ExecutionPolicy" and find the setting that will work for you. Also when you download a script from the internet you need to right click it and say that you trust it as it came from an untrusted network (internet).

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment