Vreme rebootovanja racunara

ADMINISTRATOR
Učlanjen(a)
10.05.1971
Poruka
54.331
Mozete proveriti vreme za koje se reboota vas racunar.Potrebno je da napravite jednu notepad skriptu....Startujte Notepad....broj 1 a zatim u praznom notepadu iskopirajte skriptu....broj 2

Kod:
Option Explicit
On Error Resume Next
Dim Wsh, Time1, Time2, Result, PathFile, MsgResult, MsgA, AppName, KeyA, KeyB, TimeDiff
MsgA = "Ako zelite rebootovati racunar kliknite na OK."
KeyA = "HKEY_CURRENT_USER\Software\RestartTime\"
KeyB = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\RestartTime"
AppName = "[SerbianForum] Reboot Vreme"
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 "Vas racunar se rebootivao za " & TimeDiff & " sekundi", VbInformation, AppName
end if

50975069.jpg


U gornjem meniju notepada kliknite misem na File a zatim i u padajucem na Save Ass...broj 3

62473879.jpg


Dajte ime skripti Reboot vreme.vbs .....broj 4 i kliknite misem na dugme Save.....broj 5

22457126.jpg


Sada ste dobili skriptu i mozete izmeriti vreme rebotoovanja vaseg racunara.Dupli klik misa na skriptu Reboot vreme.vbs ...broj 1 a zatim u novom prozoru kliknite misem na OK.....broj 2 (skripta je odradjena na nasem jeziku tako da nema problema)....

20993169.jpg


Kroz par trenutaka vas racunar ce se rebootovati....Sacekajte da se ponovo podigne sistem i dobicete prozor sa informacijom za koliko sekundi se vas racunar rebootovao....Posto videli zatvotite prozor klikom misa na OK.....broj 3

30873333.jpg


Ako niste zadovoljni vremenom za koje se reboota vas racunar mozete i smanjiti ovo vreme raznoraznim ,,radovima,, na istom ali to vec nije tema ovog tutorijala.....
 
ADMINISTRATOR
Učlanjen(a)
10.05.1971
Poruka
54.331
U PDF....

:download:

[raw]<iframe src="https://skydrive.live.com/embed?cid=37BC32D29066020F&resid=37BC32D29066020F%211392&authkey=AMG7fxkgOwKH8cM" width="98" height="120" frameborder="0" scrolling="no"></iframe>[/raw]
 
Natrag
Top