Home » Tip & Trick

สร้าง Restore Point ด้วย VBScript

22 Jul 10 - By l

ปกติผู้ใช้ Windows ทั่วไปจะทราบอยู่แล้วว่าการสร้างจุด Restore Point เพื่อสำรองไฟล์ระบบของ Windows ด้วย System Restore? คุณจะต้องคลิกโน่นคลิกนี่หลายขั้นตอน กว่าจะได้ Restore Point

วันนี้จะแนะการใช้ VBScript มาเป็นเครื่องมือการสร้าง Restore Point ชึ่งง่ายและรวดเร็วกว่า โดยมีวิธีดังนี้

1. เปิดโปรแกรม Notepad ขึ้นมา แล้วเขียนคำสั่ง VBScript ตามดังนี้…

If GetOS = “Windows XP” Then

CreateSRP

End If

If GetOS = “Windows Vista” Or GetOS = “Windows 7” Then

If WScript.Arguments.length =0 Then

Set objShell = CreateObject(“Shell.Application”)

objShell.ShellExecute “wscript.exe”, “””” & _

WScript.ScriptFullName & “””” & ” uac”,””, “runas”, 1

Else

CreateSRP

End If

End If

Sub CreateSRP

Set SRP = getobject(“winmgmts:\\.\root\default:Systemrestore”)

sDesc = “Manual Restore Point”

sDesc = InputBox (“Enter a description.”, “System Restore script : Augie Young”,”Manual Restore Point”)

If Trim(sDesc) <> “” Then

sOut = SRP.createrestorepoint (sDesc, 0, 100)

If sOut <> 0 Then

WScript.echo “Error ” & sOut & _

“: Unable to create Restore Point.”

End If

End If

End Sub

Function GetOS

Set objWMI = GetObject(“winmgmts:{impersonationLevel=impersonate}!\\” & _

“.\root\cimv2″)

Set colOS = objWMI.ExecQuery(“Select * from Win32_OperatingSystem”)

For Each objOS in colOS

If instr(objOS.Caption, “Windows 7”) Then

GetOS = “Windows 7”

ElseIf instr(objOS.Caption, “Vista”) Then

GetOS = “Windows Vista”

elseIf instr(objOS.Caption, “Windows XP”) Then

GetOS = “Windows XP”

End If

Next

End Function

2. บันทึกไฟล์นี้เป็นชื่อ RestorePoint.vbs โดยบันทึกเก็บไว้ที่เก็บไฟล์ชั่วคราวของคุณ

3. เวลาใช้งานก็ดับเบิลคลิกที่ไฟล์ที่สร้างขึ้นมา จะมีหน้าต่าง System Restore script ออกมา ให้คุณใส่ชื่อตามแต่คุณค้องการลงในช่องว่างของหน้าต่าง ซึ่งมีค่าดีฟอลต์ว่า Manual Restore Point

4. คลิกปุ่ม OK ก็เสร็จเรียบร้อย

restore_point_01

5. เมื่อคุณจะใช้งานโดยทำการ System Restore คุณจะเห็นชื่อของ Restore Point ที่คุณสร้างด้วย VBScript ไว้

restore_point_02



© Copyright - Notebookspec.com All Rights