完美者（wmzhe.com）网站以软件下载为基础，改版后的网站对功能性板块进行扩充，以期能够解决用户在软件使用过程中遇见的所有问题。网站新增了“软件百科”、“锦囊妙技”等频道，可以更好地对用户的软件使用全周期进行更加专业地服务。
FoldersPopup能够将文件夹添加到快速访问菜单和加快目录树
提供舒适的方法来快速访问经常使用文件夹
而无需在 Windows 资源管理器中的位置的浏览。实际上，它允许你创建你自己的个性化的菜单，其中包含最喜欢和特殊文件夹的快捷方式。
"锦囊妙技"栏目是聚合全网软件使用的技巧或者软件使用过程中各种问题的解答类文章，栏目设立伊始，小编欢迎各路软件大神朋友们踊跃投稿，在完美者平台分享大家的独门技巧。
本站文章素材来源于网络，大部分文章作者名称佚失，为了更利于用户阅读和使用，根据需要进行了重新排版和部分改编，本站收录文章只是以帮助用户解决实际问题为目的，如有版权问题请联系小编修改或删除，谢谢合作。
软件大小：1.04 MB
分类:程序WshShell 对象ProgID Wscript.Shell 文件名 WSHom.Ocx CLSID F935DC22-1CF0-11d0-ADB9-00C04FD58A0B IID F935DC21-1CF0-11d0-ADB9-00C04FD58A0B 下表说明和 WshShell 对象有关的属性。属性 说明 Environment 返回 WshEnvironment 集合对象。 SpecialFolders 使用 WshSpecialFolders 对象提供对 Windows shell 文件夹的访问，如桌面文件夹，开始菜单文件夹和个人文档文件夹。 下表说明和 WshShell 对象有关的方法。方法 说明 CreateShortcut 创建并返回 WshShortcut 对象。 ExpandEnvironmentStrings 扩展 PROCESS 环境变量并返回结果字符串。 Popup 显示包含指定消息的消息窗口。 RegDelete 从注册表中删除指定的键或值。 RegRead 从注册表中返回指定的键或值。 RegWrite 在注册表中设置指定的键或值。 Run 创建新的进程，该进程用指定的窗口样式执行指定的命令。 WshShell.EnvironmentEnvironment 属性返回 WshEnvironment 对象。 语法WshShell.Environment ( [strType]) = objWshEnvironment注释若 strType 指定了环境变量所处的位置，可能值为 "System"、"User"、"Volatile" 和 "Process"。若未提供 strType，则该方法在 Windows NT 中检索系统环境变量或在 Windows 95 中检索进程环境变量。对于 Windows 95，strType 参数仅支持 "Process"。下列变量是由 Windows 操作系统提供的。脚本也可获取由其他应用程序设置的环境变量。名称 说明 NUMBER_OF_PROCESSORS 计算机上运行的处理器数目。 PROCESSOR_ARCHITECTURE 用户工作站使用的处理器类型。 PROCESSOR_IDENTIFIER 用户工作站的处理器 ID。 PROCESSOR_LEVEL 用户工作站的处理器级。 PROCESSOR_REVISION 用户工作站的处理器版本。 OS 用户工作站所用的操作系统。 COMSPEC 用于运行“命令提示”窗口的命令（通常为 cmd.exe）。 HOMEDRIVE 本地主驱动器（通常为 C 驱动器）。 HOMEPATH 用户的默认路径（在 Windows NT 上通常为 usersdefault）。 PATH 路径环境变量。 PATHEXT 可执行文件的扩展名（通常为 .com、 .exe、.bat 或 .cmd）。 PROMPT 命令提示符（通常为 ＄P＄G）。 SYSTEMDRIVE 系统所在的本地驱动器（例如，c:）。 SYSTEMROOT 系统目录（例如，c:winnt）。和 WINDIR 相同。 WINDIR 系统目录（例如 c:winnt）。和 SYSTEMROOT 相同。 TEMP 存储临时文件的目录（例如，c:temp）。用户可更改。 TMP 存储临时文件的目录（例如，c:temp）。用户可更改。 示例'' Retrieve the NUMBER_OF_PROCESSORS system environment variableSet WshShell = Wscript.CreateObject("Wscript.Shell")Set WshSysEnv = WshShell.Environment("SYSTEM")Wscript.Echo WshSysEnv("NUMBER_OF_PROCESSORS")请参阅WshEnvironment 对象WshEnvironment 对象WshEnvironment 对象未直接给出，可用 WshShell.Environment 属性来访问。ProgID N/A 文件名 WSHom.Ocx CLSID IID 下表描述与 WshEnvironment 对象关联的属性。属性 说明 Item 获取或设置指定的环境变量值。 Count 枚举项的数目。 length 枚举项的数目 (JScript)。 下表描述与 WshEnvironment 对象关联的方法。 方法 说明 Remove 删除指定的环境变量。 WshShell.SpecialFoldersSpecialFolders 属性提供 WshSpecialFolders 对象以便访问 Windows 的 shell 文件夹，例如桌面文件夹、开始菜单文件夹和个人文档文件夹。语法WshShell.SpecialFolders = objWshSpecialFolders示例'' This code fragment shows how to access the desktop folderSet WshShell = Wscript.CreateObject("Wscript.Shell")MsgBox "Your desktop is " & WshShell.SpecialFolders("Desktop")请参阅WshSpecialFolders 对象WshSpecialFolders 对象该对象未直接给出。要得到 WshSpecialFolders 对象，请使用 WshShell.SpecialFolders 属性。ProgID N/A 文件名 WSHom.Ocx CLSID IID 下表描述与 WshSpecialFolders 对象关联的属性。 属性 描述 Item 指定文件夹的完整路径（默认）。 Count 枚举项的数目。 length 枚举项的数目 (JScript) 。 WshSpecialFolders.ItemItem 属性返回由 strFolderName 指定的文件夹的完整路径。它是默认属性。语法WshShell.SpecialFolders.Item("strFolderName") = strFolderPathWshShell.SpecialFolders("strFolderName") = strFolderPath注释若请求的文件夹 (strFolderName) 不可用，则 WshShell.SpecialFolders("strFolderName") 返回 NULL。例如，Windows 95 没有 AllUsersDesktop 文件夹，如果 strFolderName = AllUsersDesktop，则返回 NULL。Windows 95 和 Windows NT 4.0 操作系统提供下列指定文件夹： AllUsersDesktopAllUsersStartMenuAllUsersProgramsAllUsersStartupDesktopFavoritesFontsMyDocumentsNetHoodPrintHoodProgramsRecentSendToStartMenuStartupTemplates示例'' This fragment returns the full path for the Windows Desktop folderSet WshShell = Wscript.CreateObject("Wscript.Shell")StrMyDesktop = WshShell.SpecialFolders("Desktop")'' List all special foldersFor Each strFolder In WshShell.SpecialFoldersMsgBox strFolderNext请参阅WshShell.SpecialFolders 属性 WshShell.CreateShortcutCreateShortcut 方法创建 WshShortcut 对象并将其返回。如果快捷方式标题以 .url 结尾，就会创建 WshURLShortcut 对象。语法WshShell.CreateShortcut(strPathname) = objShortcut示例'' This code fragment creates a shortcut '' to the currently executing scriptSet WshShell = Wscript.CreateObject("Wscript.Shell")Set oShellLink = WshShell.CreateShortcut("Current Script.lnk")oShellLink.TargetPath = Wscript.ScriptFullNameoShellLink.SaveSet oUrlLink = WshShell.CreateShortcut("Microsoft Web Site.URL")oUrlLink.TargetPath = "http://www.microsoft.com"oUrlLink.Save请参阅WshShortcut 对象、WshUrlShortcut 对象WshShortcut 对象该对象未直接给出。要获得 WshShortcut 对象，请使用 WshShell.CreateShortcut 方法。ProgID N/A 文件名 WSHom.Ocx CLSID F935DC28-1CF0-11d0-ADB9-00C04FD58A0B IID F935DC27-1CF0-11d0-ADB9-00C04FD58A0B 下表说明和 WshShortcut 对象有关的属性。属性 说明 Arguments 快捷方式对象的参数。 Description 快捷方式对象的说明。 Hotkey 快捷方式对象的热键。 IconLocation 快捷方式对象的图标位置。 TargetPath 快捷方式对象的目标路径。 WindowStyle 快捷方式对象的窗口样式。 WorkingDirectory 快捷方式对象的工作目录。 下表说明与 WshShortcut 对象有关的方法。方法 说明 Save 将快捷方式存储到指定的文件系统中。 WshShortcut.ArgumentsArguments 属性提供快捷方式对象的参数。语法WshShortcut.Arguments = strArgumentsWshShortcut.DescriptionDescription 属性提供快捷方式对象的说明。语法WshShortcut.Description = strDescriptionWshShortcut.HotkeyHotKey 属性提供快捷方式对象的热键。热键是启动或切换程序的键盘快捷方式。语法WshShortcut.HotKey = strHotKey注释strHotKey 的BNF语法如下：Hotkey ::= modifier* keynamemodifier ::= "ALT+" | "CTRL+" | "SHIFT+" | "EXT+"keyname ::= "A" .. "Z" | "0".. "9" | "Back" | "Tab" | "Clear" | "Return" |"Escape" | "Space" | "Prior" | ...所有键的名称都可以在 WINUSER.H 中找到。热键不区分大小写。热键只能激活位于 Windows 桌面或 Windows“开始”菜单的快捷方式。Windows 资源管理器不接受 ESC、ENTER、TAB、SPACE、PRINT SCREEN 或 BACKSPACE，即使 WshShortcut.Hotkey 遵循 Win32 API 支持它们。因此，建议在快捷方式中不要用这些键。示例Set WshShell = Wscript.CreateObject("Wscript.WshShell")strDesktop = WshShell.SpecialFolders("Desktop")Set oMyShortcut = WshShell.CreateShortcut(strDesktop & "a_key.lnk")OMyShortcut.TargetPath = "%windir%notepad.exe"oMyShortCut.Hotkey = "ALT+CTRL+F"oMyShortCut.SaveWscript.Echo oMyShortCut.HotKey = "Alt+Ctrl+F"请参阅WshSpecialFolders 对象WshShortcut.IconLocationIconLocation 属性提供快捷方式对象的图标位置。图标位置的格式应为 "Path,index"。语法WshShortcut.IconLocation = strIconLocationWshShortcut.TargetPathTargetPath 属性提供快捷方式对象的目标路径。语法WshShortcut.TargetPath = strTargetPathWshShortcut.WindowStyleWindowStyle 属性提供快捷方式对象的窗口样式。语法WshShortcut.WindowStyle = natWindowStyleWshShortcut.WorkingDirectoryWorkingDirectory 为一个快捷方式对象提供工作目录。语法WshShortcut.WorkingDirectory = strWorkingDirectoryWshShortcut.SaveSave 方法把快捷方式对象保存到由 FullName 属性指定的位置。语法WshShortcut.SaveWshUrlShortcut 对象该对象未直接给出。要获取 WshUrlShortcut 对象，可使用 WshShell.CreateShortcut 方法。ProgID N/A 文件名 WSHom.Ocx CLSID IID 当前1/2页 12下一页
在VB中，注册表的读写，可以用自身的SaveSetting、GetSetting函数，但它们读写注册表的位置有限；也可以使用API函数来实现注册表任意位置的读写，但使用起来又比较麻烦。其实，利用微软提供的Windows Script Host对象来操作注册表简单且方便得多。 要在程序中使用该对象，先要通过“工程引用”菜单项，把“Windows Script Host Object Modle”一项引用到工程中。如果没有，说明没有安装。可通过下面的方法安装：我的电脑→控制面板→添加/删除程序→安装WINDOWS→附件→Windows scripting host→确定。然后创建注册表操作对象变量WSH，代码为：Set WSH = CreateObject("WScript.Shell")。这样，就可以读写注册表了，其方法、格式和功能描述如下： 1、增加键值：WSH.regWrite "注册表完整路径键值名"，键值，"键值类型" 注：regWrite方法的键值类型常用的有：REG_BINARY（新建或写入二进制值）、REG_DWORD（新建或写入DWORD值）、REG_SZ（新建或写入字符串值）。 2、获取键值：Ret=WSH.RegRead("注册表完整路径键值名") 注：RegRead方法的返回赋给变量Ret。 3、删除键值：WSH.RegDelete "注册表完整路径键值名" 注：RegDelete方法删除一个不存在的键值时要出错，防错方法参见以下代码。 4、弹出消息：WSH.Popup "消息内容" 注：Popup方法和MsgBox的功能差不多，但比MsgBox的功能弱。下面看看注册表操作的实例：创建注册表操作变量 Dim WSH Set WSH = CreateObject("WScript.Shell") 禁用注册表编辑器 WSH.regWrite "HKEY_CURRENT_USERSOFTWAREMicrosoftWindowsCurrentVersionPoliciesSystemDisableRegistryTools", 1, "REG_DWORD" ' 注：如果写入的值1改为0，可解除对注册表编辑器的禁用。查看注册表编辑器是否可用 ret = WSH.RegRead("HKEY_CURRENT_USERSOFTWAREMicrosoftWindowsCurrentVersionPoliciesSystemDisableRegistryTools") If ret = 1 Then WSH.Popup "注册表编辑器被禁用！" Else WSH.Popup "可以使用注册表编辑器！" End If 让程序自动运行 WSH.regWrite "HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRun" + MyName, MyName, "REG_SZ" ' 注：MyName是自动运行程序的文件名（含完整路径） 可以看出，微软提供的这个对象对注册表的操作功能并不弱，著名的“I Love You”病毒，就是利用该对象操作注册表使自己附身在Windows中。除此之外，还可以用该对象来获取系统的一些殊文件夹和环境参数，如：WSH.SpecialFolders("Desktop")可返回桌面文件夹名称；又如：For Each Info In WSH.Environment("rocess"): List1.AddItem Info: Next三行代码可取得系统的环境参数。程序代码在Win98+Vb6环境下调试通过。
