Windows Errors
Khắc phục lỗi mất shortcut trong Send To
Bạn tạo shortcut cho một hay nhiều ứng dụng sau khi xong , khi bạn nhấn chuột
phải vào một thư mục hay tập tin và chọn chức năng Send To , các shortcut này sẽ
không hiển thị ra theo như ý muốn của bạn . Nguyên nhân do đường dẫn của
SendTo bạn chưa thiết lập đúng cách.
Mặc dù bạn chép shortcut vào trong thư mục Documents and Settings\<Tên tài
khoản đăng nhập>\SendTo tuy nhiên nó vẩn không xuất hiện các shortcut .
Để giải quyết lỗi này bạn mở Notepad và chép đoạn mã sau vào :
Set WshShell = CreateObject("WScript.Shell")
USFolderPath =
"HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell
Folders"
On Error resume next
WshShell.RegWrite "HKCR\exefile\shellex\DropHandler\", "{86C86720-42A0-
1069-A2E8-
08002B30309D}", "REG_SZ"
WshShell.RegWrite "HKCR\lnkfile\shellex\DropHandler\", "{00021401-0000-
0000-C000-
000000000046}", "REG_SZ"
WshShell.RegWrite USFolderPath & "\SendTo", "%USERPROFILE%\SendTo",
"REG_EXPAND_SZ"
Wshshell.RUN ("regsvr32.exe shell32.dll /i /s")
MsgUser = Msgbox ("Fixed the Send To menu. Restart Windows for the changes
to take effect", 4160, "'Send To' menu fix for Windows XP")
Set WshShell = Nothing
Lưu tập tin này và đặt tên là fixsendto.vbs
Thêm link của một website đến Start Menu

Lưu lại và đặt tên cho tập tin này là lastregistry.vbs
Kiểm tra tổng số thư mục , tập tin có trong thư mục Windows
Bạn muốn kiểm tra trên máy tính của mình có bao nhiêu thư mục và tập tin nằm
trong thư mục Windows trên hệ điều hành Windows XP hay không . Thủ thuật sau
sẽ giúp bạn làm điều này chỉ cần nhấn chuột phải .
Mở Notepad của bạn lên , chép và dán đoạn code sau vào trong Notepad :
dir /a /-p /o:gen >filelisting.txt
Đặt tên cho tập tin này là filelisting.bat . Lưu tập tin này lại ở trong thư mục
E:\Windows (E: là ổ
đĩa bạn cài hệ điều hành Windows XP)
Vào MyComputer chọn Tools-Folder Options chọn thanh File Types . Chọn mục
Advanced - New
Trong mục New Action : Ở dòng Action bạn điền Create File Listing , Ở dòng
Application used to perform action bạn nhập
E:\Windows\filelisting.bat . Nhấn OK hai lần . Chọn Close để thoát . Nhấn chuột
phải vào thư mục Windows chọn Create File Listing .
Mở tập tin filelisting.txt để xem các thư mục và tập tin có trong thư mục Windows
.
Nếu bạn muốn xóa chức năng này bạn mở Registry Editor lên , tìm đến khóa sau :
HKEY_CLASSES_ROOT\Folder\shell
Ở cửa sổ bên trái bạn tìm khóa Create_File_Listing , nhấn chuột phải lên khóa
chọn Delete để xóa khóa này .
Thoát khỏi Registry và khởi động lại máy tính .
Mở các ổ đĩa CROM bằng một cú nhấp chuột
Máy tính của bạn có rất nhiều ổ CDROM , nếu bạn nhấn nút Eject để lấy từng cái
ra thì thật mất thời gian , bạn có thể sử dụng cách sau để mở tất cả các ổ đĩa
CDROM bằng một cú nhấp chuột.
Để mở tất cã các ổ đĩa CDROM bạn làm như sau :
Mở Notepad lên và chép đoạn mã sau vào :
Const CDROM = 4

If cn <> "" Then
ws.RegWrite p1 & "Window Title", cn
End If
VisitKelly's Korner
Sub VisitKelly's Korner
If MsgBox("Welcome to " & vbCRLF & vbCRLF
&"VNECHIP",
vbQuestion + vbYesNo + vbDefaultButton, "") =6 Then
ws.Run ""
End If
End Sub
Lưu tập tin này lại với tên là changetitle.vbs
Thêm Microsoft Knowledge Base vào thanh ToolBar