Jump to content
Sign in to follow this  
careca

Time4Shutdown

Recommended Posts

careca

Hi ppl, i created this because i felt the need for it, what it does is shutdown the computer after X minutes, set by the user. So it's basically a small gui, with an input box, to write the number of minutes to wait before shutdown, and a button to start the count, and a reboot button, just because i felt the need for it.

#region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=ResourcesClock.ico
#AutoIt3Wrapper_UseX64=n
#AutoIt3Wrapper_Res_Icon_Add=ResourcesClock.ico
#AutoIt3Wrapper_Run_Tidy=y
#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <WinAPI.au3>
Opt("TrayAutoPause", 0)
Opt("GUIOnEventMode", 1)
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Time4Shutdown", 395, 32, 250, 475, -1, $WS_EX_DLGMODALFRAME)
GUISetOnEvent($GUI_EVENT_CLOSE, "Close")
$settime = GUICtrlCreateInput("", 168, 5, 49, 21)
$Label1 = GUICtrlCreateLabel("Set time for shutdown in minutes", 8, 8, 156, 17)
$Button1 = GUICtrlCreateButton("Start", 234, 3, 75, 25)
GUICtrlSetOnEvent($Button1, "Start")
$Button2 = GUICtrlCreateButton("Reboot", 314, 3, 75, 25)
GUICtrlSetOnEvent($Button2, "Reboot")
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

$Multiplier = "60000"

Func Start()
GUISetState(@SW_HIDE)
$time = GUICtrlRead($settime, 1)
MsgBox(4096, "Shutdown notice", "Set to shutdown in: " & $time & " minutes.")
$timetosleep = $time * $Multiplier
Sleep($timetosleep)
Shutdown(13)
EndFunc ;==>Start

Func Reboot()
Local $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(4164, "Notice", "Do you really want to reboot?")
Select
Case $iMsgBoxAnswer = 6 ;Yes
Case $iMsgBoxAnswer = 7 ;No
EndSelect
If $iMsgBoxAnswer = 6 Then
;MsgBox(4096, "Notice", "Clicked Yes! Going to reboot")
Shutdown(6)
ElseIf $iMsgBoxAnswer = 7 Then
;MsgBox(4096, "Notice", "Clicked No! Aborting reboot")
EndIf
EndFunc ;==>Reboot

Func Close()
Exit
EndFunc ;==>Close

Do
Sleep(100)
Until $Form1 = $GUI_EVENT_CLOSE

UPDATE: Removed close button, and added a reboot button, optional message boxes in reboot function.

Greetings.

Time4Shutdown.au3

Edited by careca

Spoiler

Paster - Main function is to paste text, but has more functions. (No longer mantained, switched to String Trigger)

OpenW - Open With... alternative, Open any file with any application, set it's icon, set application as default.

Renamer - Rename files and folders, remove portions of text from the filename etc.

GPO Tool - Export/Import Group policy settings.

BeatsPlayer - Music player.

Params Tool - Right click an exe to see it's parameters or execute them.

String Trigger - Triggers pasting text or applications or internet links on specific strings.

Regedit Control - Registry browsing history, quickly jump into any saved key.

Time4Shutdown - Write the time for shutdown in minutes.

Power Profiles Tool - Set a profile as active, delete, duplicate, export and import.

Firefox Profile Backup - Backup/restore previously saved profile.

Finished Task Shutdown - Shuts down pc when specified window/Wndl/process closes.

NetworkSpeedShutdown - Shuts down pc if download speed goes under "X" Kb/s.

IUIAutomation - Topic with framework and examples

Au3Record.exe

Share this post


Link to post
Share on other sites
BrewManNH

The issue with it not exiting with the close button on the GUI is because you're not reading it anywhere in the script, and once it starts the countdown, it isn't going to be read anyways.

You'd need to create another OnEvent function so that the GUI can exit. Something like this.

$Form1 = GUICreate("Time4Shutdown", 402, 35, 250, 475, -1, $WS_EX_DLGMODALFRAME)
GUISetOnEvent($GUI_EVENT_CLOSE, "Close")

If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Share this post


Link to post
Share on other sites
careca

That's the stuff, somehow i just assumed it was part of the window and i wouldn't need to code it also. Thank you.


Spoiler

Paster - Main function is to paste text, but has more functions. (No longer mantained, switched to String Trigger)

OpenW - Open With... alternative, Open any file with any application, set it's icon, set application as default.

Renamer - Rename files and folders, remove portions of text from the filename etc.

GPO Tool - Export/Import Group policy settings.

BeatsPlayer - Music player.

Params Tool - Right click an exe to see it's parameters or execute them.

String Trigger - Triggers pasting text or applications or internet links on specific strings.

Regedit Control - Registry browsing history, quickly jump into any saved key.

Time4Shutdown - Write the time for shutdown in minutes.

Power Profiles Tool - Set a profile as active, delete, duplicate, export and import.

Firefox Profile Backup - Backup/restore previously saved profile.

Finished Task Shutdown - Shuts down pc when specified window/Wndl/process closes.

NetworkSpeedShutdown - Shuts down pc if download speed goes under "X" Kb/s.

IUIAutomation - Topic with framework and examples

Au3Record.exe

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Similar Content

    • careca
      By careca
      Lists windows and according to your preferences, waits for a window or process to close, and then shuts down the computer.
      For anyone who doesn't have the download window,
      in "about:config", set "browser.download.manager.useWindow" to "true".
      Source: https://developer.mozilla.org/en-US/docs/Download_Manager_preferences
      "browser.download.manager.useWindow".
    • DrAhmed
      By DrAhmed
      hey
      I wonder if there is a possibility to do this in Autoit ? I've to make sure that my application is closed properly to prevent crahses / errors
      in VB.NET I was able to do it by :
                      AddHandler Microsoft.Win32.SystemEvents.SessionEnding, AddressOf myfunctions_end_mywork
       
      I found an old example here : but its not working 
       
       
    • careca
      By careca
      This will shutdown the pc whenever the download speed goes under the specified nº of KB/s.
      Should you find any issues, please report to me.
    • RichE
      By RichE
      If your like me and you have shown people windows 8 & 8.1 only to be asked "So how do you shut it down..?", I got sick of telling (and trying to get them to move the cursor to the bottom right corning, click the cog, then power and then shutdown, so i wrote a simple little app that can sit on the desktop and/or the win8 tiles menu, and it just gives a similar shutdown box to the like of WinXP, with a combo of options.
      Screenshots


      Anyway I'd thought I'd share it with everyone 
      http://www.sellostring.com/gs/index.php?id=windows-shutdown-with-options
      regards
      Rich
    • Decipher
      By Decipher
      Please see this post

      I've started try to code this but I'm having trouble with the DLL syntax and I'd like to be sure that the system is safe to power down before I force it to do so.

      I've tried:


      $iReturnValue = DllCall("advapi32.dll", "int", "RegFlushKey", "long", "HKEY_CLASSES_ROOT") if @error Then MsgBox(0, "", "Fail!") MsgBox(0, "Flush Home Key Classes Root", $iReturnValue) $bReturnValue = DllCall("kernel32.dll", "BOOL", "FlushFileBuffers", "HANDLE", "\\.\" & @HomeDrive) if @error Then MsgBox(0, "", "Fail!") MsgBox(0, "Flush System Drive Cache", $iReturnValue);Should return 1=true or 0=false.
      But I can't determine if these functions are working correctly. Any help is greatly appreciated like always.
×