-->

Untuk kalian yang pengen nyoba tau seberapa cepat waktu restart komputer/laptop kalian, saya mau share mungkin kalian bisa mempergunakan script ini untuk coba2 :)
  1. Copy kode dibawah ini kedalam notepad.
  2. Simpan dengan nama apa saja, dimana saja (misal di desktop), yg penting ekstensinya .vbs. Misalnya Waktu_Restart_Kompie.vbs
  3. SCRIPT INI SUPPORT XP, VISTA & WINDOWS 7.
Option Explicit
On Error Resume Next
Dim Wsh, Time1, Time2, Result, PathFile, MsgResult, MsgA, AppName, KeyA, KeyB, TimeDiff
MsgA = "Tutup dulu semua aplikasi yang sedang running lalu klik OK!"
KeyA = "HKEY_CURRENT_USER\Software\RestartTime\"
KeyB = "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr  entVersion\Run\RestartTime"
AppName = "Kecepatan Restart Komputer"
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 "PC kamu barusan restart selama " & TimeDiff & " detik", VbInformation, AppName
end if
wscript.Quit         

Cara pakai:
  • Dobel klik script yang kalian save tadi (Waktu_Restart_Kompie.vbs).
  • Tutup semua aplikasi  yang masih jalan.
  • Klik OK.
  • Sehabis komputer kalian restart, muncul kotak dialog berisi waktu restart kalian.
  • Untuk yg Windows 7, unblock dulu file script agan baru jalankan. Klik kanan file, pilih Poperties lalu klik tombol "Unblock".

0 komentar:

Posting Komentar