| 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 |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
