Visual Basic 6 - Numero di serie

Forum - Visual Basic 6 - Numero di serie

()
Newbie

Messaggi:
Iscritto:

Postato alle 1:00
Giovedì, 01/01/1970

Salve,
sto facendo un programma che dovrebbe partire solo se è inserita nella porta usb la mia chiavetta.
E' possibile risalire al numero di serie della chiavetta usb inserita, tramite vb6?

Overflow (Normal User)
Expert

Messaggi: 334
Iscritto: 11/01/2008

Postato alle 13:22
Lunedì, 22/09/2008

riesci ad ottenere le informazioni su un drive (come il numero seriale) attraverso la funzione API GetVolumeInformation:

Codice sorgente - presumibilmente VB.NET

Private Declare Function GetVolumeInformation& Lib "kernel32" Alias _
    "GetVolumeInformationA" (ByVal lpRootPathName As String, _
    ByVal pVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, _
    lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, _
    lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, _
    ByVal nFileSystemNameSize As Long)

()
Newbie

Messaggi:
Iscritto:

Postato alle 15:39
Lunedì, 22/09/2008

Mi fai un esempio come applicarlo?

Overflow (Normal User)
Expert

Messaggi: 334
Iscritto: 11/01/2008

Postato alle 17:33
Lunedì, 22/09/2008

segui questo:
http://www.devx.com/vb2themax/Tip/18985