Rilevare un lettore MP3

sabato 15 luglio 2006 - 20.14

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

forno Profilo | Junior Member

71 messaggi | Data Invio: sab 15 lug 2006 - 20:14

Ciao a tutti, ho creato un'applicazione che richiede l'inserimento di un lettore MP3 all'avvio. Vorrei Sapere se esiste un modo per verificare che il lettore sia inserito e connesso al pc e sapere con quale lettera il pc lo identifica (E:, F:, ...).

Come posso fare?
Grazie
Enrico Fornasier

revontulet Profilo | Junior Member

106 messaggi | Data Invio: lun 17 lug 2006 - 14:40

ciao
il modo piu' semplice che conosco e quello di usare WMI ( i.e. prova in uno script vbs)

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_LogicalDisk", "WQL")

For Each objItem In colItems
if objitem.description = "Removable Disk" then

WScript.Echo "Access: " & objItem.Access
WScript.Echo "Availability: " & objItem.Availability
WScript.Echo "BlockSize: " & objItem.BlockSize
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "Compressed: " & objItem.Compressed
WScript.Echo "ConfigManagerErrorCode: " & objItem.ConfigManagerErrorCode
WScript.Echo "ConfigManagerUserConfig: " & objItem.ConfigManagerUserConfig
WScript.Echo "CreationClassName: " & objItem.CreationClassName
WScript.Echo "Description: " & objItem.Description
WScript.Echo "DeviceID: " & objItem.DeviceID
WScript.Echo "DriveType: " & objItem.DriveType
WScript.Echo "ErrorCleared: " & objItem.ErrorCleared
WScript.Echo "ErrorDescription: " & objItem.ErrorDescription
WScript.Echo "ErrorMethodology: " & objItem.ErrorMethodology
WScript.Echo "FileSystem: " & objItem.FileSystem
WScript.Echo "FreeSpace: " & objItem.FreeSpace

WScript.Echo "MediaType: " & objItem.MediaType
WScript.Echo "Name: " & objItem.Name
WScript.Echo "NumberOfBlocks: " & objItem.NumberOfBlocks
WScript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
WScript.Echo "Size: " & objItem.Size
WScript.Echo "Status: " & objItem.Status
WScript.Echo "StatusInfo: " & objItem.StatusInfo
WScript.Echo "SupportsDiskQuotas: " & objItem.SupportsDiskQuotas
WScript.Echo "SupportsFileBasedCompression: " & objItem.SupportsFileBasedCompression
WScript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
WScript.Echo "SystemName: " & objItem.SystemName
WScript.Echo "VolumeDirty: " & objItem.VolumeDirty
WScript.Echo "VolumeName: " & objItem.VolumeName
WScript.Echo "VolumeSerialNumber: " & objItem.VolumeSerialNumber
end if
Next

Purtroppo la funzione ti risponde per ogni disco removibile connesso e molti dei campi indicati sono vuoti ( come del resto si vede in esplora risorse )comunque in objitem.name e in caption c'e' la lettera di unita'
puoi provare a vedere in base ai valori di risposta se c'e' qualcosa che puo' servire per identificare univocamente il lettore mp3.

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !