Skip to content

Commit be2a40b

Browse files
htcfreekhtcfreek
authored
Merge v1.4.0 release
Merge v1.4.0 release
2 parents bf01e99 + 0c57d78 commit be2a40b

File tree

12 files changed

+471
-3
lines changed

12 files changed

+471
-3
lines changed

‎README.md

+4-1
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,10 @@ This repository contains useful AutoIT-Scripts.
99

1010
### Scripts:
1111
```
12-
/src/GetDiskInfoFromWmi : Function to read the disk information form WMI.
12+
/src/GetDiskInfoFromWmi : Function to read the disk information form WMI.
13+
/src/GetInstalledPrinterFromWmi : Function to get a list of installed printers for the current user as array or string.
14+
/src/StatusSplashWindow : Shows a custom status window with progress, description and some nice control features.
15+
/src/WaitForAppWindow : Function to wait for a new window opened by a specified process.
1316
```
1417

1518
## Download

‎src/GetDiskInfoFromWmi/Readme.txt

+5-1
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
**********************************************************************
2-
* Name: _GetDiskInfoFromWmi *
2+
* Name: _GetDiskInfoFromWmi *
33
* Description: Returns disk and partition information from WMI. *
44
* Author: htcfreek (Heiko) - https://github.com/htcfreek [original] *
55
**********************************************************************
@@ -9,6 +9,10 @@ Detailed description:
99
This function generates two arrays conatining the list of all disks on this computer and all partitions on this computer. The arrays are returned using the output parameters of the function.
1010
There are two more fucntion parameters you can use to control the output: One to decide if the array tables should have a header line and one to control which types of disks are returned.
1111

12+
Function:
13+
---------
14+
_GetDiskInfoFromWmi ( ByRef $aDiskList , ByRef $aPartitionList [, $bAddTableHeader = $DiskInfoWmi_TableHeader_Yes [, $sFilterDiskType = $DiskInfoWmi_DiskType_All]] )
15+
1216
Parameters:
1317
-----------
1418
1. ByRef $aDiskList : Array variable for list of disks returned.

‎src/GetInstalledPrinterFromWmi/GetInstalledPrinterFromWmi.au3

+76
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,76 @@
1+
; Includes
2+
;----------
3+
#include-once
4+
5+
6+
7+
#cs
8+
===============================================================================================================================
9+
Title ...............: _GetInstalledPrinterFromWmi (GitHub: https://github.com/htcfreek/AutoIt-Scripts)
10+
Version .............: 1.0
11+
License .............: GNU LGPLv3
12+
AutoIt Version ......: 3.3.14.5+
13+
Language ............: English
14+
Description .........: Returns a list of installed printers for the current user as array or string. You can filter the list of printers.
15+
Author ..............: htcfreek (Heiko) - https://github.com/htcfreek [original]
16+
Modified ............:
17+
Required includes ...:
18+
Dll .................:
19+
===============================================================================================================================
20+
21+
CHANGELOG:
22+
2022-12-26 (v1.0)
23+
New: Initial release
24+
25+
#ce
26+
27+
28+
29+
; Global constants
30+
; -----------------
31+
Global Const $InstalledPrinterWmi_ReturnType_Array = "A"
32+
Global Const $InstalledPrinterWmi_ReturnType_String = "S"
33+
34+
35+
36+
; Function
37+
; ---------
38+
Func _GetInstalledPrinterFromWmi($sReturnType = $InstalledPrinterWmi_ReturnType_String, $sPrinterName = "*", $sStringSplitSign = ",")
39+
; Name ...............: _GetInstalledPrinterFromWmi
40+
; Author .............: htcfreek (Heiko) - https://github.com/htcfreek
41+
; Input parameter ....: [$sReturnType = $InstalledPrinterWmi_ReturnType_String] = The return type: Array or String (Possible values: $InstalledPrinterWmi_ReturnType_Array|$InstalledPrinterWmi_ReturnType_String)
42+
; [$sPrinterName = "*"] = A string (Example: "HP*") to filter the printers by name. (You can use * as wildcard character.)
43+
; [$sStringSplitSign = ","] = A sign used as delimiter when returning a string.
44+
; Output .............: Printer list as array or string. If no printer was found, nothing is returned.
45+
; On WMI-Error .......: @error = 1
46+
; Tip ................: Even if you choose array as return type, it can help to change the String delimiter sign if you have problems with printers using that sign.
47+
48+
49+
; Initialize function wide vars
50+
Local $wbemFlagReturnImmediately = 0x10
51+
Local $wbemFlagForwardOnly = 0x20
52+
Local $sPrinterString
53+
54+
; WMI query and returning the results
55+
Local $sFilter = StringReplace(" Where Name like '" & $sPrinterName & "'", "*", "%")
56+
Local $oWMIService = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
57+
If IsObj($oWMIService) And (Not @error) Then
58+
Local $oPrinters = $oWMIService.ExecQuery("Select Name from Win32_Printer" & $sFilter, "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
59+
If Not IsObj($oPrinters) Then Return
60+
For $oPrinter In $oPrinters
61+
$sPrinterString = $oPrinter.Name & $sStringSplitSign & $sPrinterString
62+
Next
63+
Switch $sReturnType
64+
Case "A"
65+
; Return array
66+
Local $aPrinterArray = StringSplit(StringTrimRight($sPrinterString, 1), $sStringSplitSign, 2)
67+
Return $aPrinterArray
68+
Case "S"
69+
; Return string
70+
Return StringTrimRight($sPrinterString, 1)
71+
EndSwitch
72+
Else
73+
; If WMI-Error then set @error
74+
SetError(1)
75+
EndIf
76+
EndFunc ;==>_GetInstalledPrinterFromWmi

‎src/GetInstalledPrinterFromWmi/Readme.txt

+30
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,30 @@
1+
**********************************************************************************************
2+
* Name: _GetInstalledPrinterFromWmi *
3+
* Description: Returns a list of installed printers for the current user as array or string. *
4+
* Author: htcfreek (Heiko) - https://github.com/htcfreek [original] *
5+
**********************************************************************************************
6+
7+
Detailed description:
8+
---------------------
9+
This function returns a list of printers installed for the current user.
10+
You can choose the return type (array or string), filter the list by printer name and change the delimiter sign used for the returned string list.
11+
TIP: Even if you choose array as return type, it can help to change the String delimiter sign if you have problems with printers using that sign.
12+
13+
Function:
14+
---------
15+
_GetInstalledPrinterFromWmi ( [$sReturnType = $InstalledPrinterWmi_ReturnType_String [, $sPrinterName = "*" [, $sStringSplitSign = ","]]] )
16+
17+
Parameters:
18+
-----------
19+
1. $sReturnType (Optional, Default value = $InstalledPrinterWmi_ReturnType_String) : The return type: Array or String (Possible values: $InstalledPrinterWmi_ReturnType_Array|$InstalledPrinterWmi_ReturnType_String)
20+
2. $sPrinterName (Optional, Default value = "*") : A string (Example: "HP*") to filter the printers by name. (You can use * as wildcard character.)
21+
3. $sStringSplitSign (Optional, Default value = ",") : A sign used as delimiter when returning a string.
22+
23+
24+
Output:
25+
-------
26+
The list of installed printers in the specified type or nothing.
27+
28+
Usage example:
29+
--------------
30+
See the file 'UsageExample.au3' in this directory.

‎src/GetInstalledPrinterFromWmi/UsageExample.au3

+33
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,33 @@
1+
#include "GetInstalledPrinterFromWmi.au3"
2+
#include "Array.au3"
3+
4+
5+
; Usage example 1
6+
;-----------------
7+
MsgBox (0, "Example 1", "No filter and return a string:")
8+
$r1 = _GetInstalledPrinterFromWmi()
9+
MsgBox (0, "Example 1 - Result", $r1)
10+
11+
; Usage example 2
12+
;-----------------
13+
MsgBox (0, "Example 2", "No filter and return a string with ; as delimiter:")
14+
$r2 = _GetInstalledPrinterFromWmi($InstalledPrinterWmi_ReturnType_String,"*",";")
15+
MsgBox (0, "Example 2 - Result", $r2)
16+
17+
; Usage example 3
18+
;-----------------
19+
MsgBox (0, "Example 3", "With filter 'Microsoft*' and return a string:")
20+
$r3 = _GetInstalledPrinterFromWmi($InstalledPrinterWmi_ReturnType_String, "Microsoft*")
21+
MsgBox (0, "Example 3 - Result", $r3)
22+
23+
; Usage example 4
24+
;-----------------
25+
MsgBox (0, "Example 4", "No filter and return an array:")
26+
$r4 = _GetInstalledPrinterFromWmi($InstalledPrinterWmi_ReturnType_Array)
27+
_ArrayDisplay ($r4, "Example 4 - Result")
28+
29+
; Usage example 5
30+
;-----------------
31+
MsgBox (0, "Example 5", "With filter '*Mi*' and return an array:")
32+
$r5 = _GetInstalledPrinterFromWmi($InstalledPrinterWmi_ReturnType_Array, "*Mi*")
33+
_ArrayDisplay ($r5, "Example 5 - Result")

‎src/Readme.txt

+4-1
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,10 @@
66
This repository contains useful AutoIT-Scripts.
77

88
Scripts:
9-
/src/GetDiskInfoFromWmi : Function to read the disk information form WMI.
9+
/src/GetDiskInfoFromWmi : Function to read the disk information form WMI.
10+
/src/GetInstalledPrinterFromWmi : Function to get a list of installed printers for the current user as array or string.
11+
/src/StatusSplashWindow : Shows a custom status window with progress, description and some nice control features.
12+
/src/WaitForAppWindow : Function to wait for a new window opened by a specified process.
1013

1114
Download:
1215
Download the files form this page: http://github.com/htcfreek/AutoIT-Scripts/release/latest

‎src/StatusSplashWindow/Readme.txt

+30
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,30 @@
1+
********************************************************************************************************
2+
* Name: _StatusSplashWindow *
3+
* Description: Shows a custom status window with progress, description and some nice control features. *
4+
* Author: htcfreek (Heiko) - https://github.com/htcfreek [original] *
5+
********************************************************************************************************
6+
7+
Detailed description:
8+
---------------------
9+
Shows a custom status window with progress, description and some nice control features.
10+
You can call the function again to update the window or to close it.
11+
12+
Function:
13+
---------
14+
_StatusSplashWindow ( $iAction [, $sTxtMain = "" [, $iProgressType = "" [, $iProgressPercent = "" [, $sSplashWindowTitle = "" [, $iWindowPosition = $StatusSplashWindow_WindowPos_Top]]]]] )
15+
16+
Parameters:
17+
-----------
18+
1. $iAction : Action to do with the window or its controls. (Possible values: $StatusSplashWindow_Action_Show|$StatusSplashWindow_Action_Update|$StatusSplashWindow_Action_HideBar|$StatusSplashWindow_Action_DeleteWindow)
19+
2. $sTxtMain (Optional, Default value = "") : Information / description text shown to the user.
20+
3. $iProgressType (Optional, Default value = "") : Type of the progress bar. (Possible values: $StatusSplashWindow_ProgressType_Green|$StatusSplashWindow_ProgressType_Red|$StatusSplashWindow_ProgressType_Yellow|$StatusSplashWindow_ProgressType_Marquee)
21+
4. $sSplashWindowTitle (Optional, Default value = "") : Titel of the window. (Required when calling the function for the first time.)
22+
5. $iWindowPosition (Optional, Default value = $StatusSplashWindow_WindowPos_Top) : Position of the window. (Required when calling the function for the first time.; Possible values: $StatusSplashWindow_WindowPos_Center|$StatusSplashWindow_WindowPos_Top)
23+
24+
Output:
25+
-------
26+
The function has no return value or output.
27+
28+
Usage example:
29+
--------------
30+
See the file 'UsageExample.au3' in this directory.

‎src/StatusSplashWindow/StatusSplashWindow.au3

+129
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,129 @@
1+
; Includes
2+
;----------
3+
#include-once
4+
#include <StaticConstants.au3>
5+
#include <GUIConstantsEx.au3>
6+
#include <ProgressConstants.au3>
7+
#include <WindowsConstants.au3>
8+
#include <SendMessage.au3>
9+
10+
11+
12+
#cs
13+
===============================================================================================================================
14+
Title ...............: _StatusSplashWindow (GitHub: https://github.com/htcfreek/AutoIt-Scripts)
15+
Version .............: 1.0
16+
License .............: GNU LGPLv3
17+
AutoIt Version ......: 3.3.14.5+
18+
Language ............: English
19+
Description .........: Shows a custom status window with progress, desctiprion and some nice control features.
20+
Author ..............: htcfreek (Heiko) - https://github.com/htcfreek [original]
21+
Modified ............:
22+
Required includes ...:
23+
Dll .................:
24+
===============================================================================================================================
25+
26+
CHANGELOG:
27+
2022-12-26 (v1.0)
28+
New: Initial release
29+
30+
#ce
31+
32+
33+
34+
; Global constants
35+
; -----------------
36+
Global Const $StatusSplashWindow_Action_Show = 0
37+
Global Const $StatusSplashWindow_Action_Update = 1
38+
Global Const $StatusSplashWindow_Action_HideBar = 2
39+
Global Const $StatusSplashWindow_Action_DeleteWindow = -1
40+
41+
Global Const $StatusSplashWindow_ProgressType_Green = 1
42+
Global Const $StatusSplashWindow_ProgressType_Red = 2
43+
Global Const $StatusSplashWindow_ProgressType_Yellow = 3
44+
Global Const $StatusSplashWindow_ProgressType_Marquee = 4
45+
46+
Global Const $StatusSplashWindow_WindowPos_Center = -1
47+
Global Const $StatusSplashWindow_WindowPos_Top = 0
48+
49+
50+
51+
; Function
52+
; ---------
53+
Func _StatusSplashWindow($iAction, $sTxtMain = "", $iProgressType = "", $iProgressPercent = "", $sSplashWindowTitle = "", $iWindowPosition = $StatusSplashWindow_WindowPos_Top)
54+
; Name ...............: _CustomMarqueeProgressWindow
55+
; Author .............: htcfreek (Heiko) - https://github.com/htcfreek
56+
; Input parameter ....: $iAction = Action to do with the window or its controls. (Possible values: $StatusSplashWindow_Action_Show|$StatusSplashWindow_Action_Update|$StatusSplashWindow_Action_HideBar|$StatusSplashWindow_Action_DeleteWindow)
57+
; [$sTxtMain = ""] = Information / description text shown to the user.
58+
; [$iProgressType = ""] = Type of the progress bar. (Possible values: $StatusSplashWindow_ProgressType_Green|$StatusSplashWindow_ProgressType_Red|$StatusSplashWindow_ProgressType_Yellow|$StatusSplashWindow_ProgressType_Marquee)
59+
; [$sSplashWindowTitle = ""] = Titel of the window. (Required when calling the function for the first time.)
60+
; [$iWindowPosition = $StatusSplashWindow_WindowPos_Top] = Position of the window. (Required when calling the function for the first time.; Possible values: $StatusSplashWindow_WindowPos_Center|$StatusSplashWindow_WindowPos_Top)
61+
; Output .............: none
62+
63+
64+
; Static Gui variables
65+
Static $hProgressWindow
66+
Static $idProgress
67+
Static $idLabel
68+
69+
70+
; Create Gui
71+
If Not ($hProgressWindow) Then
72+
$hProgressWindow = GUICreate($sSplashWindowTitle, 400, 80, -1, $iWindowPosition, BitOR($WS_POPUP, $WS_CAPTION, $WS_DISABLED), BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW))
73+
GUISetFont(11, 400, 0, "Arial")
74+
;--
75+
$idLabel = GUICtrlCreateLabel($sTxtMain, 20, 10, 360, 40, $SS_CENTER)
76+
;--
77+
if ($iProgressType = "" OR $iProgressType = $StatusSplashWindow_ProgressType_Marquee) Then
78+
$idProgress = GUICtrlCreateProgress(20, 50, 360, 20, $PBS_MARQUEE, -1)
79+
GUICtrlSendMsg($idProgress, $PBM_SETMARQUEE, 1, 50) ; Send the message $PBM_SETMARQUEE and wParam of 1 to start the scrolling marquee.
80+
Else
81+
$idProgress = GUICtrlCreateProgress(20, 50, 360, 20, 1, -1)
82+
GUICtrlSetData($idProgress, $iProgressPercent)
83+
EndIf
84+
EndIf
85+
86+
;Show/Change/Delete Gui
87+
Switch $iAction
88+
Case -1
89+
; Delet Gui
90+
GUIDelete($hProgressWindow)
91+
$hProgressWindow = Null
92+
Case 0 To 2
93+
; Show Gui
94+
GUISetState(@SW_SHOW)
95+
Switch $iAction
96+
Case 0
97+
; Show progress
98+
GUICtrlSetState($idProgress, $GUI_SHOW)
99+
Case 1
100+
; Update properties
101+
if ($sTxtMain <> "") Then
102+
; Set text
103+
GUICtrlSetData($idLabel, $sTxtMain)
104+
EndIf
105+
if ($iProgressType = $StatusSplashWindow_ProgressType_Green AND $iProgressPercent >= 0) Then
106+
; Set green progress bar
107+
GUICtrlSendMsg($idProgress, $PBM_SETMARQUEE, 0, 0)
108+
GUICtrlSetStyle($idProgress, -1)
109+
_SendMessage(GUICtrlGetHandle($idProgress), $PBM_SETSTATE, 1, 0)
110+
GUICtrlSetData($idProgress, $iProgressPercent)
111+
ElseIf ($iProgressType = $StatusSplashWindow_ProgressType_Marquee) Then
112+
; Set marquee progress
113+
_SendMessage(GUICtrlGetHandle($idProgress), $PBM_SETSTATE, 1, 0)
114+
GUICtrlSetStyle($idProgress, $PBS_MARQUEE)
115+
GUICtrlSendMsg($idProgress, $PBM_SETMARQUEE, 1, 50)
116+
ElseIf ($iProgressType <> "" AND $iProgressPercent >= 0) Then
117+
; Set colored progress
118+
GUICtrlSendMsg($idProgress, $PBM_SETMARQUEE, 0, 50)
119+
GUICtrlSetStyle($idProgress, 1)
120+
_SendMessage(GUICtrlGetHandle($idProgress), $PBM_SETSTATE, 1, 0)
121+
GUICtrlSetData($idProgress, $iProgressPercent)
122+
_SendMessage(GUICtrlGetHandle($idProgress), $PBM_SETSTATE, $iProgressType, 0)
123+
EndIf
124+
Case 2
125+
; Hide progress
126+
GUICtrlSetState($idProgress, $GUI_HIDE)
127+
EndSwitch
128+
EndSwitch
129+
EndFunc ;==>_CustomMarqueeProgressWindow

‎src/StatusSplashWindow/UsageExample.au3

+21
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,21 @@
1+
#include "StatusSplashWindow.au3"
2+
3+
4+
; Usage example
5+
;--------------
6+
MsgBox(0, "StatusSplashWindow Example", "Create progress :")
7+
_StatusSplashWindow($StatusSplashWindow_Action_Show, "Description of the task currently running.", $StatusSplashWindow_ProgressType_Green, 50, "My nice splash progress")
8+
MsgBox(0, "StatusSplashWindow Example", "Update description :")
9+
_StatusSplashWindow($StatusSplashWindow_Action_Update, "Second task is running.")
10+
MsgBox(0, "StatusSplashWindow Example", "Change to marquee :")
11+
_StatusSplashWindow($StatusSplashWindow_Action_Update, "", $StatusSplashWindow_ProgressType_Marquee)
12+
MsgBox(0, "StatusSplashWindow Example", "Change to red progress with 75 :")
13+
_StatusSplashWindow($StatusSplashWindow_Action_Update, "", $StatusSplashWindow_ProgressType_Red, 75)
14+
MsgBox(0, "StatusSplashWindow Example", "Hide progress bar :")
15+
_StatusSplashWindow($StatusSplashWindow_Action_HideBar)
16+
MsgBox(0, "StatusSplashWindow Example", "Show progress bar again:")
17+
_StatusSplashWindow($StatusSplashWindow_Action_Show)
18+
MsgBox(0, "StatusSplashWindow Example", "Change to yellow and 20 percent :")
19+
_StatusSplashWindow($StatusSplashWindow_Action_Update, "", $StatusSplashWindow_ProgressType_Yellow, 20)
20+
MsgBox(0, "StatusSplashWindow Example", "Exit and delete window?")
21+
_StatusSplashWindow($StatusSplashWindow_Action_DeleteWindow)

‎src/WaitForAppWindow/Readme.txt

+28
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,28 @@
1+
*********************************************************************
2+
* Name: _WaitForAppWindow *
3+
* Description: Waits until a process opened a new window. *
4+
* Author: htcfreek (Heiko) - https://github.com/htcfreek [original] *
5+
*********************************************************************
6+
7+
Detailed description:
8+
---------------------
9+
This function waits until an application defined by parameter (exe name or exe path) opens a new window.
10+
You can specify a timeout to stop waiting after that time. Without timeout the function waits endless.
11+
12+
Function:
13+
---------
14+
_WaitForAppWindow ( $sAppExePath [, $iTimeout = 0] )
15+
16+
Parameters:
17+
-----------
18+
1. $sAppExePath : Path to the exe file or name of the program executable. (Example: "C:\Windows\Explorer.exe" or "Explorer.exe")
19+
2. $iTimeout (Optional, Default value = 0) : Maximal time to wait for the program window. (If not defined or zero, the code waits endlessly.)
20+
21+
Output:
22+
-------
23+
A boolean value: True if a new window was being found within the timeout and False if the timeout is reached.
24+
(If no timeout is defined and now new windows is found, the function keeps running.)
25+
26+
Usage example:
27+
--------------
28+
See the file 'UsageExample.au3' in this directory.

0 commit comments

Comments
 (0)