Đây có vài thông tin cho các bạn:
Phục hồi mục Folder Options
Cập nhật: 11/7/2006
Trong bài viết “Giải quyết một số rắc rối trong Windows Explorer” đã hướng dẫn một số cách để khắc phục hiện tượng mất menu Folder Options trong Windows Explorer. Để thực hiện các thao tác như trong bài viết này, máy bạn phải có một chương trình diệt virus đủ mạnh để diệt các virus gây nên hiện tượng trên sau khi xử lý bằng các thao tác đã hướng dẫn thì mới đạt được hiệu quả là phục hồi lại menu Folder Options trong Windows Explorer.
Thật ra loại virus này chỉ lợi dụng tính chất trong công cụ registry editor để điều chỉnh một số chính sách (Policy) của Windows và đã làm ẩn đi chức năng Folder Options trong Windows Explorer làm cho bạn gặp khó khăn khi sử dụng chức năng này cho nên một số chương trình diệt virus có thể không cho đó là virus. Ngoài ra, tác giả virus này đã đoán trước bạn rất có thể sẽ vào công cụ Registry Editor để khắc phục nên đã vô hiệu hóa (disabled) luôn chức năng này.
Biết được như vậy, chúng ta có thể làm ngược lại bằng cách truy cập vào công cụ registry editor để thực hiện các thao tác ngược lại, tuy nhiên lúc này chức năng registry editor cũng đã bị khóa lại nên không thể nào truy cập được. Giải pháp là có thể tạo ra một file vb script để ra lệnh cho Windows thực hiện các thao tác đó. Bạn hãy mở trình soạn thảo văn bản NotePad, copy chính xác tất cả các dòng mã lệnh VB bên dưới đây, sau đó lưu lại với tên nào cũng được nhưng với phần mở rộng là .vbs.
Option Explicit
Dim WSHShell, n, MyBox, p, p1, Title911, errnum, vers, itemtype
Set WSHShell = WScript.CreateObject("WScript.Shell")
p = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
p1 = "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
p = p & "NoFolderOptions"
p1 = p1 & "NoFolderOptions"
itemtype = "REG_DWORD"
Title911 = "Suu tam tu website www.911.com.vn"
Err.Clear
On Error Resume Next
n = WSHShell.RegRead (p)
On Error Goto 0
errnum = Err.Number
if errnum <> 0 then
WSHShell.RegWrite p, 0, itemtype
WSHShell.RegWrite p1, 0, itemtype
End If
If n = 0 Then
n = 1
WSHShell.RegWrite p, n, itemtype
WSHShell.RegWrite p1, n, itemtype
Mybox = MsgBox("Folder Options cua ban da bi AN DI, logoff hoac khoi dong lai may tinh de thay doi co tac dung", 4096, Title911)
ElseIf n = 1 then
n = 0
WSHShell.RegWrite p, n, itemtype
WSHShell.RegWrite p1, n, itemtype
Mybox = MsgBox("Folder Options cua ban da duoc HIEN LEN, logoff hoac khoi dong lai may tinh de thay doi co tac dung", 4096, Title911)
End If
Bạn lưu file vừa tạo ở đâu cũng được với tên giả sử như là folderoption.vbs. Click vào file này để chạy. Sau đó kiểm tra lại mục Folder Options trong menu Tools > Folder Options trong Windows Explorer bạn sẽ vô cùng ngạc nhiên bởi vị mục này đã xuất hiện trở lại y nguyên như chưa bao giờ bị mất. Đoạn code trên làm một đoạn code được viết bắng ngôn ngữ lập trình Visual Basic. Nếu máy bạn vẫn còn bị hiện tượng mất mục Folder Options, truy cập Regedit không được thì hãy thực hiện như hướng dẫn của bài này để phục hồi nguyên trạng.
Nguyễn Hữu Lương
