Visualizzazione dei risultati da 1 a 7 su 7
  1. #1
    Utente di HTML.it
    Registrato dal
    Feb 2002
    Messaggi
    91

    codice seriale non univico

    Stavo provando, su un mio applicativo fatto in vb6, la funzione GetVolumeInformation. Mi sono accorto che questa funzione restituisce lo stesso numero seriale su pc devirsi. Questo vuol dire che per avere l'univocità sicura di un numero seriale bisogna prendere non quello generato al momento della formattazione ma quello effettivo cioè quello riportato sull'etichetta hardware dell'hard disk?

    grazie

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,472

    Moderazione

    Ho modificato il titolo della discussione aggiungendo il linguaggio di programmazione.

    Ricordati di farlo tu come da Regolamento la prossima volta.

    Ciao!
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  3. #3
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,480
    Sì ... ma io l'avevo detto in un'altra discussione ...

  4. #4

    Re: codice seriale non univico

    Originariamente inviato da GIOFIU
    Questo vuol dire che per avere l'univocità sicura di un numero seriale bisogna prendere non quello generato al momento della formattazione ma quello effettivo cioè quello riportato sull'etichetta hardware dell'hard disk?
    bravo
    Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te

  5. #5
    Utente di HTML.it L'avatar di grendy
    Registrato dal
    Aug 2003
    Messaggi
    338
    fatemi capire bene

    io so sempre fatto cosi per avere il seriale:
    codice:
    Private Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long
    
    Public Function GetSerialNumber(sRoot As String) As Long
      Dim lSerialNum As Long
      Dim R As Long
      Dim sTemp1 As String
      Dim sTemp2 As String
      sTemp1 = String$(255, Chr$(0))
      sTemp2 = String$(255, Chr$(0))
      R = GetVolumeInformation(sRoot, sTemp1, Len(sTemp1), lSerialNum, 0, 0, sTemp2, Len(sTemp2))
      GetSerialNumber = lSerialNum
    End Function
    naturelmente questo lo metto in un modulo e poi chiamo la funzione cosi:
    codice:
    MsgBox GetSerialNumber("c:\")
    che significa che non è univoco???
    «Sono le azioni che contano. I nostri pensieri, per quanto buoni possano essere, sono perle false fintanto che non vengono trasformati in azioni. Sii il cambiamento che vuoi vedere avvenire nel mondo». (Mahatma Gandhi)

  6. #6
    Originariamente inviato da grendy

    che significa che non è univoco???
    che possono essercene infiniti uguali al tuo
    Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te

  7. #7
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,480
    Significa che quella stessa informazione potresti ritrovarla in tanti altri dischi di PC diversi ...

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.