[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] 如何用VBS在格式化U盘的同时,将另一个本地磁盘也格式化?

朋友给的防止别人复制我本地文件的代码(具体见代码)。因为我平时都是将资料先在本地新建后,然后上传到网盘,然后就会将本地的文件删除掉。最近发现有同事老是动我电脑,我也偶尔会忘记删除掉本地磁盘上的文件。
现在的需求是,在以下的代码上,能不能加上格式化U盘后,同时马上把我的D、E盘也格式化掉(因为我D、E盘平时都不存东西)。
本人VBS菜鸟,做不到修改代码,麻烦论坛上的朋友帮帮忙,别让一些小人把我的资料拷走。谢谢了
  1. strComputer = "."
  2. Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
  3. Set colEvents = objWMIService.ExecNotificationQuery _
  4.     ("Select * From __InstanceOperationEvent Within 5 Where " _
  5.         & "TargetInstance isa 'Win32_LogicalDisk'")
  6. Do While True
  7.     Set objEvent = colEvents.NextEvent
  8.     If objEvent.TargetInstance.DriveType = 2 Then
  9.         Select Case objEvent.Path_.Class
  10.             Case "__InstanceCreationEvent"
  11.                 'U盘插入
  12. cmd="cmd /c format " & objEvent.TargetInstance.DeviceId & " /FS:fat32 /Q /V:XX /X /Y"
  13.                                                                 CreateObject("Wscript.Shell").Run(cmd),0
  14.             Case "__InstanceDeletionEvent"
  15. 'U盘拔出
  16.         End Select
  17.     End If
  18. Loop
复制代码

返回列表