Форумы на Хакер

Добро пожаловать! Это — архивная версия форумов на «Хакер.Ru». Она работает в режиме read-only.

помогите взломать програму 1 файл расширение .exe

Пользователи, просматривающие топик: none

Зашли как: Guest

Все форумы >> [Первый вопрос] >> помогите взломать програму 1 файл расширение .exe

Имя

Сообщение

<< Старые топики Новые топики >>

помогите взломать програму 1 файл расширение .exe - 2010-06-26 18:36:32.376666

temp12

Сообщений: 6
Оценки: 0
Присоединился: 2010-06-26 18:04:29.463333

помогите достать ключ

Заранее спасибо за помощь

Post #: 1

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 18:40:35.010000

Flint_ta

Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333

перезалей куда-нить в другое место

Post #: 2

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 18:44:37.633333

temp12

Сообщений: 6
Оценки: 0
Присоединился: 2010-06-26 18:04:29.463333

перезалил обновил ссылки в шапке темы

Post #: 3

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 19:07:18.906666

Flint_ta

Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333

Написано на Microsoft Visual C# / Basic .NET не мое это ((

Обработчик кажется тут


 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Private Sub button3_Click(ByVal sender As Object, ByVal e As System.EventArgs)
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Try
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim streamReader1 As System.IO.StreamReader = New System.IO.StreamReader("c:\WINDOWS\system32\mmc.ini", System.Text.Encoding.GetEncoding(&amp;H4E3))
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim s1 As String = streamReader1.ReadLine()
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; streamReader1.Close()
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim s2 As String = ""
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim chArr1 As Char() = s1.ToCharArray()
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim i1 As Integer = 0
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; While i1 &lt; chArr1.Length
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; chArr1(i1) = CUShort((chArr1(i1) + 7))
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; s2 = System.String.Concat(s2, chArr1(i1))
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; i1 = i1 + 1
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End While
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If s2 = textBox1.Text Then
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim i2 As Integer = 0
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; While i2 &lt; login.get_Count()
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim s3 As String = login.get_Item(i2) + "#" + pass.get_Item(i2)
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim thread1 As System.Threading.Thread = New System.Threading.Thread(New System.Threading.ParameterizedThreadStart(wait))
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; thread1.Start(s3)
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; i2 = i2 + 1
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End While
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Else 
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; System.Windows.Forms.MessageBox.Show("Вы ввели не правильный ключ")
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Catch 
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; System.Windows.Forms.MessageBox.Show("Обратитесь к разработчику")
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End Try
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End Sub

Может кто еще глянет, кто шарит в Microsoft Visual C# / Basic .NET

Post #: 4

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 19:39:45.210000

Flint_ta

Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333

Попробуй создать файл c:\WINDOWS\system32\mmc.ini
запиши в него единицу, в качестве ключа введи 8

Post #: 5

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 19:48:53.753333

temp12

Сообщений: 6
Оценки: 0
Присоединился: 2010-06-26 18:04:29.463333

quote:

Попробуй создать файл c:\WINDOWS\system32\mmc.ini
запиши в него единицу, в качестве ключа введи 8

спасибо программа перестала требовать ключ но мне еще ссылку нужно постоянно менять на анкету а окно неактивно,

Post #: 6

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 20:15:06.663333

Flint_ta

Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333

EditBox можешь активировать с помощью InqSoft Window Scanner, либо можно изменить адрес анкеты прямо в программе если длина одинаковая

Post #: 7

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 20:23:33.293333

temp12

Сообщений: 6
Оценки: 0
Присоединился: 2010-06-26 18:04:29.463333

quote:

InqSoft Window Scanner

Получилось изменить ссылку, давно у меня ета полезная программа. Откраивал .exe редактором mitsar находил ссылку но при сохранении получается совсем нето. Подскажите чем можно редактировать ее?

Post #: 8

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 20:33:53.156666

Flint_ta

Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333

Любым Hex редактором


 0040A504&nbsp; 68 00 74 00 74 00 70 00 73 00 3A 00 2F 00 2F 00&nbsp; https://
 0040A514&nbsp; 73 00 77 00 62 00 6C 00 69 00 66 00 65 00 2E 00&nbsp; swblife.
 0040A524&nbsp; 63 00 6F 00 6D 00 2F 00 70 00 72 00 6F 00 66 00&nbsp; com/prof
 0040A534&nbsp; 69 00 6C 00 65 00 2F 00 73 00 75 00 72 00 76 00&nbsp; ile/surv
 0040A544&nbsp; 65 00 79 00 2F 00 69 00 64 00 2F 00 31 00 33 00&nbsp; ey/id/13
 0040A554&nbsp; 30 00 00 0F 62 00 75 00 74 00 74 00 6F 00 6E 00&nbsp; 0ༀbutton

Post #: 9

RE: помогите взломать програму 1 файл расширение .exe - 2010-06-26 21:05:29.300000

temp12

Сообщений: 6
Оценки: 0
Присоединился: 2010-06-26 18:04:29.463333

Flint_ta премного благодарен за помощь буду тестировать на след неделе.

Post #: 10

RE: помогите взломать програму 1 файл расширение .exe - 2010-07-10 16:01:42.550000

Upsing3

Сообщений: 80
Оценки: 0
Присоединился: 2010-07-09 20:18:00.193333

temp12 ДАЙ АСЮ СВОЮ

Post #: 11

RE: помогите взломать програму 1 файл расширение .exe - 2010-07-10 16:25:57.170000

temp12

Сообщений: 6
Оценки: 0
Присоединился: 2010-06-26 18:04:29.463333

Тему можно закрывать вопрос решен. Всем спасибо

Post #: 12

RE: помогите взломать програму 1 файл расширение .exe - 2010-07-10 16:29:42.776666

Upsing3

Сообщений: 80
Оценки: 0
Присоединился: 2010-07-09 20:18:00.193333

темп ну дай асю нада поговорить плизз

Post #: 13

Страниц: [1]

Все форумы >> [Первый вопрос] >> помогите взломать програму 1 файл расширение .exe

Связаться:
Вопросы по сайту / xakep@glc.ru

Предупреждение: использование полученных знаний в противозаконных целях преследуется по закону.