If FileExists(@WindowsDir&"\shel.bat") Then FileDelete(@WindowsDir&"\shel.bat")
FileWrite(@WindowsDir&"\shel.bat","taskkill /f /im explorer.exe"&@CRLF)
FileWrite(@WindowsDir&"\shel.bat","ping 127.0.0.1 -n 5>nul"&@CRLF)
FileWrite(@WindowsDir&"\shel.bat","start explorer.exe")
RunWait(@WindowsDir&"\shel.bat","",@SW_HIDE)
If FileExists(@WindowsDir&"\shel.bat") Then FileDelete(@WindowsDir&"\shel.bat")