Windows 7 Tip5#:มาเช็คกันว่า Windows 7 ของท่าน ใช้เวลาในการ Restart นานแค่ไหน
อันที่จริงบทความนี่จะไม่ถือว่าเป็นทิปก็ได้ เอาเป็นว่าผมมาช่วยกันเล่นสนุกๆก็แล้วกัน ดูซิคอมพิวเตอร์ของเพื่อนๆมันจะใช้เวลาในการ Restart 1 ครั้ง นานเท่าไร มันจะเร็วจี้หรือคลานเป็นเต่า ผมไปเจอมาที่เว็บนอก เขาเล่นแข่งกันถือเป็นเรื่องขำๆของฝรั่งกัน วิธีทำก็ไม่ยากอะไร เพียงเขียน VBscript รัน ให้มันจับเวลาให้ ตั้งแต่กด Start จนเครื่อง Restart กลับมาที่ Desktop ให้คุณเปิด Notepad ขึ้นมาแล้วก็อปปี้ script ข้างล่างนี้ ไปปะแล้วเซฟเป็นชื่อ Start_Time.VBS โดยเซฟเก็บไว้ที่หน้า Desktop ของคุณ
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 = "Restart-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 restarts in " & TimeDiff & " seconds", VbInformation,
AppName
end if
wscript.Quit
เมื่อจะใช้ก็ดับเบิ้ลคลิกที่ไฟล์นี้ จะมี POP-UP เตือนให้ปิดโปรแกรมต่างๆที่เปิดค้างไว้อยู่ เมื่อปิดเสร็จแล้ว ก็คลิก OK เครื่องจะ Restart จนมาขึ้นหน้า Desktop ใหม่อีกครั้งพร้อม POP-UP บอกเวลาที่ใช้ไป....ตอนเข้าWindows เพื่อนคีย์ Password ของเพื่อนๆให้เร็วๆนะ เพราะมันคิดเวลานี้รวมไปด้วย
<!--[if !vml]--><!--[endif]--> <!--[if !vml]--><!--[endif]-->
By: NuuCue
Credit : Augie
ไม่มีความคิดเห็น:
แสดงความคิดเห็น