ник: час
Определить флэшку - самый простой способ
Dim obj, objs, s
Set objs = GetObject("winmgmts:").InstancesOf("Win32_DiskDrive")
For Each obj In objs
If obj.InterfaceType = "USB" Then
s = obj.InterfaceType & " " & obj.PnPDeviceID & " " & obj.Name & " " & obj.Type
MsgBox s
End If
Next
|
А как в этом коде определить имя тома илли букву флэшки?