General: Lecture du nom du disque |
Author(s) Dev Ashish |
|
Lecture du nom du disque.
(Q) Comment puis-je obtenir le nom d'un disque (Volume Label)?
(A) La plupart des réponses, incluant la mienne, suggéraient d'utiliser la
fonction API GetVolumeInformationA.
Toutefois, comme Paul van Goudoever
me le mentionnait en réponse à un de mes messages, si rien d'autre que le nom
n'est cherché, utiliser plutôt la fonction Dir:
?Dir("C:",vbVolume)
Voilà!
Et quand à y être, oui, cette valeur change à chaque fois que votre disque
est formaté. Il n'y a pas de moyen que je connaisse, en VBA, de retrouver le
numéro de série du BIOS. Oui, utiliser cette technique comme protection contre
le copiage créera de bons cauchemars à vos usagers.
<rant>
Je crois fermement que n'importe quelle scénario de protection anti copie
génèrera des appels de support et conduira certains de vos clients à vous
retourner votre logiciel, pour demeurer diplomatique, disons. Si vous devez
prévenir l'anti-piratage, un dongle (bidule matériel s'accrochant au port
série) est probablement la meilleure protection. Garder à l'esprit qu'un
schéma de protection contre le copiage peut et sera craqué.
</rant>
|