一、首先在記事本程序中輸入以下內(nèi)容：

　　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設(shè)置—腳本(啟動/關(guān)機)”，

　　雙擊打開“關(guān)機”項，再點擊“添加”，選擇添加前面保存在C盤的USBDISK..vbs文件，確定后退出組策略編輯器。

　　三、在需要關(guān)機時隨身帶走你的U盤或移動硬盤的要目錄中，建立一個文件名為“請帶我回家.txt”的文本文件。以后，如果你關(guān)機時沒有拔出U盤或移動硬盤，系統(tǒng)就會彈出警告框提示你了!怎么樣，很簡單吧，試試看!