My recent Document สำคัญแค่ไหน ?
***************************************************
recent document นั้น เป็นแหล่งที่ Windows ใช้เก็บประวัติการใช้งานไฟล์ต่างๆ เอาไว้
เพื่อความสะดวก ในการใช้งานหรือเรียกใช้งานครั้งต่อไปนั่นเอง แต่ในทางกลับกัน
หากเราใช้งานไฟล์ที่เป็นความลับ หรือไฟล์ที่ไม่ต้องการให้ใครดู แม้แต่จะซ่อนเอาไว้มิดชิดเพียงใด
ตัว Recent Document ก็ยังสามารถนำพาเอาผู้ไม่ประสงค์ดีไปสู่ไฟล์เหล่านั้นได้อย่างง่ายดาย อุอุ (- -")
เราสามารถปิดไม่ให้โชว์ที่ Start ได้โดย คลิกขวาที่ taskbar > Properties > Start Menu > Customize... > Advanced ดังรูป
แต่ !!! หากเราพิมพ์ %USERPROFILE% ลงไปใน Start > Run เราก็จะเห็นมันยังมีอยู่เหมือนเดิม ("- -)
และเมื่อเราคลิกเข้าไป ก็จะเจอกับร่องร่องที่เราทิ้งเอาไว้เยอะแยะ O_o
ในตอนนี้เอง ถ้าหากใครต้องการจะทราบที่อยู่ไฟล์ได ก็เพียงแค่
คลิกขวาที่ shortcut เหล่านั้น > Properties > find Target ก็ได้เจอ ไฟล์ต้องห้ามเหล่านั้นแล้ว... ง่ายไหมล่ะ?
ดังนั้น เรามาลบร่องรอยของเราทิ้งเพื่อป้องกันสิ่งที่ไม่คาดคิดว่าจะเกิดขึ้นกันดีกว่า 
โดยการเข้าปิดมันซะ (ก็ไม่ใช่ปิดซะทีเดียวหรอก - -" แต่เป็นการเคลียร์มากกว่า)
เริ่มจาก ไปที่ Start > Run > พิมพ์ regedit > แล้วไปที่ HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer
จากนั้น คลิกขวาบนที่ว่าง เพื่อ สร้าง registry ใหม่(ดังรูป)
จากนั้นตั้งค่าตามรูป กด Ok รีสตาร์ทเครื่อง 1 ครั้ง
จะเห็นว่า ร่องรอยต่างๆ หายไปแล้วววววว ... โย่ว!
***************************************************
แต่ เดี๋ยวก่อน!!! เรามีทางเลือกที่ง่ายกว่านั้น ^o^
จากบทความเรื่องที่แล้ว เราได้พูดถึงการทำสคริปท์เพื่อแก้ไขรีจิสตรี้กันไปแล้ว
ครั้งนี้ เราก็จะใช้ประโยชน์จากมันอีกครั้ง
ก๊อปปี้ Code ด้านล่างวางบน Notepad แล้วเซฟเป็นนามสกุล .vbs
'Script. -ClearRecentDoc
Dim WSHShell, MyBox, Title
Message = "เมื่อคุณปิดคอมพิวเตอร์ จะทำการเคลียร์ Recent Document" & vbCr & vbCr
Message = Message & "คุณต้องการกระทำต่อหรือไม่?"
X = MsgBox(Message, vbYesNo + vbQuestion, "เร้าใจเกินพิกัด <http://zaswert.bloggang.com, www.pantip.com>")
If X = 6 Then
Set Zygote = WScript.CreateObject("WScript.Shell")
Zygote.RegWrite"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\ClearRecentDocsOnExit",1,"REG_DWORD"
Title = "เ รี ย บ ร้ อ ย แ ล้ ว จ้ า !" &vbCr &vbCr
Title = Title & "โดย เร้าใจเกินพิกัด"
MyBox = MsgBox(Title,48,"Finished")
End If
* หากต้องการเปิดใช้ Recent Document อีกครั้ง ก็เพียงแค่เปลี่ยนค่า Value data จาก 1 เป็น 0 ก็เรียบร้อย
เสร็จแล้ว ดับเบิ้ลคลิกที่ไฟล์ รีสตาร์ทเครื่อง 1 ครั้งก็เป็นอันสำเร็จ
***************************************************
***************************************************
ผมได้อัพโหลดสคริปท์ที่คิดว่าจะเป็นประโยชน์ในการใช้งานเอาไว้ส่วนหนึ่ง
หากใครต้องการ สามารถเข้าไปโหลดได้ในลิงค์ข้างล่างนี้นะครับ