用windows 可以直接点击"工具"--"文件夹选项"--"查看"--在高级设置里选中"显示所有文件和文件夹"便可以了,至于DOS里请问有没有此功能,如果有,又是怎样设置呀!1作者: Michael 时间: 2007-2-23 03:47 dir /a作者: oilio 时间: 2007-2-23 22:46 楼上的这样就可以,/a指所有属性的文件和文件夹,再小小补充一下,如果想分离文件和文件夹,可以用dir /a-d来显示所有的文件,dir /ad显示所有的文件夹。也可以/a后面加其它参数来显示指定属性的文件或文件夹
[ Last edited by oilio on 2007-2-23 at 09:47 AM ]作者: gne3 时间: 2007-2-24 00:44 还是tree命令看到清楚啊!我觉得作者: kpshare 时间: 2007-2-24 02:57 非常感谢你们的回复.但我想说的并不是这个意思,用dir /a是可以显示所有的隐藏文件,但是只能够在命令提示符下显示,而一回到windows文件夹里又不再显示了,我想做的是能像windows那样, 点击了"工具"--"文件夹选项"--"查看"--在高级设置里选中"显示所有文件和文件夹"后便可以看到全部的隐藏文件,且其属性不变,至于DOS,能不能弄个批处理文件来实现呀!
[ Last edited by kpshare on 2007-2-23 at 02:10 PM ]作者: NaturalJ0 时间: 2007-2-24 04:32 你查下注册表的某键,存个 REG 文件就行了。要用双击下。作者: kpshare 时间: 2007-2-24 04:45 哪个键呀,能详细点吗,我有点不太懂呢作者: 0451lym 时间: 2007-2-24 22:25 Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
intAnswer = MsgBox("【是】将“显示/隐藏系统文件”加入到右键菜单,"&Chr(10)&Chr(10)&"【否】将“显示/隐藏系统文件”从右键菜单删除。 ", vbQuestion + vbYesNoCancel, "显示/隐藏系统文件 - zh159@bbs.cn-dos.net")
If intAnswer = vbYes Then
WshShell.RegWrite "HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\SuperHidden\", "{00000000-0000-0000-0000-000000000012}", "REG_SZ"
WshShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\InProcServer32\", "%SystemRoot%\system32\shdocvw.dll", "REG_EXPAND_SZ"
WshShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\InProcServer32\ThreadingModel", "Apartment", "REG_SZ"
WshShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\CLSID", "{3f454f0e-42ae-4d7c-8ea3-328250d6e272}", "REG_SZ"
WshShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\CLSID", "{13709620-C279-11CE-A49E-444553540000}", "REG_SZ"
WshShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\command", "显示系统文件", "REG_SZ"
WshShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\method", "ShellExecute", "REG_SZ"
WshShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\Param1", "SuperHidden.vbs", "REG_SZ"
WshShell.Run "cmd /c copy/y SuperHidden.vbs %windir%\",vbhide
end if
If intAnswer = vbNo Then
WshShell.Run "cmd /c reg delete HKCR\CLSID\{00000000-0000-0000-0000-000000000012} /f",vbhide
WshShell.Run "cmd /c reg delete HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\SuperHidden /f",vbhide
WshShell.Run "cmd /c del/q %windir%\SuperHidden.vbs",vbhide
end if
If intAnswer = vbCancel Then
end if
Set WSHShell = Nothing
WScript.Quit(0)作者: 0451lym 时间: 2007-2-24 22:26 Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
if WSHShell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden") = 1 then