Scripts I use for Windows 10 :
Boot Speed file name: bootspeed.vbs
Option Explicit
On Error Resume Next
Dim Wsh, Time1, Time2, Result, PathFile, MsgResult, MsgA, AppName, KeyA, KeyB, TimeDiff
MsgA = "Please close all running applications and click on OK."
KeyA = "HKEY_CURRENT_USER\Software\RestartTime\"
KeyB = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\RestartTime"
AppName = "ReBoot-Time"
Set Wsh = CreateObject("WScript.Shell")
PathFile = """" & WScript.ScriptFullName & """"
Result = wsh.RegRead(KeyA & "Times")
if Result = "" then
MsgResult = Msgbox (MsgA, vbOKCancel, AppName)
If MsgResult = vbcancel then WScript.Quit
Wsh.RegWrite KeyA & "Times", left(Time,8), "REG_SZ"
Wsh.RegWrite KeyB, PathFile, "REG_SZ"
Wsh.Run "cmd /c Shutdown -r -t 00", false, 0
else
Wsh.RegDelete KeyA & "Times"
Wsh.RegDelete KeyA
Wsh.RegDelete KeyB
TimeDiff = DateDiff("s",Result,left(Time,8))
MsgBox "Your computer reboots in " & TimeDiff & " seconds", VbInformation, AppName
end if
wscript.Quit
Clear Event Viewer file name: Clear_Event_Viewer.bat
@echo off
FOR /F "tokens=1,2*" %%V IN ('bcdedit') DO SET adminTest=%%V
IF (%adminTest%)==(Access) goto noAdmin
for /F "tokens=*" %%G in ('wevtutil.exe el') DO (call :do_clear "%%G")
echo.
echo goto theEnd
:do_clear
echo clearing %1
wevtutil.exe cl %1
goto :eof
:noAdmin
exit
Glenn
Thursday, July 14, 2016
Tuesday, July 12, 2016
Older Firefox Add-Ons:
Adblock Plus - https://addons.mozilla.org/en-US/firefox/addon/adblock-plus/
Always on Top - https://addons.mozilla.org/en-US/firefox/addon/always-on-top/
Open in MS Edge - https://addons.mozilla.org/en-US/firefox/addon/open-in-microsoft-edge-browser/
Open With - https://addons.mozilla.org/en-US/firefox/addon/open-with/
Ultrawidify - https://addons.mozilla.org/en-US/firefox/addon/ultrawidify/
Subscribe to:
Posts (Atom)