Fermé

Visual Basic Crack

I have a Software and have lost the Key maker for that. i can Provide the source code for the licencing module need to design an executable without changing the original source code. so i can create the keys again.. keys are based on the Machine ID of the system.

Validation source code is attached

Private Sub pv_ValidateKey()

If (Me.m_sRegNo <> Me.m_sMachineReg) Then

Throw New Exception("Key is not valid for this machine")

End If

If Not [url removed, login to view](Me.m_sUsers, Me.m_uiUsers) Then

Throw New Exception("Key has invalid user count")

End If

Dim regString As String = [url removed, login to view]

Dim abModifier As Byte() = [url removed, login to view](regString)

Dim key As Byte() = New Byte() { &HE5, &H16, &H69, &HEC, &HAF, 14, &H7E, &H5C, &H24, &H9E, &H6D, &HF5, &HE1, &H27, &H49, &HD9 }

Me.pv_ApplyModifierToKeyPrim(abModifier, key)

Dim code As UInt32() = Me.pv_InitRegCode(key, [url removed, login to view], [url removed, login to view])

Dim num As UInt64 = [url removed, login to view](Me.m_sRegCode, [url removed, login to view])

code(0) = DirectCast(((num And -4294967296) >> &H20), UInt32)

code(0) = DirectCast((((((code(0) And -16777216) >> &H18) + ((code(0) And &HFF0000) >> 8)) + ((code(0) And &HFF) << &H18)) + ((code(0) And &HFF00) << 8)), UInt32)

code(1) = DirectCast((num And &HFFFFFFFF), UInt32)

code(1) = DirectCast((((((code(1) And -16777216) >> &H18) + ((code(1) And &HFF0000) >> 8)) + ((code(1) And &HFF) << &H18)) + ((code(1) And &HFF00) << 8)), UInt32)

Dim flag As Boolean = Me.pv_IsRegCodeValid(key, code)

Me.m_dtExpiry = Me.pv_GetExpirationDate(key, code)

If Not flag Then

Throw New Exception("Invalid licence key")

End If

Dim numArray2 As UInt32() = Me.pv_InitRegCode(key, [url removed, login to view], Me.m_dtExpiry)

If ((numArray2(0) <> code(0)) OrElse (numArray2(1) <> code(1))) Then

Throw New Exception("Licence key has been changed")

End If

End Sub

Compétences : ASP, Delphi, Visual Basic, Visual Basic pour les apps

Voir plus : visual basic crack, visual design software, hff, has been changed, flag maker, parse a string, HEC, haf, byte, boolean, basic user system, code basic, amp visual basic, crack software code, 504, visual basic amp, datetime, crack software without software, crack software visual, provide key valid, source code crack software, lost source code, need visual basic, system visual basic, flag software

Concernant l'employeur :
( 0 commentaires ) Australia

N° du projet : #1650749

7 freelance ont fait une offre moyenne de 475 $ pour ce travail

lorjnr

let me know more for your project

1000 $ AUD en 7 jours
(6 Commentaires)
3.7
byteSector

Hi, I can guarantee you quality work. Please seem pm for more details. Thank you.

275 $ AUD en 3 jours
(2 Commentaires)
3.6
nhanphanmem

Hi. I can do this for you. Can you accept my offer,please! And we start work now.

300 $ AUD en 3 jours
(0 Commentaires)
0.0
PaulZibot

Please check my PM

500 $ AUD en 5 jours
(0 Commentaires)
0.0
crackmajor

Hello, i can do it

250 $ AUD en 1 jour
(0 Commentaires)
0.0
webspaceit

We are interested.

500 $ AUD en 10 jours
(0 Commentaires)
0.0
pandyarushi

I can do that for you, even is past i do something like this ones, lets talk and start working on it ...

500 $ AUD en 4 jours
(0 Commentaires)
0.0