[vb6- vb.net]conoscere seriale cd-rom/dvd

[marco1970]

allora ho usato questo:

Dim objSet As Object, objItem As Object
    Set objSet = GetObject("winmgmts:").ExecQuery("Select * from Win32_CDROMDrive ")
    For Each objItem In objSet
        If Not objItem.VolumeSerialNumber = "Null" Then
            Debug.Print "VolumeSerialNumber: " & objItem.VolumeSerialNumber
        Else
            Debug.Print "VolumeSerialNumber: "
        End If
    Next 

che mi restituisce credo il numero di partizione del cd che credo si a quasi sempre diverso. Ora il mio problema è che vorrei conoscere il seriale del supporto magnetico prima che esso venga masterizzato o in alternativa conoscere la data di masterizzazione dello stesso.
grazie