VBS勾选“不显示隐藏的文件和文件夹”

来源:百度知道 编辑:UC知道 时间:2024/06/08 18:15:32
VBS勾选“不显示隐藏的文件和文件夹”

用VBS 怎么写?
二楼的好像不能用哈 我是用记事本复制的

试试我这个
Set ws = WScript.CreateObject("WScript.Shell")

'隐藏已知文件类型,让系统不显示文件后缀名
Val = ws.RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\HideFileExt\CheckedValue", 1,"REG_DWORD" )

'不显示隐藏文件和文件夹,让系统把隐含文件和系统文件都藏起来
Val = ws.RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\NOHIDDEN\CheckedValue", 2,"REG_DWORD" )
Val = ws.RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL\CheckedValue", 1,"REG_DWORD" )

MsgBox "完成"

修改注册表.