win+R

shell:::{05d7b0f4-2121-4eff-bf6b-ed3f69b894d9}

percorso rete attendibile da applicazioni office

https://www.computermasters.it/percorsi-di-rete-attendibili-gpo/

USB storico utilizzo periferiche e pennine

da megalab.it storico utilizzo pennine usb e periferiche

windows 10/11 - prestazioni eccellenti

https://www.ilsoftware.it/articoli.asp?tag=Prestazioni-eccellenti-Windows-10-e-11-cos-e-questa-modalita-e-a-cosa-serve_25217

UNIFI CLOUD KEY 404 ERROR

https://community.ui.com/questions/Unifi-Controller-HTTP-Status-404---Not-Found/fef13cdc-ddf5-4b0d-8871-0de3aeb95606

https://help.ui.com/hc/en-us/articles/360006634094-UniFi-SDN-Identifying-Database-Issues-on-the-Cloud-Key

https://help.ui.com/hc/en-us/articles/204911424#4

connect with SSH to Cloud Key

Raspberry gestione hotel

https://opensource.com/article/20/4/qloapps-raspberry-pi

Info sistema sul desktop di Windows 10 -11

https://www.ilsoftware.it/articoli.asp?tag=Windows-11-e-10-informazioni-di-sistema-sul-desktop_23985

Da ilsoftware.it

Bginfo64.exe oppure Bginfo.exe

Da sysinternals

file mdb corrotto windows 10

REG ADD HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanserver\parameters /v DisableLeasing /t REG_DWORD /d 1 /f

NET STOP SERVER

NET START SERVER

windows tool

save into .cmd file

:: ==================================================================================

:: NAME: Reset Windows Update Tool.

:: DESCRIPTION: This script reset the Windows Update Components.

:: AUTHOR: Manuel Gil.

:: VERSION: 10.5.3.7

:: WEBSITE: http://wureset.com

:: ==================================================================================

:: Set console.

:: void mode();

:: /************************************************************************************/

:mode

echo off

title Reset Windows Update Tool.

mode con cols=80 lines=34

color 17

cls

goto getValues

goto :eof

:: /************************************************************************************/

:: Print Top Text.

:: @param - text = the text to print (%*).

:: void print(string text);

:: /*************************************************************************************/

:print

cls

echo.

echo.%name% [Version: %version%]

echo.Reset Windows Update Tool.

echo.

echo.%*

echo.

goto :eof

:: /*************************************************************************************/

:: Add Value in the Registry.

:: @param - key = the key or entry to be added (%~1).

:: value = the value to be added under the selected key (%~2).

:: type = the type for the registry entry (%~3).

:: data = the data for the new registry entry (%~4).

:: void addReg(string key, string value, string type, string data);

:: /*************************************************************************************/

:addReg

reg add "%~1" /v "%~2" /t "%~3" /d "%~4" /f

goto :eof

:: /*************************************************************************************/

:: Load the system values.

:: void getValues();

:: /************************************************************************************/

:getValues

for /f "tokens=4-5 delims=[] " %%a in ('ver') do set version=%%a%%b

for %%a in (%version%) do set version=%%a

if %version% EQU 5.1.2600 (

:: Name: "Microsoft Windows XP"

set name=Microsoft Windows XP

:: Family: Windows 5

set family=5

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 5.2.3790 (

:: Name: "Microsoft Windows XP Professional x64 Edition"

set name=Microsoft Windows XP Professional x64 Edition

:: Family: Windows 5

set family=5

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.0.6000 (

:: Name: "Microsoft Windows Vista"

set name=Microsoft Windows Vista

:: Family: Windows 6

set family=6

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.0.6001 (

:: Name: "Microsoft Windows Vista SP1"

set name=Microsoft Windows Vista SP1

:: Family: Windows 6

set family=6

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.0.6002 (

:: Name: "Microsoft Windows Vista SP2"

set name=Microsoft Windows Vista SP2

:: Family: Windows 6

set family=6

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.1.7600 (

:: Name: "Microsoft Windows 7"

set name=Microsoft Windows 7

:: Family: Windows 7

set family=7

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.1.7601 (

:: Name: "Microsoft Windows 7 SP1"

set name=Microsoft Windows 7 SP1

:: Family: Windows 7

set family=7

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.2.9200 (

:: Name: "Microsoft Windows 8"

set name=Microsoft Windows 8

:: Family: Windows 8

set family=8

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.3.9200 (

:: Name: "Microsoft Windows 8.1"

set name=Microsoft Windows 8.1

:: Family: Windows 8

set family=8

:: Compatibility: Yes

set allow=Yes

) else if %version% EQU 6.3.9600 (

:: Name: "Microsoft Windows 8.1 Update 1"

set name=Microsoft Windows 8.1 Update 1

:: Family: Windows 8

set family=8

:: Compatibility: Yes

set allow=Yes

) else (

ver | find "10.0." > nul

if %errorlevel% EQU 0 (

:: Name: "Microsoft Windows 10"

set name=Microsoft Windows 10

:: Family: Windows 10

set family=10

:: Compatibility: Yes

set allow=Yes

) else (

:: Name: "Unknown"

set name=Unknown

:: Compatibility: No

set allow=No

)

call :print %name% detected . . .

if %allow% EQU Yes goto permission

call :print Sorry, this Operative System is not compatible with this tool.

echo. An error occurred while attempting to verify your system.

echo. Can this using a business or test version.

echo.

echo. if not, verify that your system has the correct security fix.

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /************************************************************************************/

:: Checking for Administrator elevation.

:: void permission();

:: /************************************************************************************/

:permission

openfiles>nul 2>&1

if %errorlevel% EQU 0 goto terms

call :print Checking for Administrator elevation.

echo. You are not running as Administrator.

echo. This tool cannot do it's job without elevation.

echo.

echo. You need run this tool as Administrator.

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /************************************************************************************/

:: Terms.

:: void terms();

:: /*************************************************************************************/

:terms

call :print Terms and Conditions of Use.

echo. The methods inside this tool modify files and registry settings.

echo. While you are tested and tend to work, We not take responsibility for

echo. the use of this tool.

echo.

echo. This tool is provided without warranty. Any damage caused is your

echo. own responsibility.

echo.

echo. As well, batch files are almost always flagged by anti-virus, feel free

echo. to review the code if you're unsure.

echo.

choice /c YN /n /m "Do you want to continue with this process? (Y/N) "

if %errorlevel% EQU 1 (

goto menu

) else if %errorlevel% EQU 2 (

goto close

) else if %errorlevel% EQU 9009 (

echo.

echo.An unexpected error has occurred.

echo.

echo.Press any key to continue . . .

pause>nul

goto menu

)

goto :eof

:: /*************************************************************************************/

:: Menu of tool.

:: void menu();

:: /*************************************************************************************/

:menu

call :print This tool reset the Windows Update Components.

echo. 1. Opens the system protection.

echo. 2. Resets the Windows Update Components.

echo. 3. Deletes the temporary files in Windows.

echo. 4. Opens the Internet Explorer options.

echo. 5. Runs Chkdsk on the Windows partition.

echo. 6. Runs the System File Checker tool.

echo. 7. Scans the image for component store corruption.

echo. 8. Checks whether the image has been flagged as corrupted.

echo. 9. Performs repair operations automatically.

echo. 10. Cleans up the superseded components.

echo. 11. Deletes any incorrect registry values.

echo. 12. Repairs/Resets Winsock settings.

echo. 13. Forces Group Policy Update.

echo. 14. Searches Windows updates.

echo. 15. Runs SetupDiag (Require .NET Framework 4.6).

echo. 16. Explores other local solutions.

echo. 17. Explores other online solutions.

echo. 18. Downloads the Diagnostic Tools.

echo. 19. Restarts your PC.

echo.

echo. ?. Help. 0. Close.

echo.

set /p option=Select an option:

if %option% EQU 0 (

goto close

) else if %option% EQU 1 (

call :sysProtection

) else if %option% EQU 2 (

call :components

) else if %option% EQU 3 (

call :temp

) else if %option% EQU 4 (

call :iOptions

) else if %option% EQU 5 (

call :chkdsk

) else if %option% EQU 6 (

call :sfc

) else if %option% EQU 7 (

call :dism1

) else if %option% EQU 8 (

call :dism2

) else if %option% EQU 9 (

call :dism3

) else if %option% EQU 10 (

call :dism4

) else if %option% EQU 11 (

call :regedit

) else if %option% EQU 12 (

call :winsock

) else if %option% EQU 13 (

call :gpupdate

) else if %option% EQU 14 (

call :updates

) else if %option% EQU 15 (

call :setupDiag

) else if %option% EQU 16 (

call :local

) else if %option% EQU 17 (

call :online

) else if %option% EQU 18 (

call :diagnostic

) else if %option% EQU 19 (

call :restart

) else if %option% EQU ? (

call :help

) else (

echo.

echo.Invalid option.

echo.

echo.Press any key to continue . . .

pause>nul

)

goto menu

goto :eof

:: /*************************************************************************************/

:: Open system protection.

:: void sysProtection();

:: /*************************************************************************************/

:sysProtection

call :print Opening the system protection.

if %family% NEQ 5 (

start systempropertiesprotection

) else (

echo.

echo.Sorry, this option is not available on this Operative System.

echo.

echo.Press any key to continue . . .

pause>nul

)

goto :eof

:: /*************************************************************************************/

:: Run the reset Windows Update components.

:: void components();

:: /*************************************************************************************/

:components

:: ----- Stopping the Windows Update services -----

call :print Stopping the Windows Update services.

net stop bits

call :print Stopping the Windows Update services.

net stop wuauserv

call :print Stopping the Windows Update services.

net stop appidsvc

call :print Stopping the Windows Update services.

net stop cryptsvc

call :print Canceling the Windows Update process.

taskkill /im wuauclt.exe /f

:: ----- Checking the services status -----

call :print Checking the services status.

sc query bits | findstr /I /C:"STOPPED"

if %errorlevel% NEQ 0 (

echo. Failed to stop the BITS service.

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

)

call :print Checking the services status.

sc query wuauserv | findstr /I /C:"STOPPED"

if %errorlevel% NEQ 0 (

echo. Failed to stop the Windows Update service.

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

)

call :print Checking the services status.

sc query appidsvc | findstr /I /C:"STOPPED"

if %errorlevel% NEQ 0 (

sc query appidsvc | findstr /I /C:"OpenService FAILED 1060"

if %errorlevel% NEQ 0 (

echo. Failed to stop the Application Identity service.

echo.

echo.Press any key to continue . . .

pause>nul

if %family% NEQ 6 goto :eof

)

call :print Checking the services status.

sc query cryptsvc | findstr /I /C:"STOPPED"

if %errorlevel% NEQ 0 (

echo. Failed to stop the Cryptographic Services service.

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

)

:: ----- Delete the qmgr*.dat files -----

call :print Deleting the qmgr*.dat files.

del /s /q /f "%ALLUSERSPROFILE%\Application Data\Microsoft\Network\Downloader\qmgr*.dat"

del /s /q /f "%ALLUSERSPROFILE%\Microsoft\Network\Downloader\qmgr*.dat"

:: ----- Renaming the softare distribution folders backup copies -----

call :print Deleting the old software distribution backup copies.

cd /d %SYSTEMROOT%

if exist "%SYSTEMROOT%\winsxs\pending.xml.bak" (

del /s /q /f "%SYSTEMROOT%\winsxs\pending.xml.bak"

)

if exist "%SYSTEMROOT%\SoftwareDistribution.bak" (

rmdir /s /q "%SYSTEMROOT%\SoftwareDistribution.bak"

)

if exist "%SYSTEMROOT%\system32\Catroot2.bak" (

rmdir /s /q "%SYSTEMROOT%\system32\Catroot2.bak"

)

if exist "%SYSTEMROOT%\WindowsUpdate.log.bak" (

del /s /q /f "%SYSTEMROOT%\WindowsUpdate.log.bak"

)

call :print Renaming the software distribution folders.

if exist "%SYSTEMROOT%\winsxs\pending.xml" (

takeown /f "%SYSTEMROOT%\winsxs\pending.xml"

attrib -r -s -h /s /d "%SYSTEMROOT%\winsxs\pending.xml"

ren "%SYSTEMROOT%\winsxs\pending.xml" pending.xml.bak

)

if exist "%SYSTEMROOT%\SoftwareDistribution" (

attrib -r -s -h /s /d "%SYSTEMROOT%\SoftwareDistribution"

ren "%SYSTEMROOT%\SoftwareDistribution" SoftwareDistribution.bak

if exist "%SYSTEMROOT%\SoftwareDistribution" (

echo.

echo. Failed to rename the SoftwareDistribution folder.

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

)

if exist "%SYSTEMROOT%\system32\Catroot2" (

attrib -r -s -h /s /d "%SYSTEMROOT%\system32\Catroot2"

ren "%SYSTEMROOT%\system32\Catroot2" Catroot2.bak

)

if exist "%SYSTEMROOT%\WindowsUpdate.log" (

attrib -r -s -h /s /d "%SYSTEMROOT%\WindowsUpdate.log"

ren "%SYSTEMROOT%\WindowsUpdate.log" WindowsUpdate.log.bak

)

:: ----- Reset the BITS service and the Windows Update service to the default security descriptor -----

call :print Reset the BITS service and the Windows Update service to the default security descriptor.

sc.exe sdset wuauserv D:(A;;CCLCSWLOCRRC;;;AU)(A;;CCDCLCSWRPWPDTLOCRSDRCWDWO;;;BA)(A;;CCDCLCSWRPWPDTLCRSDRCWDWO;;;SO)(A;;CCLCSWRPWPDTLOCRRC;;;SY)S:(AU;FA;CCDCLCSWRPWPDTLOCRSDRCWDWO;;WD)

sc.exe sdset bits D:(A;;CCLCSWLOCRRC;;;AU)(A;;CCDCLCSWRPWPDTLOCRSDRCWDWO;;;BA)(A;;CCDCLCSWRPWPDTLCRSDRCWDWO;;;SO)(A;;CCLCSWRPWPDTLOCRRC;;;SY)S:(AU;FA;CCDCLCSWRPWPDTLOCRSDRCWDWO;;WD)

sc.exe sdset cryptsvc D:(A;;CCLCSWLOCRRC;;;AU)(A;;CCDCLCSWRPWPDTLOCRSDRCWDWO;;;BA)(A;;CCDCLCSWRPWPDTLCRSDRCWDWO;;;SO)(A;;CCLCSWRPWPDTLOCRRC;;;SY)S:(AU;FA;CCDCLCSWRPWPDTLOCRSDRCWDWO;;WD)

sc.exe sdset trustedinstaller D:(A;;CCLCSWLOCRRC;;;AU)(A;;CCDCLCSWRPWPDTLOCRSDRCWDWO;;;BA)(A;;CCDCLCSWRPWPDTLCRSDRCWDWO;;;SO)(A;;CCLCSWRPWPDTLOCRRC;;;SY)S:(AU;FA;CCDCLCSWRPWPDTLOCRSDRCWDWO;;WD)

:: ----- Reregister the BITS files and the Windows Update files -----

call :print Reregister the BITS files and the Windows Update files.

cd /d %SYSTEMROOT%\system32

regsvr32.exe /s atl.dll

regsvr32.exe /s urlmon.dll

regsvr32.exe /s mshtml.dll

regsvr32.exe /s shdocvw.dll

regsvr32.exe /s browseui.dll

regsvr32.exe /s jscript.dll

regsvr32.exe /s vbscript.dll

regsvr32.exe /s scrrun.dll

regsvr32.exe /s msxml.dll

regsvr32.exe /s msxml3.dll

regsvr32.exe /s msxml6.dll

regsvr32.exe /s actxprxy.dll

regsvr32.exe /s softpub.dll

regsvr32.exe /s wintrust.dll

regsvr32.exe /s dssenh.dll

regsvr32.exe /s rsaenh.dll

regsvr32.exe /s gpkcsp.dll

regsvr32.exe /s sccbase.dll

regsvr32.exe /s slbcsp.dll

regsvr32.exe /s cryptdlg.dll

regsvr32.exe /s oleaut32.dll

regsvr32.exe /s ole32.dll

regsvr32.exe /s shell32.dll

regsvr32.exe /s initpki.dll

regsvr32.exe /s wuapi.dll

regsvr32.exe /s wuaueng.dll

regsvr32.exe /s wuaueng1.dll

regsvr32.exe /s wucltui.dll

regsvr32.exe /s wups.dll

regsvr32.exe /s wups2.dll

regsvr32.exe /s wuweb.dll

regsvr32.exe /s qmgr.dll

regsvr32.exe /s qmgrprxy.dll

regsvr32.exe /s wucltux.dll

regsvr32.exe /s muweb.dll

regsvr32.exe /s wuwebv.dll

:: ----- Resetting Winsock -----

call :print Resetting Winsock.

netsh winsock reset

:: ----- Resetting WinHTTP Proxy -----

call :print Resetting WinHTTP Proxy.

if %family% EQU 5 (

proxycfg.exe -d

) else (

netsh winhttp reset proxy

)

:: ----- Set the startup type as automatic -----

call :print Resetting the services as automatics.

sc.exe config wuauserv start= auto

sc.exe config bits start= delayed-auto

sc.exe config cryptsvc start= auto

sc.exe config TrustedInstaller start= demand

sc.exe config DcomLaunch start= auto

:: ----- Starting the Windows Update services -----

call :print Starting the Windows Update services.

net start bits

call :print Starting the Windows Update services.

net start wuauserv

call :print Starting the Windows Update services.

net start appidsvc

call :print Starting the Windows Update services.

net start cryptsvc

call :print Starting the Windows Update services.

net start DcomLaunch

:: ----- End process -----

call :print The operation completed successfully.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Delete temporary files in Windows.

:: void temp();

:: /*************************************************************************************/

:temp

call :print Deleting the temporary files in Windows.

del /s /f /q "%TEMP%\*.*"

del /s /f /q "%SYSTEMROOT%\Temp\*.*"

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Open the Internet Explorer options.

:: void iOptions();

:: /*************************************************************************************/

:iOptions

call :print Opening the Internet Explorer options.

start InetCpl.cpl

goto :eof

:: /*************************************************************************************/

:: Check and repair errors on the disk.

:: void chkdsk();

:: /*************************************************************************************/

:chkdsk

call :print Check the file system and file system metadata of a volume for logical and physical errors (CHKDSK.exe).

chkdsk %SYSTEMDRIVE% /f /r

if %errorlevel% EQU 0 (

echo.

echo.The operation completed successfully.

) else (

echo.

echo.An error occurred during operation.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Scans all protected system files.

:: void sfc();

:: /*************************************************************************************/

:sfc

call :print Scan your system files and to repair missing or corrupted system files (SFC.exe).

if %family% NEQ 5 (

sfc /scannow

) else (

echo.Sorry, this option is not available on this Operative System.

)

if %errorlevel% EQU 0 (

echo.

echo.The operation completed successfully.

) else (

echo.

echo.An error occurred during operation.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Scan the image to check for corruption.

:: void dism1();

:: /*************************************************************************************/

:dism1

call :print Scan the image for component store corruption (The DISM /ScanHealth argument).

if %family% EQU 8 (

Dism.exe /Online /Cleanup-Image /ScanHealth

) else if %family% EQU 10 (

Dism.exe /Online /Cleanup-Image /ScanHealth

) else (

echo.Sorry, this option is not available on this Operative System.

)

if %errorlevel% EQU 0 (

echo.

echo.The operation completed successfully.

) else (

echo.

echo.An error occurred during operation.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Check the detected corruptions.

:: void dism2();

:: /*************************************************************************************/

:dism2

call :print Check whether the image has been flagged as corrupted by a failed process and whether the corruption can be repaired (The DISM /CheckHealth argument).

if %family% EQU 8 (

Dism.exe /Online /Cleanup-Image /CheckHealth

) else if %family% EQU 10 (

Dism.exe /Online /Cleanup-Image /CheckHealth

) else (

echo.Sorry, this option is not available on this Operative System.

)

if %errorlevel% EQU 0 (

echo.

echo.The operation completed successfully.

) else (

echo.

echo.An error occurred during operation.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Repair the Windows image.

:: void dism3();

:: /*************************************************************************************/

:dism3

call :print Scan the image for component store corruption, and then perform repair operations automatically (The DISM /RestoreHealth argument).

if %family% EQU 8 (

Dism.exe /Online /Cleanup-Image /RestoreHealth

) else if %family% EQU 10 (

Dism.exe /Online /Cleanup-Image /RestoreHealth

) else (

echo.Sorry, this option is not available on this Operative System.

)

if %errorlevel% EQU 0 (

echo.

echo.The operation completed successfully.

) else (

echo.

echo.An error occurred during operation.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Clean up the superseded components.

:: void dism4();

:: /*************************************************************************************/

:dism4

call :print Clean up the superseded components and reduce the size of the component store (The DISM /StartComponentCleanup argument).

if %family% EQU 8 (

Dism.exe /Online /Cleanup-Image /StartComponentCleanup

) else if %family% EQU 10 (

Dism.exe /Online /Cleanup-Image /StartComponentCleanup

) else (

echo.Sorry, this option is not available on this Operative System.

)

if %errorlevel% EQU 0 (

echo.

echo.The operation completed successfully.

) else (

echo.

echo.An error occurred during operation.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Change invalid values.

:: void regedit();

:: /*************************************************************************************/

:regedit

for /f "tokens=1-5 delims=/., " %%a in ("%date%") do (

set now=%%a%%b%%c%%d%time:~0,2%%time:~3,2%

)

if not exist "%USERPROFILE%\Desktop\Backup\Regedit\%now%\" (

mkdir "%USERPROFILE%\Desktop\Backup\Regedit\%now%\"

)

:: ----- Create a backup of the Registry -----

call :print Making a backup of the Registry in: %USERPROFILE%\Desktop\Backup\Regedit\%now%\

if exist "%USERPROFILE%\Desktop\Backup\Regedit\%now%\HKLM.reg" (

echo.An unexpected error has occurred.

echo.

echo. Changes were not carried out in the registry.

echo. Will try it later.

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

) else (

reg Export HKCR "%USERPROFILE%\Desktop\Backup\Regedit\%now%\HKCR.reg"

reg Export HKCU "%USERPROFILE%\Desktop\Backup\Regedit\%now%\HKCU.reg"

reg Export HKLM "%USERPROFILE%\Desktop\Backup\Regedit\%now%\HKLM.reg"

reg Export HKU "%USERPROFILE%\Desktop\Backup\Regedit\%now%\HKU.reg"

reg Export HKCC "%USERPROFILE%\Desktop\Backup\Regedit\%now%\HKCC.reg"

)

:: ----- Checking backup -----

call :print Checking the backup.

if not exist "%USERPROFILE%\Desktop\Backup\Regedit\%now%\HKLM.reg" (

echo.An unexpected error has occurred.

echo.

echo. Something went wrong.

echo. You manually create a backup of the registry before continuing.

echo.

echo.Press any key to continue . . .

pause>nul

) else (

echo.The operation completed successfully.

echo.

)

:: ----- Delete keys in the Registry -----

call :print Deleting values in the Registry.

reg delete "HKCU\Software\Microsoft\Windows\CurrentVersion\AdvertisingInfo" /f

reg delete "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\WindowsUpdate" /f

reg delete "HKCU\Software\Microsoft\WindowsSelfHost" /f

reg delete "HKLM\Software\Microsoft\Windows\CurrentVersion\WindowsStore\WindowsUpdate" /f

reg delete "HKLM\Software\Microsoft\Windows\CurrentVersion\WindowsUpdate" /f

reg delete "HKLM\Software\Microsoft\WindowsSelfHost" /f

reg delete "HKLM\Software\WOW6432Node\Microsoft\Windows\CurrentVersion\WindowsStore\WindowsUpdate" /f

reg delete "HKLM\COMPONENTS\PendingXmlIdentifier" /f

reg delete "HKLM\COMPONENTS\NextQueueEntryIndex" /f

reg delete "HKLM\COMPONENTS\AdvancedInstallersNeedResolving" /f

reg delete "HKLM\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate" /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate" /v ResetClient /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate" /v ResetDataStoreReason /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate" /v PingID /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate" /v AccountDomainSid /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate" /v SusClientId /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate" /v SusClientIDValidation /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update" /v AUState /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update" /v LastWaitTimeout /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update" /v DetectionstartTime /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update" /v NextDetectionTime /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update\RebootRequired" /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update\Results" /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Reporting" /v SamplingValue /f

reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Services" /v ReregisterAuthorizationCab /f

:: ----- Add keys in the Registry -----

call :print Adding values in the Registry.

set key=HKLM\SOFTWARE\Microsoft\WindowsUpdate\UX

call :addReg "%key%" "IsConvergedUpdateStackEnabled" "REG_DWORD" "0"

set key=HKLM\SOFTWARE\Microsoft\WindowsUpdate\UX\Settings

call :addReg "%key%" "UxOption" "REG_DWORD" "0"

set key=HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders

call :addReg "%key%" "AppData" "REG_EXPAND_SZ" "%USERPROFILE%\AppData\Roaming"

set key=HKLM\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders

call :addReg "%key%" "AppData" "REG_EXPAND_SZ" "%USERPROFILE%\AppData\Roaming"

set key=HKU\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders

call :addReg "%key%" "AppData" "REG_EXPAND_SZ" "%USERPROFILE%\AppData\Roaming"

reg add "HKLM\SYSTEM\CurrentControlSet\Control\BackupRestore\FilesNotToBackup" /f

reg query "HKLM\SOFTWARE\Policies\Microsoft\Windows\CurrentVersion\Internet Settings" /v Security_HKLM_only | find /i "Security_HKLM_Only" | find "1"

if %errorlevel% EQU 0 (

set key=HKLM\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains

) else (

set key=HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains

)

call :addReg "%key%\microsoft.com\update" "http" "REG_DWORD" "2"

call :addReg "%key%\microsoft.com\update" "https" "REG_DWORD" "2"

call :addReg "%key%\microsoft.com\windowsupdate" "http" "REG_DWORD" "2"

call :addReg "%key%\update.microsoft.com" "http" "REG_DWORD" "2"

call :addReg "%key%\update.microsoft.com" "https" "REG_DWORD" "2"

call :addReg "%key%\windowsupdate.com" "http" "REG_DWORD" "2"

call :addReg "%key%\windowsupdate.microsoft.com" "http" "REG_DWORD" "2"

call :addReg "%key%\download.microsoft.com" "http" "REG_DWORD" "2"

call :addReg "%key%\windowsupdate.com" "http" "REG_DWORD" "2"

call :addReg "%key%\windowsupdate.com" "https" "REG_DWORD" "2"

call :addReg "%key%\windowsupdate.com\download" "http" "REG_DWORD" "2"

call :addReg "%key%\windowsupdate.com\download" "https" "REG_DWORD" "2"

call :addReg "%key%\download.windowsupdate.com" "http" "REG_DWORD" "2"

call :addReg "%key%\download.windowsupdate.com" "https" "REG_DWORD" "2"

call :addReg "%key%\windows.com\wustat" "http" "REG_DWORD" "2"

call :addReg "%key%\wustat.windows.com" "http" "REG_DWORD" "2"

call :addReg "%key%\microsoft.com\ntservicepack" "http" "REG_DWORD" "2"

call :addReg "%key%\ntservicepack.microsoft.com" "http" "REG_DWORD" "2"

call :addReg "%key%\microsoft.com\ws" "http" "REG_DWORD" "2"

call :addReg "%key%\microsoft.com\ws" "https" "REG_DWORD" "2"

call :addReg "%key%\ws.microsoft.com" "http" "REG_DWORD" "2"

call :addReg "%key%\ws.microsoft.com" "https" "REG_DWORD" "2"

:: ----- End process -----

call :print The operation completed successfully.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Reset Winsock setting.

:: void winsock();

:: /*************************************************************************************/

:winsock

:: ----- Reset Winsock control -----

call :print Reset Winsock control.

call :print Restoring transaction logs.

fsutil resource setautoreset true C:\

call :print Restoring TPC/IP.

netsh int ip reset

call :print Restoring Winsock.

netsh winsock reset

call :print Restoring default policy settings.

netsh advfirewall reset

call :print Restoring the DNS cache.

ipconfig /flushdns

call :print Restoring the Proxy.

netsh winhttp reset proxy

:: ----- End process -----

call :print The operation completed successfully.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Forcing group policy update.

:: void gpupdate();

:: /*************************************************************************************/

:gpupdate

call :print Forcing group policy update.

if %family% NEQ 5 (

gpupdate /force

) else (

echo.Sorry, this option is not available on this Operative System.

)

if %errorlevel% EQU 0 (

echo.

echo.The operation completed successfully.

) else (

echo.

echo.An error occurred during operation.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Search Updates.

:: void updates();

:: /*************************************************************************************/

:updates

call :print Looking for updates.

echo.Wait . . .

echo.

wuauclt /resetauthorization /detectnow

if %family% EQU 10 (

start ms-settings:windowsupdate-action

) else (

if %family% NEQ 5 (

start wuapp.exe

) else (

echo.

echo.An unexpected error has occurred.

echo.

echo.Press any key to continue . . .

pause>nul

)

goto :eof

:: /*************************************************************************************/

:: Run SetupDiag.

:: void setupDiag();

:: /*************************************************************************************/

:setupDiag

for /f "tokens=1-5 delims=/., " %%a in ("%date%") do (

set now=%%a%%b%%c%%d%time:~0,2%%time:~3,2%

)

if not exist "%USERPROFILE%\Desktop\Backup\Logs\%now%\" (

mkdir "%USERPROFILE%\Desktop\Backup\Logs\%now%\"

)

call :print Running the standalone diagnostic tool SetupDiag

if %family% EQU 10 (

call "%~dp0SetupDiag.exe" /Output:"%USERPROFILE%\Desktop\Backup\Logs\%now%\WindowsUpdate.log" /Format:log

) else (

echo.Sorry, this option is not available on this Operative System.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Explore other local solutions.

:: void local();

:: /*************************************************************************************/

:local

call :print Looking for solutions in this PC.

if %family% NEQ 5 (

start control.exe /name Microsoft.Troubleshooting

) else (

echo.Sorry, this option is not available on this Operative System.

echo.

echo.Press any key to continue . . .

pause>nul

)

goto :eof

:: /*************************************************************************************/

:: Explore other online solutions.

:: void online();

:: /*************************************************************************************/

:online

call :print Looking for solutions Online.

start https://support.microsoft.com/en-us/gp/windows-update-issues/

goto :eof

:: /*************************************************************************************/

:: Reboot the system.

:: void restart();

:: /*************************************************************************************/

:restart

call :print Restart your PC.

if %family% NEQ 5 (

echo. The system reboot in 60 seconds.

echo. Please save all open documents.

start shutdown.exe /r /t 60 /c "The system reboot in 60 seconds. Please save all open documents."

) else (

echo.Sorry, this option is not available on this Operative System.

)

echo.

echo.Press any key to continue . . .

pause>nul

goto :eof

:: /*************************************************************************************/

:: Open help file.

:: void help();

:: /*************************************************************************************/

:help

start http://docs.wureset.com/

goto :eof

:: /*************************************************************************************/

:: diagnostic tools menu.

:: void diagnostic();

:: /*************************************************************************************/

:diagnostic

call :print Download and run diagnostics for your system.

echo. 1. Windows Update on Windows 7, Windows 8 and Windows 8.1.

echo. 2. Windows Update on Windows 10.

echo. 3. Apps on Windows 8.1.

echo. 4. Apps on Windows 10.

echo.

echo. 0. Back.

echo.

set /p option=Select an option:

if %option% EQU 0 (

goto menu

) else if %option% EQU 1 (

start http://go.microsoft.com/?linkid=9830262

) else if %option% EQU 2 (

start http://aka.ms/diag_wu

) else if %option% EQU 3 (

start http://go.microsoft.com/fwlink/p/?LinkId=268423

) else if %option% EQU 4 (

start http://aka.ms/diag_apps10

) else (

echo.

echo.Invalid option.

echo.

echo.Press any key to continue . . .

pause>nul

)

goto diagnostic

goto :eof

:: /*************************************************************************************/

:: End tool.

:: void close();

:: /*************************************************************************************/

:close

exit

goto :eof

:: /*************************************************************************************/

SQL

sql

see process

show open tables where in_use>0;

show processlist;

kill process_id;

impedire il download e l'installazione automatica dei driver in Windows 10,

impedire il download e l'installazione automatica dei driver in Windows 10,

reg add "HKLM\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate" /v ExcludeWUDriversInQualityUpdate /t REG_DWORD /d 1 /f

reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\DriverSearching" /v SearchOrderConfig /t REG_DWORD /d 0 /f

annullare le modifiche,

reg delete "HKLM\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate" /v ExcludeWUDriversInQualityUpdate
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\DriverSearching" /v SearchOrderConfig /t REG_DWORD /d 1 /f

Windows 7 e Protocollo di sicurezza TLS 1.2

Con l'introduzione del Protocollo TLS 1.2, connettendosi da un PC Windows 7 alla propria PEC tramite client Outlook, si potrebbe visualizzare un messaggio di errore.
Per la risoluzione di questi problemi si consiglia di fare riferimento al supporto Microsoft cliccando QUI.

Di seguito un estratto del documento Microsoft con i passi da seguire:

Scaricare ed installare l'aggiornamento di Windows "KB3140245" cliccando QUI;
Scaricare ed installare l'easyFix "MicrosoftEasyFix51044.msi" cliccando sul pulsante -Download- presente nella sezione Easy fix dellarticolo di Microsoft;
Creare la seguente chiave di registro:
percorso: HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols \TLS 1.2\Client
Nome DWORD: DisabledByDefault
Valore DWORD: 0

Si raccomanda di far eseguire le operazioni sopra indicate da personale qualificato.

windows 10: previous versions, download iso

https://www.ilsoftware.it/articoli.asp?tag=Scaricare-Windows-10-ISO-ecco-come-procedere_17216

https://tb.rg-adguard.net/public.php

resolve o365 activation problem

https://dennisspan.com/solving-office-365-activation-issues/

remove onedrive from save as on office

Hive: HYEY_Current_User
Key path: Software\Microsoft\Office\16.0\Common\Internet
Value Name: OnlineStorage
Value Type: Reg_DWORD
Value: 3
Base: Decimal

how to reset windows 7 -10 admin password or add new admin account

boot from installation disk (dvd or usb)

go to Recovery option

- win 10: launch

windows 10: request default app for open files evytime install new default program

Windows Registry Editor Version 5.00

; created by Walter Glenn
; for How-To Geek
; article: http://www.howtogeek.com/260420/how-to-disable-the-new-app-installed-notification-in-windows-8-and-10/

[HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\Explorer]
"NoNewAppAlert"=dword:00000001

windows 10: .net 3 download and installation failure

where X: is windows 10 files unit (USB or DVD)

command line with elevated permissions:

Dism /online /enable-feature /featurename:NetFX3 /All /Source:X:\sources\sxs /LimitAccess

windows 10 block app

from https://nwgat.ninja/remove-everything-exept-calculator-and-store/

open powershell (as administrator)
Set-ExecutionPolicy Unrestricted
Get-AppxPackage -AllUsers | where-object {$_.name -notlike "*Microsoft.WindowsStore*"} | where-object {$_.name -notlike "*Microsoft.WindowsCalculator*"} | where-object {$_.name -notlike "*Microsoft.Windows.Photos*"} | Remove-AppxPackage
Get-AppxProvisionedPackage -online | where-object {$_.packagename -notlike "*Microsoft.WindowsStore*"} | where-object {$_.packagename -notlike "*Microsoft.WindowsCalculator*"} | where-object {$_.packagename -notlike "*Microsoft.Windows.Photos*"} |Remove-AppxProvisionedPackage -online

open powershell (as administrator)
Set-ExecutionPolicy Unrestricted
Get-AppXPackage | Foreach {Add-AppxPackage -DisableDevelopmentMode -Register "$($_.InstallLocation)\AppXManifest.xml"}

HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\CloudContent
Create a new 32-bit DWORD value named DisableWindowsConsumerFeatures and set its value data to 1

GDPR sunto

Valutazione d'impatto DPIA: quando è obbligatoria (almeno 2 su nove delle condizioni richieste)
http://www.garanteprivacy.it/regolamentoue/DPIA

eccetto quando: qualora un trattamento, effettuato a norma dell'articolo 6, paragrafo 1, lettere c) o e), trovi una base giuridica nel diritto dell'Unione o nel diritto dello Stato membro, tale diritto disciplini il trattamento specifico

Crittografia: consigliata?
http://www.ipsoa.it/documents/lavoro-e-previdenza/rapporto-di-lavoro/quotidiano/2018/03/17/crittografia-pseudonimizzazione-gdpr

Cancellazione automatica?
Sono in atto politiche e procedure di conservazione per garantire che i dati personali siano conservati per un periodo non superiore a quello necessario per gli scopi per cui sono stati raccolti?
http://www.ordineavvocatitorino.it/sites/default/files/documents/GDPR-Preparazione.pdf

DPO
Il trattamento di dati personali non dovrebbe essere considerato un trattamento su larga scala (che mirano al trattamento di una notevole quantità di dati personali a livello regionale, nazionale o sovranazionale e che potrebbero incidere su un vasto numero di interessati e che potenzialmente presentano un rischio elevato) qualora riguardi dati personali di clienti da parte di un singolo professionista

ma cosa significa : Se si decide che un DPO non è obbligatorio per lo studio, si è proceduto ad archiviarne i motivi?

MS ACCESS: controls type code

Dim ctlControlloCorrente As Control
Set ctlControlloCorrente = Screen.ActiveControl
ctlControlloCorrente.ControlType

'126 - acAttachment

'108 - acBoundObjectFrame

'106 - acCheckBox

'111 - acComboBox

'104 - acCommandButton

'119 - acCustomControl

'103 - acImage

'100 - acLabel

'102 - acLine

'110 - acListBox

'114 - acObjectFrame

'105 - acOptionButton

'107 - acOptionGroup

'124 - acPage

'118 - acPageBreak

'101 - acRectangle

'112 - acSubform

'123 - acTabCtl

'109 - acTextBox

'122 - acToggleButton

viceversa backup with other user credential using psexec

echo off
cls
echo.
echo spegnere il computer?
echo.
echo per annullare premere CTRL + C, oppure
echo.
pause
cls
Taskkill /IM thunderbird.exe /F
psexec \\127.0.0.1\ "D:\non_toccare\copia.bat" -u username-p password
cls
shutdown -s -f -t 30

on copia.bat

"C:\Program Files\ViceVersa Pro\ViceVersa.exe" "D:\non_toccare\copia_su_2tb.fsf" /autoexec /autoclose

am

goo.gl/ufz8Sq

python use local numeric format

import locale
locale.setlocale(locale.LC_ALL, '')

value = 2.5
print (locale.str(value))

the output is

2,5

raspberry, raspbian: see temperature of cpu and log every 15 min

with command

/opt/vc/bin/vcgencmd measure_temp

obtain

pi@mypi:~ $ /opt/vc/bin/vcgencmd measure_temp
temp=47.2'C

with command

/sys/class/thermal/thermal_zone0/temp

get a number representing the temperature multiplied by 1000

script for upload with ftp a log of cpu temperature (file located on /hom/pi/script/)

sudo vi /home/pi/script/uploadtemp.sh

insert this ins

temp=$(cat /sys/class/thermal/thermal_zone0/temp)
datacorr=$(date +%d/%m/%Y)
oracor=$(date +%H:%M:%S%n)
echo "$temp;$datacorr;$oracor">> /home/pi/script/temp.csv

HOST='ftp.mydomain.com'
USER='mylogin'
PASSWD='mypassword'
FILE='/home/pi/script/temp.csv /mydomain.com/temp.txt'

ftp -n $HOST <quote USER $USER
quote PASS $PASSWD
binary
put $FILE
quit
END_SCRIPT
exit 0

save script

:w

:q

make executable

sudo chmod +x myscript.sh

with add a crontab entry (log and upload every 15 min to ftp)

sudo vi /etc/crontab

0,15,30,45 * * * * root sh /home/pi/script/uploadtemp.sh &>/dev/null

linux: service list, start, stop

for complete list of service (with + is started, with - is stopped)

sudo service --status-all

for start service XXXXXXX

sudo service XXXXXX start

for stop service XXXXXXX


sudo service XXXXXX stop

cant disconnect from network shared folder for reconnect from another account

type

net use * /d /y

for disconnect all network shared folder already used from last boot and clean credential used for connect them