mgchl 发表于 2014-12-17 16:16:53

USB关闭工具

#RequireAdmin
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_Icon=C:\WINDOWS\system32\SHELL32.dll
#AutoIt3Wrapper_Outfile=E:\360data\重要数据\桌面\USB开启工具XN(32).exe
#AutoIt3Wrapper_Outfile_x64=E:\360data\重要数据\桌面\USB开启工具XN(64).exe
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_Res_LegalCopyright=公司-IT信息运维
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#Region
#EndRegion
#Region
#EndRegion ;********
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <GuiIPAddress.au3>
Local $usbfile = "",$usbch1 = "",$usbch2 = "",$passwd = ""
;显示关闭等级是全关还是部分开启-开始
If FileExists(@WindowsDir & "\inf\usbstor.inf.ba_") Then
    $usbfile = RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\USBSTOR", "Start")
    If $usbfile = "00000003" Then
        $usbfile = "部分开启"
Else
        $usbfile = "全部关闭"
EndIf
EndIf
If FileExists(@WindowsDir & "\inf\usbstor.inf") Then
        FileMove(@WindowsDir & "\inf\usbstor.inf", @WindowsDir & "\inf\usbstor.inf.ba_")
        FileMove(@WindowsDir & "\inf\usbstor.PNF", @WindowsDir & "\inf\usbstor.PNF.ba_")
    RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\USBSTOR", "Start", "REG_DWORD", "00000004")
        MsgBox(64,"USB","你的主机已经关闭USB设备功能,你将无法使用U盘,如需开启请与IT运维联系",2)

Else
$passwd = InputBox("USB", "输入您的密码,有问题请与IT运维联系。()", "", "*")
If $passwd = "" Then
        MsgBox(16,"错误","密码不能为空,请重新输入")
Else
        If $passwd <> "pass!@#$" Then
        MsgBox(16,"错误","输入的密码错误,请重新输入")
Else       
#Region ### START Koda GUI section ### Form=e:\360data\重要数据\桌面\form1_1.kxf

$Form1_1 = GUICreate("USB-开关-by Mgchl", 265, 232, -1, -1)
GUISetIcon("D:\应用系统\休眠工具.exe", -1)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1_1)
Dim $StatusBar1_PartsWidth =
_GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth)
_GUICtrlStatusBar_SetText($StatusBar1, @TAB & "Mgchl", 0)
_GUICtrlStatusBar_SetText($StatusBar1, @TAB & "公司", 1)
$Group1 = GUICtrlCreateGroup("功能设置", 16, 80, 113, 121)
GUICtrlSetBkColor(-1, 0xC0DCC0)
$Radio1 = GUICtrlCreateRadio("部分开启", 40, 104, 81, 17)
$Radio2 = GUICtrlCreateRadio("全部开启", 40, 133, 81, 17)
$Radio3 = GUICtrlCreateRadio("全部关闭", 40, 164, 81, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("当前状态", 16, 8, 113, 57)
GUICtrlSetColor(-1, 0x008000)
$Label1 = GUICtrlCreateLabel(""&$usbfile, 24, 32, 98, 30, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("确定", 160, 136, 75, 25)
$Button2 = GUICtrlCreateButton("关于", 160, 168, 75, 25)
$Group3 = GUICtrlCreateGroup("友情提示", 144, 8, 105, 105)
GUICtrlSetColor(-1, 0x008000)
$Label2 = GUICtrlCreateLabel("Usb设备默认关闭", 152, 40, 95, 17)
GUICtrlSetColor(-1, 0x000000)
$Label3 = GUICtrlCreateLabel("开通请打IT运维", 152, 64, 86, 17)
GUICtrlSetColor(-1, 0x000000)
$Label4 = GUICtrlCreateLabel("32", 152, 88, 70, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

#Region ### START Koda GUI section ### Form=关于.kxf
$Form_guanyu = GUICreate("关于", 268, 159, -1, -1)
$Label_guanyu_1 = GUICtrlCreateLabel("关于:", 23, 8, 86, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label_guanyu_2 = GUICtrlCreateLabel("USB开启关闭工具", 22, 32, 125, 17)
$Label_guanyu_3 = GUICtrlCreateLabel("作者:Mgchl", 23, 54, 120, 17)
$Label_guanyu_4 = GUICtrlCreateLabel(" Q Q :", 21, 78, 215, 17)
$Label_guanyu_5 = GUICtrlCreateLabel("MAIL:", 23, 101, 213, 17)
$Label_guanyu_6 = GUICtrlCreateLabel("HTTP://", 23, 123, 237, 17)
GUICtrlSetCursor (-1, 4)
$Button3 = GUICtrlCreateButton("功能设置", 184, 8, 75, 25)
GUISetState(@SW_HIDE, $Form_guanyu)
#EndRegion ### END Koda GUI section ###

#Region ### START Koda GUI section ### Form=e:\inf_copy.kxf
$inf_copy = GUICreate("inf_恢复", 410, 236, -1, -1)
$Group1_copy = GUICtrlCreateGroup("文件路径", 32, 24, 257, 121)
$Label1_copy = GUICtrlCreateLabel("INF存放地址:", 51, 56, 81, 17)
$Label2_copy = GUICtrlCreateLabel("用户名:", 80, 80, 52, 17)
$Label3_copy = GUICtrlCreateLabel("密码:", 80, 104, 52, 17)
$IPAddress1_copy = _GUICtrlIpAddress_Create($inf_copy, 136, 56, 130, 21)
_GUICtrlIpAddress_Set($IPAddress1_copy, "0.0.0.0")
$Input1_copy = GUICtrlCreateInput("administrator", 136, 80, 121, 21)
$Input2_copy = GUICtrlCreateInput("", 136, 104, 121, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2_copy = GUICtrlCreateGroup("文件恢复状态", 32, 152, 257, 57)
$Label4_copy = GUICtrlCreateLabel("不文件恢复", 136, 168, 109, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1_copy = GUICtrlCreateButton("恢复", 304, 32, 75, 25)
$Button2_copy = GUICtrlCreateButton("取消", 304, 64, 75, 25)
GUISetState(@SW_HIDE,$inf_copy)
#EndRegion ### END Koda GUI section ###



While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Radio1
                        $usbch1 = "bfkq"
                Case $Radio2
                        $usbch1 = "kq"
      Case $Radio3
                        $usbch1 = "qbgb"
                Case $Button1
                If $usbch1 = "qbgb" Then
                        ;全部关闭
                        FileMove(@WindowsDir & "\inf\usbstor.inf", @WindowsDir & "\inf\usbstor.inf.ba_")
                FileMove(@WindowsDir & "\inf\usbstor.PNF", @WindowsDir & "\inf\usbstor.PNF.ba_")
            RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\USBSTOR", "Start", "REG_DWORD", "00000004")
                Else
                If $usbch1 = "bfkq" Then
                        ;部分开启
                        FileMove(@WindowsDir & "\inf\usbstor.inf", @WindowsDir & "\inf\usbstor.inf.ba_")
                FileMove(@WindowsDir & "\inf\usbstor.PNF", @WindowsDir & "\inf\usbstor.PNF.ba_")
                        RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\USBSTOR", "Start", "REG_DWORD", "00000003")
                Else
                If $usbch1 = "kq" Then
                        ;全部开启
                  FileMove(@WindowsDir & "\inf\usbstor.inf.ba_", @WindowsDir & "\inf\usbstor.inf")
                FileMove(@WindowsDir & "\inf\usbstor.PNF.ba_", @WindowsDir & "\inf\usbstor.PNF")
                RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\USBSTOR", "Start", "REG_DWORD", "00000003")
                Else
                        Exit
        EndIf
    EndIf
    EndIf
                        Exit
                Case $Button2
                        GUISetState(@SW_HIDE, $Form1_1)
                        GUISetState(@SW_SHOW, $Form_guanyu)
                Case $Button3
                        GUISetState(@SW_HIDE, $Form_guanyu)
                        GUISetState(@SW_SHOW, $inf_copy)
                Case $Button1_copy
                        ;Run(@ComSpec &' /k net use \\'&$IPAddress1_copy&'\inf$ "'&$Input2_copy&'" /user:'&$Input1_copy)
                        MsgBox(0,"错误",'功能暂未开通')
                Case $Button2_copy
                        Exit
        EndSwitch
WEnd
EndIf
EndIf
EndIf

mgchl 发表于 2014-12-17 16:18:40

脚本的作用是关闭本机的USB的使用,分了全部关闭和部分关闭,部分关闭就是指在运行此文件之前的U盘可用,否则就都无法使用。

风过无痕 发表于 2015-7-23 10:06:39

谢谢分享 收藏了

Alex_why 发表于 2015-8-2 19:10:36

多谢分享~~~

fqvip2 发表于 2015-8-20 11:59:50

是不是啊 真心需要

jianganew 发表于 2015-8-27 22:28:33

留下脚印,备用。

Tursun 发表于 2016-2-4 18:10:00

能用吗 win7 注册表是什么

zghwelcome 发表于 2016-3-1 16:14:42

谢谢分享,回复收藏备用

netmaple 发表于 2017-8-30 09:52:19

MsgBox(64,"USB","你的主机已经关闭USB设备功能,你将无法使用U盘,如需开启请与IT运维联系",2
页: [1]
查看完整版本: USB关闭工具