View previous topic :: View next topic |
Author |
Message |
Fafaffy Cheater Reputation: 65
Joined: 12 Dec 2007 Posts: 28
|
Posted: Thu Dec 04, 2008 8:06 pm Post subject: (should be) easy keygen me, winner gets +rep |
|
|
idk i just felt bored, i made a keygen in like 3 minutes so
this should be easy
Just keygen this to get the +rep
have fun
I dont care about it not bein secure and all that crap i just felt bored
_________________
Brillia wrote: | I FUCKING FUCK SEX |
|
|
Back to top |
|
|
Symbol I'm a spammer Reputation: 0
Joined: 18 Apr 2007 Posts: 5094 Location: Israel.
|
Posted: Fri Dec 05, 2008 8:13 am Post subject: |
|
|
Great, a .NET KeygenMe.
Code: | Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Try
Dim str6 As String
Dim text As String = Me.TextBox2.Text
Dim des2 As New Simple3Des(Me.TextBox1.Text)
Dim str3 As String = ""
Dim str7 As String = ""
Try
str7 = des2.DecryptData([text])
If (str7 = Me.TextBox4.Text) Then
goto Label_0085
End If
Interaction.MsgBox("Wrong security question!", MsgBoxStyle.OkOnly, Nothing)
Catch exception1 As CryptographicException
ProjectData.SetProjectError(exception1)
Dim exception As CryptographicException = exception1
Interaction.MsgBox("Wrong Name/Serial!", MsgBoxStyle.OkOnly, Nothing)
ProjectData.ClearProjectError
End Try
Return
Label_0085:
str6 = Me.TextBox1.Text
Dim key As String = str7
str3 = New Simple3Des(key).EncryptData(str6)
If (Me.TextBox3.Text = str3) Then
Interaction.MsgBox("Correct info!", MsgBoxStyle.OkOnly, Nothing)
Else
Interaction.MsgBox("Wrong info!", MsgBoxStyle.OkOnly, Nothing)
End If
Catch exception3 As Exception
ProjectData.SetProjectError(exception3)
Dim exception2 As Exception = exception3
Interaction.MsgBox("Wrong Name/Serial!", MsgBoxStyle.OkOnly, Nothing)
ProjectData.ClearProjectError
End Try
End Sub |
|
|
Back to top |
|
|
Fafaffy Cheater Reputation: 65
Joined: 12 Dec 2007 Posts: 28
|
Posted: Fri Dec 05, 2008 4:46 pm Post subject: |
|
|
Symbol wrote: | Great, a .NET KeygenMe.
Code: | Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Try
Dim str6 As String
Dim text As String = Me.TextBox2.Text
Dim des2 As New Simple3Des(Me.TextBox1.Text)
Dim str3 As String = ""
Dim str7 As String = ""
Try
str7 = des2.DecryptData([text])
If (str7 = Me.TextBox4.Text) Then
goto Label_0085
End If
Interaction.MsgBox("Wrong security question!", MsgBoxStyle.OkOnly, Nothing)
Catch exception1 As CryptographicException
ProjectData.SetProjectError(exception1)
Dim exception As CryptographicException = exception1
Interaction.MsgBox("Wrong Name/Serial!", MsgBoxStyle.OkOnly, Nothing)
ProjectData.ClearProjectError
End Try
Return
Label_0085:
str6 = Me.TextBox1.Text
Dim key As String = str7
str3 = New Simple3Des(key).EncryptData(str6)
If (Me.TextBox3.Text = str3) Then
Interaction.MsgBox("Correct info!", MsgBoxStyle.OkOnly, Nothing)
Else
Interaction.MsgBox("Wrong info!", MsgBoxStyle.OkOnly, Nothing)
End If
Catch exception3 As Exception
ProjectData.SetProjectError(exception3)
Dim exception2 As Exception = exception3
Interaction.MsgBox("Wrong Name/Serial!", MsgBoxStyle.OkOnly, Nothing)
ProjectData.ClearProjectError
End Try
End Sub |
|
So....
_________________
Brillia wrote: | I FUCKING FUCK SEX |
|
|
Back to top |
|
|
nwongfeiying Grandmaster Cheater Reputation: 2
Joined: 25 Jun 2007 Posts: 695
|
Posted: Fri Dec 05, 2008 6:00 pm Post subject: |
|
|
Symbol, did you know that because it had the .NET icon or some other method? If some other method, could you elaborate?
|
|
Back to top |
|
|
Noz3001 I'm a spammer Reputation: 26
Joined: 29 May 2006 Posts: 6220 Location: /dev/null
|
Posted: Fri Dec 05, 2008 6:35 pm Post subject: |
|
|
nwongfeiying wrote: | Symbol, did you know that because it had the .NET icon or some other method? If some other method, could you elaborate? |
|
|
Back to top |
|
|
p99 Master Cheater Reputation: 0
Joined: 21 Jan 2007 Posts: 271
|
Posted: Fri Dec 12, 2008 1:16 pm Post subject: |
|
|
Anyone know Why OllyDBG doesnt find any strings related to the program?
I'd like to try cracking it, but it doesnt help if the program hides its strings from olly 0.0
Looking into it, olly does this with everything .net <.<
_________________
|
|
Back to top |
|
|
sponge I'm a spammer Reputation: 1
Joined: 07 Nov 2006 Posts: 6009
|
Posted: Fri Dec 12, 2008 5:07 pm Post subject: |
|
|
p99 wrote: | Anyone know Why OllyDBG doesnt find any strings related to the program?
I'd like to try cracking it, but it doesnt help if the program hides its strings from olly 0.0
Looking into it, olly does this with everything .net <.< | Learn what .NET is. Don't think strings will save you for everything.
_________________
|
|
Back to top |
|
|
p99 Master Cheater Reputation: 0
Joined: 21 Jan 2007 Posts: 271
|
Posted: Fri Dec 12, 2008 9:44 pm Post subject: |
|
|
About all I know is it converts all of the data to byte code, kinda like a scripted language such as python.
But even so, the strings being used should be saved in the executable shouldn't they?
_________________
|
|
Back to top |
|
|
|