On this part we need hashgen.dll download it first and copy in c:\windows\system

Example source code how to get four byte hashcode
Code:
Private Declare Function GetHash Lib "hashGen.dll" (ByVal tEncode As String) As Long


Private Sub cmdGen_Click()
Dim Fourbyte As Long
Dim Hashcode As String
Fourbyte = GetHash(txtHstring.Text & txtPassword.Text)
Hashcode = Hex(Fourbyte)
Hashcode = Left(Hashcode, 2) & " " & Mid(Hashcode, 3, 2) & " " & Mid(Hashcode, 5, 2) _
& " " & Right(Hashcode, 2)
txtHashcode.Text = "02 00 CA 00 02 00 00 00 0A 00 01 00 00 00 04 " & Hashcode
End Sub


we will get hashcode on hexa convert it to ascii and we can succes login to mig33 server

1 komentar

  1. Admin // June 30, 2008 at 8:49 AM  

    this is sample hashcode generator
    Click here