กรุณาปิด AdBlock!

Cancel your adBlock please.

ขยายหน้าเว็บRegister Login
 โฆษณา
หน้า: [1]  ลงล่าง
  พิมพ์  
topic

วิธีเช็คเวลาในการ Restart  (อ่าน 5433 ครั้ง)

ไอที
« เมื่อ: 18, 08 2010, 03:17:10 AM »
1. ให้เปิด 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

"rtyu"

2.เมื่อจะใช้ให้เราดับเบิ้ลคลิกไฟล์ที่ได้สร้างไว้ แล้วจะมีหน้าต่างเตือนให้เราปิดโปรแกรมที่เราเปิดไว้

"rtyu"

เมื่อเราปิดโปรแกรมหมดแล้วให้คลิก OK เครื่องก็จะรีสตาร์ท แล้วจะแสดงผลขึ้นมา

นี่ผลของเครื่องของผม

"rtyu"
++NEAR++
ยามเฝ้าบอร์ด
เด็กไอทีตัวเต็มวัย
*
พลังความคิด 55
กระทู้: 576
บันทึกการเข้า

link
สวัสดีคุณ  <you/>  วันนี้คุณทำความดีแล้วหรือยัง
ไอที
« ตอบ #1 เมื่อ: 25, 08 2010, 01:45:33 PM »
ง่ะ .vbs

ใช้กับ win 7 ได้มั้ยอะครับ
เด็กไอทีคลับ
เด็กไอทีตัวพ่อ
เด็กไอทีคลับชั้นเซียน
*
พลังความคิด 89
กระทู้: 3,536
บันทึกการเข้า
ไอที
« ตอบ #2 เมื่อ: 25, 08 2010, 07:18:00 PM »
ได้ครับ

เพราะผมทำใน win7
++NEAR++
ยามเฝ้าบอร์ด
เด็กไอทีตัวเต็มวัย
*
พลังความคิด 55
กระทู้: 576
บันทึกการเข้า

link
สวัสดีคุณ  <you/>  วันนี้คุณทำความดีแล้วหรือยัง
หน้า: [1]  ขึ้นบน
  พิมพ์  
 
กระโดดไป: