Mein erstes Crackme

1) Grüne Schrift ist recht ungünstig (für Habo sind mehrere Styles verfügbar - mit hellem Hintergrund lässt sich das nicht gut lesen ;) ).
2)Kennst Du Reflector :) ?
Code: 
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
    If (Me.TextBox1.Text = "1011") Then
        Interaction.MsgBox("Passwort richtig!", MsgBoxStyle.OkOnly, Nothing)
    Else
        Interaction.MsgBox("Passwort falsch!", MsgBoxStyle.OkOnly, Nothing)
    End If
    If (Me.TextBox1.Text = "1011") Then
        Me.Hide
    End If
    If (Me.TextBox1.Text = "1011") Then
        MyProject.Forms.Form2.Show
    End If
End Sub
 
Hi,
nachdem ich das 3. Passwort eingebe kommt ein Error und das Crackme beendet sich...
(getestet unter W7 & WXP)

tcM
 
Omg mein Code! xD

Tut mir leid wegen der grünen Schrift... Bin ein Matrix Fan :D

@CDW Omg ich dachte net das man den Code so einfach sehn kann :D
Hmmm.. Ich programmiere eben mit VB 08 also Design is easy klar und im programmieren bin ich Anfänger -.- Ich kenn Reflector leider net -.- Denke mal es ist ein Programm das den Code verschlüsselt/ schwerer zum herausfinden macht=? Danke für die Antwort

@TC- MaXX Sorry ich hab keine Ahnung wieso da ein Error gekommen ist -.-' Wenns ein Fehler im Code is werde ich mir mehr Mühe geben... :) aber glaub ich nicht.
 
Jep, Reflector ist ein NET decompiler. Man kann sich den Source wahlweise in C#,VB.NET usw. anzeigen lassen.

Zum Fehler: da fehlt wohl irgendeine Komponente:
Meldung:
Code: 
See the end of this message for details on invoking 
just-in-time (JIT) debugging instead of this dialog box.

************** Exception Text **************
System.InvalidOperationException: An error occurred creating the form. See Exception.InnerException for details.  The error is: Could not load file or assembly 'Microsoft.VisualBasic.PowerPacks.Vs, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a' or one of its dependencies. The system cannot find the file specified. ---> System.IO.FileNotFoundException: Could not load file or assembly 'Microsoft.VisualBasic.PowerPacks.Vs, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a' or one of its dependencies. The system cannot find the file specified.
File name: 'Microsoft.VisualBasic.PowerPacks.Vs, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a'
   at Crackme.Form4.InitializeComponent()
   at Crackme.Form4..ctor()

WRN: Assembly binding logging is turned OFF.
To enable assembly bind failure logging, set the registry value [HKLM\Software\Microsoft\Fusion!EnableLog] (DWORD) to 1.
Note: There is some performance penalty associated with assembly bind failure logging.
To turn this feature off, remove the registry value [HKLM\Software\Microsoft\Fusion!EnableLog].

   --- End of inner exception stack trace ---
   at Crackme.My.MyProject.MyForms.Create__Instance__[T](T Instance)
   at Crackme.My.MyProject.MyForms.get_Form4()
   at Crackme.Form3.Button1_Click(Object sender, EventArgs e)
   at System.Windows.Forms.Control.OnClick(EventArgs e)
   at System.Windows.Forms.Button.OnClick(EventArgs e)
   at System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent)
   at System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)
   at System.Windows.Forms.Control.WndProc(Message& m)
   at System.Windows.Forms.ButtonBase.WndProc(Message& m)
   at System.Windows.Forms.Button.WndProc(Message& m)
   at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
   at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
   at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
siehe speziell:
Code: 
The system cannot find the file specified. ---> System.IO.FileNotFoundException: Could not load file or assembly 'Microsoft.VisualBasic.PowerPacks.Vs, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a' or one of its dependencies. The system cannot find the file specified.

File name: 'Microsoft.VisualBasic.PowerPacks.Vs, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a'

at Crackme.Form4.InitializeComponent()
System: Win XP SP3 mit NET 3.0 SP1 ("Runtime", keine SDK - also nur NET Umgebung zum Ausführen der Programme)
 
Ich habe auch die anderen Passwörter aber kann sie durch den Fehler nicht testen....

Für den Anfang erstmal nicht schlecht, aber alles zu sehr hardcoded.

Gruß
tcM

Code: 
1: 1011
2: Crackmepls
3: 123-456-789-101-447-92
4:   if ((((((((this.TextBox1.Text == "jne        019234532_.-.^adw112135exxynynxnmm@@@@") & 
               this.CheckBox1.Checked) & 
               this.CheckBox2.Checked) & 
               this.CheckBox3.Checked) & 
               this.CheckBox4.Checked) & 
               this.CheckBox10.Checked) & 
               this.CheckBox5.Checked) & 
               this.RadioButton4.Checked)

5: if ((((((((((this.TextBox1.Text == "Hackerboard") & 
               (this.TextBox2.Text == "10239576")) & 
               (this.TextBox3.Text == "Neoscreamie Rullez!")) & 
               (this.TextBox4.Text == "Cracking")) & 
               (this.TextBox5.Text == "Hacking")) & 
               (this.TextBox6.Text == "Programming")) & 
               (this.TextBox7.Text == "1010101001010101010101010101002100110010120031010019910108831")) & 
                this.CheckBox1.Checked) & 
                this.CheckBox2.Checked) & 
                this.CheckBox3.Checked)
 
Schade eigentlich, ist ein gutes CrackMe. Wäre nicht schlecht, wenn du noch so ein Schreiben könntest... diesmal bloß einbischen schwerer ;)

Ich Poste mal die Codestellen, die die PWs enthalten. Hab den
"Dis# net Decompiler 3.11" benutzt:

Form1:

bool flag = Operators.CompareString(TextBox1.Text, "1011\uFFFD", false) == 0;
if (flag)
Interaction.MsgBox("Passwort richtig!\uFFFD", MsgBoxStyle.ApplicationModal, null);

Form2:

bool flag = Operators.CompareString(TextBox1.Text, "Crackmepls\uFFFD", false) == 0;
if (flag)
Label3.Text = "Status: Eingeloggt\uFFFD";

Form3:

bool flag = Operators.CompareString(TextBox1.Text, "123-456-789-101-447-92\uFFFD", false) == 0;
if (flag)
Hide();

Form4:

bool flag = (Operators.CompareString(TextBox1.Text, "jne 019234532_.-.^adw112135exxynynxnmm@@@@\uFFFD", false) == 0) & CheckBox1.Checked & CheckBox2.Checked & CheckBox3.Checked & CheckBox4.Checked & CheckBox10.Checked & CheckBox5.Checked & RadioButton4.Checked;
if (flag)
Hide();

Form5:

bool flag = (Operators.CompareString(TextBox1.Text, "Hackerboard\uFFFD", false) == 0) & (Operators.CompareString(TextBox2.Text, "10239576\uFFFD", false) == 0) & (Operators.CompareString(TextBox3.Text, "Neoscreamie Rullez!\uFFFD", false) == 0) & (Operators.CompareString(TextBox4.Text, "Cracking\uFFFD", false) == 0) & (Operators.CompareString(TextBox5.Text, "Hacking\uFFFD", false) == 0) & (Operators.CompareString(TextBox6.Text, "Programming\uFFFD", false) == 0) & (Operators.CompareString(TextBox7.Text, "1010101001010101010101010101002100110010120031010019910108831\uFFFD", false) == 0) & CheckBox1.Checked & CheckBox2.Checked & CheckBox3.Checked;
if (flag)
Hide();

Gruß Wotan
 
bin totaler anfänger...

...in Sachen Crackme lösen.
Da ich mich aber mit VB.net auskenne, dachte ich mir ich löse mal dieses CrackMe. Naja da wie schon gesagt, alles hardcodiert wurde, wars mit dem REFLECTOR nicht schwer bis zur letzten Form zu kommen.

War ganz gut und hat Spaß gemacht, nur weiter so!

Wegen Fehlermeldung: Bei mir gab es keine, naja habe aber auch VB Studio 2008. vl. liegts daran...

mfg fox(fux)
 
Um antworten zu können musst du eingeloggt sein.
Zurück
Oben