如何立即隐藏驱动器
我查了一些资料,通过修改修改注册表可以隐藏驱动器:
HKEY_USERS\.Default\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer下新建NoDrives

我测了一下,确实可以隐藏,但是必须注销或重启后才会生效,我的问题是如何使电脑不重启直接可以生效?


[解决办法]
需要在修改注表後播送WM_SETTINGCHANGE消息(在Windows NT下WM_WININICHANGE消息)。
如果使用SystemParametersInfo 修改置，最後一置SPIF_SENDWININICHANGE。
, 有程序接收到消息采取相的操作, 不不是所有的操作都可以立即生效, 有些操作需要重
新Windows或重新件。

Declare Function SendMessageA Lib "user32 " (ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long
Sub Test()
Const WM_WININICHANGE = &H1A
Const WM_SETTINGCHANGE = &H1A
Call SendMessageA(Me.hwnd, WM_SETTINGCHANGE, 0, 0)
End Sub