|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Dec 2001
Città: Altidona (AP)
Messaggi: 349
|
Per i Geni dei Visual Basic
Sto scrivendo un programma in visual basic, non vi annoio col dirvi cosa fa. Cmq il problema è che mi serve leggere il NUMERO DI SERIE DELLA CPU; ho letto da qualche parte che ogni cpu dovrebbe averne uno. E' possibile leggerlo tramite software? Se sì, in che modo?
ringrazio tutti ciao |
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Solo sui Pentium 3 (non so sui Pentium 4) è possibile leggere il numero di serie...ma normalmente la possibilità di leggerlo è disabilitata di defaut...
|
|
|
|
|
|
#3 | |
|
Member
Iscritto dal: Jan 2001
Città: PATAVIUM
Messaggi: 280
|
Re: Per i Geni dei Visual Basic
Quote:
Codice:
Public Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" _
(ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, _
ByVal nVolumeNameSize As Long, lpVolumeSerial_Numberber As Long, _
lpMaximumComponentLength As Long, lpFileSystemFlags As Long, _
ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long
Public Const GETDI_SERIAL = 1
Public Const GETDI_LABEL = 2
Public Const GETDI_TYPE = 3
Function GetDriveInfo(strDrive As String, iType As Integer)
Dim Serial_Number As Long
Dim Drive_Label As String
Dim Fat_Type As String
Dim Return_Value As Long
Drive_Label = Space(256)
Fat_Type = Space(256)
Return_Value = GetVolumeInformation(strDrive, Drive_Label, Len(Drive_Label), Serial_Number, 0, 0, Fat_Type, Len(Fat_Type))
GetDriveInfo = CStr(Serial_Number)
End Function
__________________
Salva il Pianeta |
|
|
|
|
|
|
#4 |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Comunque quello non è il numero di serie dell'HD... E' il numero seriale del volume (volume è una qualsiasi parte dell'HD a cui è associata una lettera d'unità)...
Il numero di serie del volume viene associato all'unità al momento della formattazione...quindi formattando l'unità il seriale cambia... |
|
|
|
|
|
#5 | |
|
Member
Iscritto dal: Jan 2001
Città: PATAVIUM
Messaggi: 280
|
Quote:
ma siccome pensavo lo volesse usare per proteggere la sua applicazione e ben difficile trovare 2 serial identici
__________________
Salva il Pianeta |
|
|
|
|
|
|
#6 | |
|
Senior Member
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
|
Quote:
|
|
|
|
|
|
|
#7 |
|
Senior Member
Iscritto dal: Dec 2001
Città: Altidona (AP)
Messaggi: 349
|
Grazie mille Xegallo, effettivamente hai ragione. Farò un pò di tentativi e poi vi faccio sapere!
ciao |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 05:12.



















