首页 > 课堂 > 电脑知识 > 正文

自己制作U盘卸载小工具

2024-05-08 15:41:34
字体:
来源:转载
供稿:网友

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

  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盘或移动硬盘,系统就会弹出警告框提示你了!怎么样,很简单吧,试试看!


发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表