有哪些信誉好的足球投注网站- 1、本文档共7页，可阅读全部内容。
- 2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
文件夹创建虚拟盘
本文档提供将文件夹转换成虚拟盘的功能。如下图所示：
使用说明：保存文件为“文件夹虚拟盘.vbs”，双击打开，点“是”安装即可。
安装虚拟盘：右键任意文件夹，可看到【文件夹映射到虚拟盘】字样，点击即可生成虚拟盘。
卸载虚拟盘：右键虚拟盘，点击【文件夹映射到虚拟盘】可弹出卸载提示，点“是”卸载即可。
以下附文件下载地址及其源码。
下载地址：/file/id_19482615899758208.html
文件名：文件夹虚拟盘.vbs
文件源码（复制保存为“文件夹虚拟盘.vbs”即可）：
程序名称：文件夹虚拟盘.vbs
作者：凡帆 [Phanphan] @ 舟子工作室
ＱＱ博客：/phanphan
历史：
2012-02-12: V1.1 增加对虚拟盘的有效性检查功能
2011-05-25~26: V1.0
声明：可自由传播使用，但必须保留本信息
Dim strGUID, strSID, strFolder
Dim tempGUID, tempResponse
Dim tempIcon, tempFolderName, tempFile
Dim tempInputStr, tempTargetFolder,tempCheckResult
Const HKEY_USERS = HKEY_USERS
On Error Resume Next
Set ws = CreateObject(wscript.shell)
Set fso = CreateObject(scripting.filesystemobject)
Const ForReading = 1
----------------------------------------------------------------------------
If wscript.arguments.Count = 0 Then
tempResponse = MsgBox(╒══════════╡ 功能说明 ╞══════════╕ vbCr _
│① 功能：将文件夹映射到虚拟盘，并在[我的电脑]上显示 │ vbCr _
│② 操作：拖放目标文件夹到本VBS文件上 │ vbCr _
│ 或 在目标文件夹上点右键相应菜单项 │ vbCr _
│③ 作用：相当于在[我的电脑]生成目标文件夹的快捷方式 │ vbCr _
│④ 注意：若添加右键菜单后移动或删除了本文件， │ vbCr _
│ 右键功能将失效。请重新安装右键菜单 │ vbCr _
│ │ vbCr _
│ By Phanphan │ vbCr _
╘═══════════════════════════╛ vbCr vbCr _
【右键菜单增强】：按[是]安装；按[否]卸载 vbCr vbCr _
【常见问题】目标文件夹不存在时，如何撤销无效虚拟盘？答：按[取消], 64 + 3, 文件夹虚拟盘)
Select Case tempResponse
Case 2
tempInputStr = InputBox(请输入虚拟盘名称，程序将自动检查其有效性并自动撤销无效虚拟盘。 vbCr 按[确定]后，请耐心等待...)
文档评论（0）