Сейчас на форуме: asfa, _MBK_, Adler (+8 невидимых)

 eXeL@B —› Вопросы новичков —› Проверка Ключа
Посл.ответ Сообщение

Ранг: 88.2 (постоянный), 58thx
Активность: 0.11↘0.04
Статус: Участник

 Создано: 24 декабря 2012 15:14
· Личное сообщение · #1

программа .net
Code:
  1. Private Function getPageSource(ByVal URL As String) As String
  2.     Dim str As String
  3.     Dim reader As StreamReader
  4.     Dim str2 As String
  5.     Dim client As WebClient
  6.     Dim str3 As String
  7.     Dim strArray As String()
  8.     str = ""
  9. Label_0006:
  10.     Try 
  11.         reader = New StreamReader((Environment.GetFolderPath(&H1A) & "\xProtecttemp.txt"))
  12.         str = reader.ReadToEnd.Trim
  13.         reader.Close
  14.         goto Label_0034
  15.     Catch obj1 As Object
  16.     Label_0031:
  17.         goto Label_0034
  18.     End Try
  19. Label_0034:
  20.     str2 = String.Empty
  21.     client = New WebClient
  22.     str3 = String.Concat(New String() { URL, "/xprotect/login.php?&user=", Me.hwid, "&extras=", str })
  23. Label_0077:
  24.     Try 
  25.         str2 = client.DownloadString(str3)
  26.         goto Label_0085
  27.     Catch obj2 As Object
  28.     Label_0082:
  29.         goto Label_0085
  30.     End Try
  31. Label_0085:
  32.     client.Dispose
  33.     Return str2
  34. End Function
  35.  
  36.  

Где тут ответ true




Ранг: 392.8 (мудрец), 108thx
Активность: 0.26↘0.01
Статус: Участник
REVENGE сила, БеХоЦе могила

 Создано: 24 декабря 2012 15:19 · Поправил: Maximus
· Личное сообщение · #2

Тут нет, но видимо на выходе из этой функи есть проверка (если это конечно функция проверки реги)
Если это все таки функция проверки, то надо просто вернуть str2 как в зарегенной версии.

-----
StarForce и Themida ацтой!

Ранг: 441.3 (мудрец), 297thx
Активность: 0.41↘0.04
Статус: Участник

 Создано: 24 декабря 2012 15:19
· Личное сообщение · #3

Private Function getPageSource(ByVal URL As String) As String

Декларация функции как бы намекает что вернётся String, а не Boolean



Ранг: 88.2 (постоянный), 58thx
Активность: 0.11↘0.04
Статус: Участник

 Создано: 24 декабря 2012 15:23 · Поправил: Mishar_Hacker
· Личное сообщение · #4

Maximus
Значит вернёт строку и все?
tihiy_grom
а как сделать чтобы все ровно работала?)

Вот правильный ответ
Drive0:mPSdokbOSIdj:15-12-2012



Ранг: 617.3 (!), 677thx
Активность: 0.54↘0
Статус: Участник

 Создано: 24 декабря 2012 15:29
· Личное сообщение · #5

пропатчить на
Try
str2 = "работай ровно"
goto Label_0085
Catch obj2 As Object

а там какая строка должна быть разбирайся сам




Ранг: 392.8 (мудрец), 108thx
Активность: 0.26↘0.01
Статус: Участник
REVENGE сила, БеХоЦе могила

 Создано: 24 декабря 2012 15:31
· Личное сообщение · #6

Code:
  1. Try 
  2. str2 = "Drive0:mPSdokbOSIdj:15-12-2012"
  3. goto Label_0085
  4. Catch obj2 As Object


-----
StarForce и Themida ацтой!

Ранг: 88.2 (постоянный), 58thx
Активность: 0.11↘0.04
Статус: Участник

 Создано: 24 декабря 2012 15:42 · Поправил: Mishar_Hacker
· Личное сообщение · #7

Спасибо всем
Только вот не могу догнать
помогите или допините)
Работаю в reflector
Редактором
reflexil 1.5
или есть другие программы?

Не могу изменить

Code:
  1. .method private hidebysig instance string getPageSource(string URL) cil managed
  2. {
  3.     .maxstack 3
  4.     .locals init (
  5.         [0] string str,
  6.         [1] class [mscorlib]System.IO.StreamReader reader,
  7.         [2] string str2,
  8.         [3] class [System]System.Net.WebClient client,
  9.         [4] string str3,
  10.         [5] string[] strArray)
  11.     L_0000: ldstr ""
  12.     L_0005: stloc.0 
  13.     L_0006: ldc.i4.s 0x1a
  14.     L_0008: call string [mscorlib]System.Environment::GetFolderPath(valuetype [mscorlib]System.Environment/SpecialFolder)
  15.     L_000d: ldstr "\xProtecttemp.txt"
  16.     L_0012: call string [mscorlib]System.String::Concat(string, string)
  17.     L_0017: newobj instance void [mscorlib]System.IO.StreamReader::.ctor(string)
  18.     L_001c: stloc.1 
  19.     L_001d: ldloc.1 
  20.     L_001e: callvirt instance string [mscorlib]System.IO.TextReader::ReadToEnd()
  21.     L_0023: callvirt instance string [mscorlib]System.String::Trim()
  22.     L_0028: stloc.0 
  23.     L_0029: ldloc.1 
  24.     L_002a: callvirt instance void [mscorlib]System.IO.TextReader::Close()
  25.     L_002f: leave.s L_0034
  26.     L_0031: pop 
  27.     L_0032: leave.s L_0034
  28.     L_0034: ldsfld string [mscorlib]System.String::Empty
  29.     L_0039: stloc.2 
  30.     L_003a: newobj instance void [System]System.Net.WebClient::.ctor()
  31.     L_003f: stloc.3 
  32.     L_0040: ldc.i4.5 
  33.     L_0041: newarr string
  34.     L_0046: stloc.s strArray
  35.     L_0048: ldloc.s strArray
  36.     L_004a: ldc.i4.0 
  37.     L_004b: ldarg.1 
  38.     L_004c: stelem.ref 
  39.     L_004d: ldloc.s strArray
  40.     L_004f: ldc.i4.1 
  41.     L_0050: ldstr "/xprotect/login.php?&user="
  42.     L_0055: stelem.ref 
  43.     L_0056: ldloc.s strArray
  44.     L_0058: ldc.i4.2 
  45.     L_0059: ldarg.0 
  46.     L_005a: ldfld string xProtect.Form1::hwid
  47.     L_005f: stelem.ref 
  48.     L_0060: ldloc.s strArray
  49.     L_0062: ldc.i4.3 
  50.     L_0063: ldstr "&extras="
  51.     L_0068: stelem.ref 
  52.     L_0069: ldloc.s strArray
  53.     L_006b: ldc.i4.4 
  54.     L_006c: ldloc.0 
  55.     L_006d: stelem.ref 
  56.     L_006e: ldloc.s strArray
  57.     L_0070: call string [mscorlib]System.String::Concat(string[])
  58.     L_0075: stloc.s str3
  59.     L_0077: ldloc.3 
  60.     L_0078: ldloc.s str3
  61.     L_007a: callvirt instance string [System]System.Net.WebClient::DownloadString(string)
  62.     L_007f: stloc.2 
  63.     L_0080: leave.s L_0085
  64.     L_0082: pop 
  65.     L_0083: leave.s L_0085
  66.     L_0085: ldloc.3 
  67.     L_0086: callvirt instance void [System]System.ComponentModel.Component::Dispose()
  68.     L_008b: ldloc.2 
  69.     L_008c: ret 
  70.     .try L_0006 to L_0031 catch object handler L_0031 to L_0034
  71.     .try L_0077 to L_0082 catch object handler L_0082 to L_0085
  72. }
  73.  
  74.  

Ранг: 7.7 (гость), 3thx
Активность: 0.01↘0
Статус: Участник

 Создано: 24 декабря 2012 18:56
· Личное сообщение · #8

Я в этом плане люблю хардкор: ILDasm + Notepad + ILAsm



Ранг: 512.7 (!), 360thx
Активность: 0.27↘0.03
Статус: Модератор

 Создано: 24 декабря 2012 18:57
· Личное сообщение · #9

Mishar_Hacker пишет:
или есть другие программы?Не могу изменить

SAE

| Сообщение посчитали полезным: Mishar_Hacker

Ранг: 7.7 (гость), 3thx
Активность: 0.01↘0
Статус: Участник

 Создано: 24 декабря 2012 19:07
· Личное сообщение · #10

Code:
  1. L_0000: ldstr ""
  2. L_0005: stloc.0 
  3. L_0007: <b>leave.s L_0077</b>
  4. L_0008: ldc.i4.s 0x1a
  5. ...
  6. L_0077: ldloc.3 
  7. L_0078: ldloc.s str3
  8. L_007a: ldstr "Drive0:mPSdokbOSIdj:15-12-2012"
  9. L_007f: stloc.2 
  10. L_0080: leave.s L_0085


Что-то вроде, но может путаю

| Сообщение посчитали полезным: Mishar_Hacker

Ранг: 88.2 (постоянный), 58thx
Активность: 0.11↘0.04
Статус: Участник

 Создано: 24 декабря 2012 22:32 · Поправил: Mishar_Hacker
· Личное сообщение · #11

URTeam
Не пашет походу уже заблокали ключик
А вопрос как сделать чтобы любой ключ принимал
Я думаю так правильно или нет?
Code:
  1. Try 
  2.         str2 =  str2 
  3.         goto Label_0085
  4.     Catch obj2 As Object
  5.     Label_0082:
  6.         goto Label_0085
  7.     End Try
  8. Label_0085:
  9.     client.Dispose
  10.     Return str2
  11. End Function

sendersu
Спасибо



Ранг: 7.7 (гость), 3thx
Активность: 0.01↘0
Статус: Участник

 Создано: 25 декабря 2012 00:15
· Личное сообщение · #12

Mishar_Hacker, давай ссылку на "подопытного", посмотрим..
То, что ты предлагаешь ни к чему не приведет, т.к. str2 пустая.



Ранг: 88.2 (постоянный), 58thx
Активность: 0.11↘0.04
Статус: Участник

 Создано: 25 декабря 2012 00:48 · Поправил: Mishar_Hacker
· Личное сообщение · #13

URTeam
он его палить как троя
не бойся все чисто
--> Link <--
key exelab.ru



Ранг: 34.1 (посетитель), 118thx
Активность: 0.04↘0.01
Статус: Участник

 Создано: 25 декабря 2012 09:24 · Поправил: nick8606
· Личное сообщение · #14

А если вот так?
Только подозрение у меня, что стаб качается с интернетов...
--> Link <--
---
Ну да. Стаба не хватает...
---
Лежат они вот тут: http://www.gocrypter.com/xprotect/stb/stb.exe;stb2.exe;stb3.exe
А доступ по логину и паролю...

| Сообщение посчитали полезным: Mishar_Hacker, TLN

Ранг: 88.2 (постоянный), 58thx
Активность: 0.11↘0.04
Статус: Участник

 Создано: 25 декабря 2012 10:29
· Личное сообщение · #15

nick8606
Стабы есть у меня))
Спасибо Закрывайте


 eXeL@B —› Вопросы новичков —› Проверка Ключа
Эта тема закрыта. Ответы больше не принимаются.
   Для печати Для печати