pull/648/head
Aleff 2023-07-22 09:43:23 +02:00 committed by GitHub
parent ac02af58f4
commit 87354048c8
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 47 additions and 46 deletions

View File

@ -28,58 +28,59 @@ REM It is recommended to implement these protective measures to prevent potentia
REM Source: https://msrc.microsoft.com/update-guide/vulnerability/CVE-2023-36884 REM Source: https://msrc.microsoft.com/update-guide/vulnerability/CVE-2023-36884
DELAY 1000 QUACK DELAY 1000
GUI x QUACK GUI x
DELAY 500 QUACK DELAY 500
STRING a QUACK STRING a
DELAY 500 QUACK DELAY 500
LEFTARROW QUACK LEFTARROW
DELAY 500 QUACK DELAY 500
ENTER QUACK ENTER
REM Sets the path to the registry key REM Sets the path to the registry key
STRINGLN $registryPath = "HKLM:\SOFTWARE\Policies\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BLOCK_CROSS_PROTOCOL_FILE_NAVIGATION" QUACK STRING $registryPath = "HKLM:\SOFTWARE\Policies\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BLOCK_CROSS_PROTOCOL_FILE_NAVIGATION"
QUACK ENTER
REM Array of application names REM Array of application names
STRING $applicationNames = @( QUACK STRING $applicationNames = @(
ENTER QUACK ENTER
STRING "Excel.exe", QUACK STRING "Excel.exe",
ENTER QUACK ENTER
STRING "Graph.exe", QUACK STRING "Graph.exe",
ENTER
STRING "MSAccess.exe",
ENTER
STRING "MSPub.exe",
ENTER
STRING "Powerpnt.exe",
ENTER
STRING "Visio.exe",
ENTER
STRING "WinProj.exe",
ENTER
STRING "WinWord.exe",
ENTER
STRING "Wordpad.exe"
ENTER
STRING )
ENTER ENTER
QUACK STRING "MSAccess.exe",
QUACK ENTER
QUACK STRING "MSPub.exe",
QUACK ENTER
QUACK STRING "Powerpnt.exe",
QUACK ENTER
QUACK STRING "Visio.exe",
QUACK ENTER
QUACK STRING "WinProj.exe",
QUACK ENTER
QUACK STRING "WinWord.exe",
QUACK ENTER
QUACK STRING "Wordpad.exe"
QUACK ENTER
QUACK STRING )
QUACK ENTER
REM Create the registry key if it does not already exist REM Create the registry key if it does not already exist
STRING if (!(Test-Path $registryPath)) { QUACK STRING if (!(Test-Path $registryPath)) {
ENTER QUACK ENTER
STRING New-Item -Path $registryPath -Force | Out-Null QUACK STRING New-Item -Path $registryPath -Force | Out-Null
ENTER QUACK ENTER
STRING echo "Registry key created" QUACK STRING echo "Registry key created"
ENTER QUACK ENTER
STRING } QUACK STRING }
ENTER QUACK ENTER
REM Add the values to the registry key REM Add the values to the registry key
STRING foreach ($appName in $applicationNames) { QUACK STRING foreach ($appName in $applicationNames) {
ENTER QUACK ENTER
STRING Set-ItemProperty -Path $registryPath -Name $appName -Value 1 -Type DWORD -Force | Out-Null QUACK STRING Set-ItemProperty -Path $registryPath -Name $appName -Value 1 -Type DWORD -Force | Out-Null
ENTER QUACK ENTER
STRING echo "[+] $appName" QUACK STRING echo "[+] $appName"
ENTER QUACK ENTER
STRING } QUACK STRING }
ENTER QUACK ENTER