fastslz

看看这个
http://bbs.bathome.net/viewthread.php?tid=573&highlight=

devcon.exe disable  USB\Class_08
devcon.exe enable USB\Class_08
复制代码

fastslz

VBScript WMI 对象方法就不说了2000不支持
VBScript Scripting.FileSystemObject 对象方法

Set Fso = CreateObject("Scripting.FileSystemObject")
Set B = Fso.Drives

For Each A in B
    If A.DriveType = 1 Then
       aDisk = aDisk & A.DriveLetter & ": "
    End If
Next
aDisk = Replace(aDisk, "A: ","")
If aDisk = "" Then
   WScript.Echo  "Ｕ盘设备未插入"
   Else
   WScript.Echo "Ｕ盘符为 " & aDisk
End If
复制代码