f&n电脑维护工具箱0826 【比较强的工具箱，哈哈！】

water197 · 发表于 2010-9-2 09:29:40

ddddddddddddddddddddddddddddd

h20040606 · 发表于 2010-9-2 21:50:17

非常不错的程序

saruman · 发表于 2010-9-2 23:55:48

朗读时一个亮点，，，，

dunniu · 发表于 2010-9-3 00:27:24

的确功能很多啊

shenrenba · 发表于 2010-9-3 09:09:08

添加显示/隐藏文件和后缀功能到右键这个应该加上经常用的我自己用的工具箱中的代码

Case $Button37
                        GUICtrlSetState($Button37,$GUI_DISABLE)
                        If GUICtrlRead($Button37)="添加显示隐藏" Then 
                                FileInstall("SuperHidden.vbs",@WindowsDir&"\SuperHidden.vbs")
                                RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Directory\Background\shellex\ContextMenuHandlers\SuperHidden", "", "Reg_sz", "{00000000-0000-0000-0000-000000000022}")
                            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}\InProcServer32", "", "Reg_Expand_sz", "%SystemRoot%\system32\shdocvw.dll")
                            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}\InProcServer32", "ThreadingModel", "Reg_sz", "Apartment")
                            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}\Instance", "CLSID", "Reg_sz", "{3f454f0e-42ae-4d7c-8ea3-328250d6e272}")
                            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}\Instance\InitPropertyBag", "method", "Reg_sz", "ShellExecute")
                            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}\Instance\InitPropertyBag", "Param1", "Reg_sz", "SuperHidden.vbs")
                            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}\Instance\InitPropertyBag", "command", "Reg_sz", "显示/隐藏文件和后缀")
                            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}\Instance\InitPropertyBag", "CLSID", "Reg_sz", "{13709620-C279-11CE-A49E-444553540000}")
                            RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "ShowSuperHidden", "Reg_Dword", "0x00000000")
                            RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "Hidden", "Reg_Dword", "0x00000002")                        
                                RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","HideFileExt","Reg_Dword","0x00000001")
                                DllCall("user32.dll","int","SendMessageTimeout","hwnd",65535,"int",26,"int",0,"int",0,"int",0,"int",1000,"str","dwResult")
                                GUICtrlSetData($Button37,"删除显示隐藏")
                                MsgBox(64,"提示","已添加显示/隐藏文件和后缀功能到右键，从右键执行")
                        ElseIf GUICtrlRead($Button37)="删除显示隐藏" Then
                                RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00000000-0000-0000-0000-000000000022}")
                                RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Directory\Background\shellex\ContextMenuHandlers\SuperHidden")
                                RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "ShowSuperHidden", "Reg_Dword", "0x00000000")
                            RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "Hidden", "Reg_Dword", "0x00000002")                        
                                RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","HideFileExt","Reg_Dword","0x00000001")
                                DllCall("user32.dll","int","SendMessageTimeout","hwnd",65535,"int",26,"int",0,"int",0,"int",0,"int",1000,"str","dwResult")
                                If FileExists(@WindowsDir&"\SuperHidden.vbs") Then FileDelete(@WindowsDir&"\SuperHidden.vbs")
                                GUICtrlSetData($Button37,"添加显示隐藏")
                                MsgBox(64,"提示","显示/隐藏文件和后缀功能已从右键删除")
                        EndIf
                        GUICtrlSetState($Button37,$GUI_ENABLE)

menfan1 · 发表于 2010-9-3 10:18:35

因为nircmd强大哈

23070205 · 发表于 2010-9-3 13:19:39

回复 20# shenrenba

谢谢，提供这个功能，我已经有了一个vbs的显示隐藏和显示的脚本。等以后更新时，会加入这个功能的，还有右键用记事本打开，一键到dos，一键关闭ide等。

zhenglei · 发表于 2010-9-3 15:04:23

ddddddddddddddddddddddddddddddddddddddddddddddddd

Valentina · 发表于 2010-9-3 15:34:48

功能不错啊，呵呵

殇·愚 · 发表于 2010-9-4 01:51:26

好东西啊.... 谢谢LZ

jasonc2000 · 发表于 2010-9-4 11:32:46

非常不错，支持一下

火易 · 发表于 2010-9-4 20:11:33

辛苦了！
好像是很强大啊，

雪栀 · 发表于 2010-9-5 08:01:19

很强大啊，我下载看看

爬爬虫 · 发表于 2010-9-5 14:32:52

强，需要收藏啦！

xiezhang6263 · 发表于 2010-9-5 17:17:06

谢谢，看到精品了

		自动登录	找回密码
密码			加入

[原创] f&n电脑维护工具箱0826 【比较强的工具箱，哈哈！】

评分