自己制作U盘卸载小工具

王朝学院·作者佚名  2016-06-24
窄屏简体版  字體: |||超大  

一、首先在记事本程序中输入以下内容:

On error resume next

Dim fso, d,dc,f

Set fos = CreateObject(“Scripting.FileSystemObject”)

Set dc = fso,Drives

For Each d in dc

Set f = fso.GetFile(d &”请带我回家.txt”)

If left(f,2)=d then msgbox “我是您的:”&d&”盘,请带我回家!”,vbcritical,”主人:您好!”

Next

输入好后,把文件保存在C盘根目录下,并取名为USBDISK..vbs.

二、点击“开始—运行”,

输入“gpedit.msc”,按回车键,打开组策略编辑器。

依次展开“计算机配置—Windows设置—脚本(启动/关机)”,

双击打开“关机”项,再点击“添加”,选择添加前面保存在C盘的USBDISK..vbs文件,确定后退出组策略编辑器。

三、在需要关机时随身带走你的U盘或移动硬盘的要目录中,建立一个文件名为“请带我回家.txt”的文本文件。以后,如果你关机时没有拔出U盘或移动硬盘,系统就会弹出警告框提示你了!怎么样,很简单吧,试试看!

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航