Инструменты пользователя

Инструменты сайта


usb_cleaner_vbs

Различия

Здесь показаны различия между двумя версиями данной страницы.

Ссылка на это сравнение

usb_cleaner_vbs [2018/02/17 19:08] (текущий)
sector создано
Строка 1: Строка 1:
 +USB cleaner VBS
  
 +<code ini| title>
 +Wscript.Echo "USB cleaner Запущен"​
 +Set objWMIService = GetObject("​winmgmts:​\\.\root\CIMV2"​)
 +Set objEvents = objWMIService.ExecNotificationQuery ("​SELECT * FROM __InstanceCreationEvent WITHIN 5 WHERE TargetInstance ISA '​Win32_LogicalDisk'​ AND TargetInstance.DriveType = 2")
 +Set objFS = CreateObject("​Scripting.FileSystemObject"​)
 +Do
 +    Set objReceivedEvent = objEvents.NextEvent
 +    strPath = objFS.BuildPath(objReceivedEvent.TargetInstance.Caption,​ "​\"​)
 +    If objFS.FolderExists(strPath) Then
 +        On Error Resume Next
 +        Set objFolder = objFS.GetFolder(strPath)
 +        If Err.Number = 0 Then
 +            For Each objItem In objFolder.SubFolders
 +                If objItem.Attributes And 2 Then objItem.Attributes = objItem.Attributes - 2
 +                If Err.Number <> 0 Then Err.Clear
 +            Next
 +            For Each objItem In objFolder.Files
 +                If objItem.Attributes And 2 Then objItem.Attributes = objItem.Attributes - 2
 +                If Err.Number <> 0 Then Err.Clear
 +            Next
 + For Each File in objFolder.Files
 + If LCase(objFS.GetExtensionName(File)) = "​lnk"​ Then
 + File.Delete true
 + End If
 + Next
 + For Each File in objFolder.Files
 + If LCase(objFS.GetExtensionName(File)) = "​nil"​ Then
 + File.Delete true
 + End If
 + Next
 + For Each File in objFolder.Files
 + If LCase(objFS.GetExtensionName(File)) = "​inf"​ Then
 + File.Delete true
 + End If
 + Next
 + For Each File in objFolder.Files
 + If LCase(objFS.GetFileName(File)) = "​autorun.exe"​ Then
 + File.Delete true
 + End If
 + Next
 + Else
 +            Err.Clear
 +        End If
 +        Set objItem = Nothing: Set objFolder = Nothing
 +    End If
 +    Wscript.Echo "USB флешка успешно очищена"​
 +Loop
 +</​code>​
usb_cleaner_vbs.txt · Последние изменения: 2018/02/17 19:08 — sector

Яндекс.Метрика