1:
First get a website you can host two files on, like 000webhos*****m.
2:
This is a VB.net code, make sure you have add reference to System.Management.dll
Code:
Imports System.Management
Imports System.Net
Public Class Form1
Public cpuInfo As String = String.Empty
Public hwid As String = cpuInfo
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim wr As New WebClient
Dim mc As New ManagementClass("win32_processor")
Dim moc As ManagementObjectCollection = mc.GetInstances()
For Each mo As ManagementObject In moc
If cpuInfo = "" Then
cpuInfo = mo.Properties("processorID").Value.ToString()
Exit For
End If
Next
hwid = cpuInfo
Dim url = wr.DownloadString("https://YOURWEBSITE.com/HID3.php?id=" & hwid)
Dim parts = Split(url, "|", , CompareMethod.Text)
If Not parts(0) = "OK" Then
MsgBox("Bad HWID verification, application will close")
Application.Exit()
End If
wr.Dispose()
End Sub
End Class
Now you got a application to check if your hardware id is registered!
3:
Lets do some PHP programming.
<?php
if ($_GET['id'] != ''){
$puntero = fopen('HID3.txt', 'r');
while(!feof($puntero)){
$base = explode('|', fgets($puntero));
if($base[0] == $_GET['id']){
fclose($puntero);
$checksum = 0;
for ($i=24; $i<35; $i++) {
$checksum += $_GET['id']{$i} * $i;
}
echo 'OK|'.$base[1].'|'.$checksum;
exit;
}
}
fclose($puntero);
echo "<error>ERROR</error>";
}else{
echo "<error>ERROR</error>";
}
?>
Create a new php-file and paste this in and save it as: HID3.php
4:
Create a textfile and paste this in:
Code:
HWID|Member| Comment.
Save it as: HID3.txt and upload to your website.
If you want to add more hardware id's to textfile do this:
Code:
HWID|Member| Comment.
HWID|Member| Comment.
HWID|Member| Comment.
Just add more lines below each other!
To get your hardware id, use this vb.net code
Code:
Imports System.Management
Dim cpuInfo As String = String.Empty
Dim mc As New ManagementClass("win32_processor")
Dim moc As ManagementObjectCollection = mc.GetInstances()
For Each mo As ManagementObject In moc
If cpuInfo = "" Then
cpuInfo = mo.Properties("processorID").Value.ToString()
Exit For
End If
Next
TextBox1.Text = cpuInfo
Credits:
ColdIce
Me
Have Fun!