关机时提醒别忘拔U盘关机时提醒别忘拔U盘
如果你电脑要经常使用U盘, 又会忘记拔走, 那你可以使用提示电脑关机时自动卸载U盘~ 是否经常在网吧上网下机时却忘了带走你心爱的U盘呢~下面告诉你让你程序提示你自动卸载U盘吧~(此版本绝对能用,根据网上的版本改的 网上有不少符号不对的,无法使用。)
最恐怖到该是上了飞机发现U盘没带。555 flying….
总共有3步,别漏了。
第一步:首先在记事本程序中输入以下内容
(所有符号为全英文半角符号切换到英文输入法模式下):
On error resume next
Dim fso,d,dc,f...
关机时提醒别忘拔U盘
如果你电脑要经常使用U盘, 又会忘记拔走, 那你可以使用提示电脑关机时自动卸载U盘~ 是否经常在网吧上网下机时却忘了带走你心爱的U盘呢~下面告诉你让你程序提示你自动卸载U盘吧~(此版本绝对能用,根据网上的版本改的 网上有不少符号不对的,无法使用。)
最恐怖到该是上了飞机发现U盘没带。555 flying….
总共有3步,别漏了。
第一步:首先在记事本程序中输入以下
(所有符号为全英文半角符号切换到英文输入法模式下):
On error resume next
Dim fso,d,dc,f
Set fso = 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盘或移动硬盘,系统就会弹出警告框提示你了~
(程序中汉字为提醒时显示字符随便改都行。)
怎么样,很简单吧,试试看~
---以下复制为文本文件 保存为C盘根目录下,并取名为USBDISK.vbs --- On error resume next
Dim fso,d,dc,f
Set fso = 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
本文档为【关机时提醒别忘拔U盘】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑,
图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。