Hardware ID Komputer/Laptop
Tips dan Cara Mengcheck HWID kita Menggunakan Visual Basic 6.0, Cara Melihat HWID kita Menggunakan Visual Basic 6.0, Cara Mengetahui HWID kita Menggunakan Visual Basic 6.0 dengan mudah, cepat dan gampang, Cara Mencari HWID kita Menggunakan Visual Basic 6.0 Software / Tanpa Software.
- TextBox
- Visual Basic 6.0 [ Download VB 6 Disini ]
Tutorial :
1. Letakan 1Text Bernama : MyHWID
2. Masukan Code Berikut Ke Form1 ( Double Klik Pada Form1 / Klik Kanan View Code )
Private Declare Function GetVolumeInformation Lib _
"kernel32.dll" Alias "GetVolumeInformationA" (ByVal _
lpRootPathName As String, ByVal lpVolumeNameBuffer As _
String, ByVal nVolumeNameSize As Integer, _
lpVolumeSerialNumber As Long, lpMaximumComponentLength _
As Long, lpFileSystemFlags As Long, ByVal _
lpFileSystemNameBuffer As String, ByVal _
nFileSystemNameSize As Long) As Long
Function GetSerialNumber(strDrive As String) As Long
Dim SerialNum As Long
Dim Res As Long
Dim Temp1 As String
Dim Temp2 As String
Temp1 = String$(255, Chr$(0))
Temp2 = String$(255, Chr$(0))
Res = GetVolumeInformation(strDrive, Temp1, _
Len(Temp1), SerialNum, 0, 0, Temp2, Len(Temp2))
GetSerialNumber = SerialNum
End Function
Private Sub Form_Load()
MyHWID.Text = GetSerialNumber("C:\") 'Check HWID
End Sub
Sekian dari Saya,
Thanks Udah Mampir..
Semoga Bermanfaat Sobat Master SEO ^_^
Jangan Lupa Tinggalkan Komentar..
Dan Bagikan Artikel ini di Facebook, Twitter, Google+ Anda ya agar terus update.. Terima Kasih..
