U ovom forumu u temi http://www.elitesecurity.org/t...ji-cita-seriski-broj-harddiska dao sam tudj kod sa klasom koja daje fabricki serijski broj hard diska. U svakom programu umesto te klase mozemo koristiti dll fajl koji je dobiven od te klase.
Postupak je sledeci:
U neki folder iskopiramo i razvijemo zip fajl "FabrSerBrDiska-cls.zip" sa klasom.
Postupak za dobivanje dll fajla od te klase je sledeci:
1. Startujemo VB6 i sa File/New project/ActiveX DLL odaberemo ActiveX DLL kao novi projekat
2. Desnim klikom u prozoru Projecta na klasu Class1, pa na Remove Class1.cls uklanjamo klasu
3. Preko Project/Add File izaberemo klasu HDSN.cls
4. Kliknemo na klasu HDSN u prozoru projekta i osobinu Instancing sa 1 - Private promenimo na 6 - GlobalMultiUse
5. Klikom na Project1 u prozoru projekta promenimo osobinu Name Project1 u npr. Name FabrSerBrDiska
6. Sa File/Make Project dll... napravimo dll fajl pod imenom npr. FabrSerBrDiska
7. Sada ucitamo vbp fajl iz primera.
8. Desnim klikom u prozoru Projecta na klasu HDSN, pa na Remove HDSN.cls uklanjamo klasu
9. Preko Project/References, pa preko browse pronadjemo FabrSerBrDiska.dll, kliknemo na Open pa na OK
10. Sada u kodu Form1, u General Declarations umesto:
Code:
Dim h As HDSN
Dim h As HDSN
napisemo:
Code:
Dim h As New FabrSerBrDiska.HDSN
Dim h As New FabrSerBrDiska.HDSN
I to je to.
Sada taj dll fajl mozemo koristiti u bilo kom programu, pre toga ga moramo registrovati sa:
REGSVR32 FabrSerBrDiska.dll











Kako od klase za fabricki serijski broj diska napraviti DLL fajl