呵呵,试一下

最烦VB的东东了.

00404EC5    66:83BD F4FDFFF>cmp word ptr ss:[ebp-20C],0                 ; 计算结果最后与0比较,不相等就注册功
00404ECD    0F84 A1000000   je CRACKME2.00404F74                        ; 爆破点

VB垃圾太多~跟算法是很烦的~ 五秒爆破~

最初由 冷血书生 发布
00404EC5 66:83BD F4FDFFF>cmp word ptr ss:[ebp-20C],0 ; 计算结果最后与0比较,不相等就注册功
00404ECD 0F84 A1000000 je CRACKME2.00404F74 ; 爆破点

VB垃圾太多~跟算法是很烦的~ 五秒爆破~

爆破书生

00404E7C   .  50            PUSH EAX
00404E7D   .  51            PUSH ECX
00404E7E   .  FF15 B0104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaVarDi>;  MSVBVM60.__vbaVarDiv
执行前：
EAX=0012F57C
0012F57C  05 00 00 00 70 FA 14 00  ...p?.
0012F584  00 00 00 00 00 80 68 40  .....?@
ECX=0012F50C
0012F50C  00 00 00 00 00 00 00 00  ........
0012F514  01 00 00 00 0E 00 00 00  
......
EDX=0012F43C
0012F43C  05 00 00 00 00 BD 6F 00  ....斤.
0012F444  00 00 00 54 34 6F 8D 41  ...T4o?
======================================寄存器======================================
EAX 0012F57C
ECX 0012F50C
EDX 0012F43C
EBX 73520DFA MSVBVM60.__vbaStrVarVal
ESP 0012F300
EBP 0012F5D8
ESI 0014FA70
EDI 735264F3 MSVBVM60.rtcMidCharVar
EIP 00404E7E CRACKME2.00404E7E
C 0  ES 0023 32bit 0(FFFFFFFF)
P 1  CS 001B 32bit 0(FFFFFFFF)
A 0  SS 0023 32bit 0(FFFFFFFF)
Z 1  DS 0023 32bit 0(FFFFFFFF)
S 0  FS 003B 32bit 7FFDD000(FFF)
T 0  GS 0000 NULL
D 0
O 0  LastErr ERROR_SUCCESS (00000000)
EFL 00000246 (NO,NB,E,BE,NS,PE,GE,LE)
ST0 empty 0.0
ST1 empty 0.0
ST2 empty 0.0
ST3 empty 0.0
ST4 empty 0.0
ST5 empty 0.0
ST6 empty -0.0
ST7 empty 821.71428571428571430
               3 2 1 0      E S P U O Z D I
FST 0120  Cond 0 0 0 1  Err 0 0 1 0 0 0 0 0  (LT)
FCW 137F  Prec NEAR,64  掩码    1 1 1 1 1 1
XMM0           0.0,           0.0,           0.0,           0.0
XMM1           0.0,           0.0,           0.0,           0.0
XMM2           0.0,           0.0,           0.0,           0.0
XMM3           0.0,           0.0,           0.0,           0.0
XMM4           0.0,           0.0,           0.0,           0.0
XMM5           0.0,           0.0,           0.0,           0.0
XMM6           0.0,           0.0,           0.0,           0.0
XMM7           0.0,           0.0,           0.0,           0.0
            F R    P U O Z D I D P U O Z D I
            Z C    M M M M M M Z E E E E E E
MXCSR 1F80  0 NEAR 1 1 1 1 1 1 0 0 0 0 0 0 0
========================================================================================
执行以后
EAX=0012F50C
0012F50C  05 00 00 00 00 00 00 00  .......
0012F514  39 05 2F 27 F3 38 13 41  9/'?A
ECX=41100000
EDX=0000000F
======================================寄存器======================================
EAX 0012F50C
ECX 41100000
EDX 0000000F
EBX 73520DFA MSVBVM60.__vbaStrVarVal
ESP 0012F30C
EBP 0012F5D8
ESI 0014FA70
EDI 735264F3 MSVBVM60.rtcMidCharVar
EIP 00404E84 CRACKME2.00404E84
C 0  ES 0023 32bit 0(FFFFFFFF)
P 1  CS 001B 32bit 0(FFFFFFFF)
A 0  SS 0023 32bit 0(FFFFFFFF)
Z 1  DS 0023 32bit 0(FFFFFFFF)
S 0  FS 003B 32bit 7FFDD000(FFF)
T 0  GS 0000 NULL
D 0
O 0  LastErr ERROR_SUCCESS (00000000)
EFL 00000246 (NO,NB,E,BE,NS,PE,GE,LE)
ST0 empty 0.0
ST1 empty 0.0
ST2 empty 0.0
ST3 empty 0.0
ST4 empty 0.0
ST5 empty 0.0
ST6 empty 314940.78826530612240
ST7 empty 314940.78826530612240
               3 2 1 0      E S P U O Z D I
FST 0120  Cond 0 0 0 1  Err 0 0 1 0 0 0 0 0  (LT)
FCW 137F  Prec NEAR,64  掩码    1 1 1 1 1 1
XMM0           0.0,           0.0,           0.0,           0.0
XMM1           0.0,           0.0,           0.0,           0.0
XMM2           0.0,           0.0,           0.0,           0.0
XMM3           0.0,           0.0,           0.0,           0.0
XMM4           0.0,           0.0,           0.0,           0.0
XMM5           0.0,           0.0,           0.0,           0.0
XMM6           0.0,           0.0,           0.0,           0.0
XMM7           0.0,           0.0,           0.0,           0.0
            F R    P U O Z D I D P U O Z D I
            Z C    M M M M M M Z E E E E E E
MXCSR 1F80  0 NEAR 1 1 1 1 1 1 0 0 0 0 0 0 0
========================================================================================

VB中的DIV函数,是怎么运算的?除数,被除数,余数,各指哪些数据?

最初由 inraining 发布
呵呵，我的爆破点好像跟你的不大一样。
0040595C . FF15 A4104000 call [<&MSVBVM60.__vbaVarTstEq>] ; 比对结果是否一致
00405962 . 66:8BD8 mov bx, ax
00405965 . 8D85 5CFFFFFF lea eax, [ebp-A4]
0040596B . 8D8D 60FFFFFF lea ecx, [ebp-A0]
........

inraining的VB功底深厚，非常佩服！

inraining  能不能讲一讲VB中一些浮点运算的例子?

我每次跟到浮点运算指令时头就晕了.

就像这个例子中的

00404E7C . 50 PUSH EAX
00404E7D . 51 PUSH ECX
00404E7E . FF15 B0104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaVarDi>; MSVBVM60.__vbaVarDiv

跟到这里我就搞不清楚,除数放在哪里,被除数放在哪里.余数放在哪里,

最初由 rufus 发布
inraining 能不能讲一讲VB中一些浮点运算的例子?

我每次跟到浮点运算指令时头就晕了.

就像这个例子中的
........

跟进CALL，VB的运算都在DLL里面，直接在主程序汇编里面看不明白的，结果返回在ST里面。呵呵，我对汇编及其编程其实也不大懂，不过看到不理解的命令就搜索命令的使用定义，同时你要注意寄存器的变化。
跟踪最好从爆破点开始往上逆推，出现可疑变量或者字符就再逆推，搞清楚这个值是如何而来的，直到推出原始信息。注册过程就是逆推之逆推。

最初由 inraining 发布
呵呵，我的爆破点好像跟你的不大一样。
0040595C . FF15 A4104000 call [<&MSVBVM60.__vbaVarTstEq>] ; 比对结果是否一致
00405962 . 66:8BD8 mov bx, ax
00405965 . 8D85 5CFFFFFF lea eax, [ebp-A4]
0040596B . 8D8D 60FFFFFF lea ecx, [ebp-A0]
........

强~学习了~~

最初由 KuNgBiM 发布
爆破书生

学习啦,谢谢

楼主真厉害，学习中...

有些不是很懂，学习ing

00404ECD     /0F84 A1000000 je      CRACKME2.00404F74

我怎么不能下啊....

004046D7     /74 3D         JE SHORT CRACKME2.00404716               ;  验证email格式(跳转此处就可以随便输入...)

00404ECD     /0F85 A1000000 JNZ CRACKME2.00404F74               ;暴破点

VB 的注册算法分析  实在头痛！
最烦那些浮点算法   摸不着头脑  也没有专门这方面的知识介绍！
请大家推荐二个     浮点指令的教程！

最初由 爱在天涯 发布
VB 的注册算法分析 实在头痛！
最烦那些浮点算法 摸不着头脑 也没有专门这方面的知识介绍！
请大家推荐二个 浮点指令的教程！

看雪有这个教程了,搜索一下吧.