Home » 1. Notebook News

เปิดปิดการช่อนไฟล์และโฟลเดอร์ ทำได้ง่ายแบบชิลๆ

9 May 10 - By l

การเปิดปิดการซ่อนไฟล์และโฟลเดอร์ เป็นสิ่งที่บางครั้งที่ผู้ใช้ จำเป็นต้องทำ ซึ่งการทำอาจไม่ยากเท่าไร แต่การที่จะต้องเข้าไปเปิดการซ่อนไฟล์ แล้วก็ต้องไปปิดอีกที่ มันก็เป็นงานที่ต้องใช้เวลาและขั้นตอน

ทิปนี้จะจับเอาการเปิดปิดให้มาอยู่ที่ไฟล์ Script ไฟล์เดียว เพื่อความสะดวก ทำได้โดยมี? VBScript ดังนี้…

1. สร้างไฟล์ Script โดยเปิด Notepad ขึ้นมา แล้วก็อปปี้คำสั่ง? VBScript ข้างล่างนี้ไปปะที่ Notepad

Message = “เมื่อทำงานถูกต้อง สคริปต์จะปิดตัวเอง” & vbCR

Message = Message & “พร้อมทั้งหน้าต่าง Windows Explorer ” & vbCR

Message = Message & “การกระทำนี้จะไม่เป็นอันตรายต่อระบบคุณ” & vbCR & vbCR

Message = Message & “จะทำต่อหรือไม่?”

X = MsgBox(Message, vbYesNo, “Notice”)

If X = 6 Then

On Error Resume Next

On Error Resume Next

Dim WSHShell, n, p, itemtype, MyBox

Set WSHShell = WScript.CreateObject(“WScript.Shell”)

p = “HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden”

itemtype = “REG_DWORD”

n = WSHShell.RegRead (p)

errnum = Err.Number

if errnum <> 1 then

WSHShell.RegWrite p, 2, itemtype

End If

If n = 2 Then

WshShell.RegWrite p, 1, itemtype

MyBox = MsgBox(“ไฟล์และโฟลเดอร์ที่ซ่อนได้ทำการโชว์แล้ว”, 64, “ซ่อนไฟล์และโฟลเดอร์”)

End If

If n = 1 Then

WshShell.Regwrite p, 2, itemtype

MyBox = MsgBox(“ทำการซ่อนไฟล์และโฟลเดอร์เหมื่อนเดิม”, 64, “ซ่อนไฟล์และโฟลเดอร์”)

End If

Set WshShell = Nothing

On Error GoTo 0

For Each Process in GetObject(“winmgmts:”). _

ExecQuery (“select * from Win32_Process where name=’explorer.exe'”)

Process.terminate(0)

Next

MsgBox “เสร็จเรียบร้อย” & vbcr & vbcr , 4096, “Done”

Else

MsgBox “ไม่มีการเปลี่ยนแปลงใดๆ กับระบบของคุณ” & vbcr & vbcr, 4096, “ผู้ใช้ขอยกเลิก”

End If

2. บันทึกไฟล์นี้เป็นชื่อ Enable_Disable_Hidden.vbs

3. เมื่อใช้งานครั้งแรกเพื่อจะเปิดให้เห็นไฟล์หรือโฟลเดอร์ที่ซ่อนก็ดับเบิลคลิกที่ไฟล์สร้างขึ้นมา จะมีหน้าต่าง Notice เปิดขึ้นมา ให้คลิกปุ่ม Yes

4. ต่อมาจะมีหน้าต่าง ซ่อนไฟล์และโฟลเดอร์ จะแสดงข้อความ ไฟล์และโฟลเดอร์ที่ซ่อนได้ทำการโชว์แล้ว ให้คลิกปุ่ม OK และ OK อีกครั้งเป็นเรียบร้อย คุณก็จะเห็นไฟล์และโฟลเดอร์ที่ซ่อนอยู่

Hidden2

ส่วนในการที่จะทำการซ่อนไฟล์และโฟลเดอร์กลับเหมือนเดิมก็ให้ทำลักษณะเดียวกันคือดับเบิลคลิกที่ไฟล์ที่สร้างขึ้นมา Script จะทำการแก้ไขระบบให้ซ่อนไฟล์เหมือนเดิม โดยจะแสดงข้อความที่หน้าต่าง ซ่อนไฟล์และโฟลเดอร์ ว่า ทำการซ่อนไฟล์และโฟลเดอร์เหมื่อนเดิม

Hidden3




© Copyright - Notebookspec.com All Rights