首页
社区
课程
招聘
[求助]关于VB里的函数,你懂几个?能简单解释吗?
发表于: 2007-5-16 02:41 9151

[求助]关于VB里的函数,你懂几个?能简单解释吗?

2007-5-16 02:41
9151

请各位牛人帮我看看。谢谢!



vbaLateMemCallLd

vbaHresultCheckObj

vbaObjSet

vbaFreeVar

vbaObjSetAddref

vbaObjVar

rtcCreateObject2

vbaFreeVarList

[培训]《安卓高级研修班(网课)》月薪三万计划,掌握调试、分析还原ollvm、vmp的方法,定制art虚拟机自动化脱壳的方法

收藏
免费 0
支持
分享
最新回复 (4)
雪    币: 517
活跃值: (35)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
2
从破解的角度来说,这些都没多大用处。
2007-5-16 08:05
0
雪    币: 236
活跃值: (46)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
我现在要破的一个软件就与这些函数有关系。

它是经过这些函数运算后,将机器码与序列号比较,相等就跳走(即完)。

0046F0DD   .  FF15 30104000 call    dword ptr [<&MSVBVM60.__vbaFreeV>;  MSVBVM60.__vbaFreeVarList
0046F0E3   .  8B16          mov     edx, dword ptr [esi]
0046F0E5   .  83C4 1C       add     esp, 1C
0046F0E8   .  66:3BFB       cmp     di, bx
0046F0EB      0F84 35020000 je      0046F326
2007-5-16 11:18
0
雪    币: 28972
活跃值: (7458)
能力值: ( LV15,RANK:3306 )
在线值:
发帖
回帖
粉丝
4
肯定不是这个函数啦,再往上找找对edi与ebx赋值的 前面的call
2007-5-16 11:20
0
雪    币: 236
活跃值: (46)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
5
这个我知道。我只是想说明,经过上面一些函数运算后,不相等就跳走而已。

0046F0AD   .  FF15 A8114000 call    dword ptr [<&MSVBVM60.__vbaLateM>;  MSVBVM60.__vbaLateMemCallLd
0046F0B3   .  83C4 20       add     esp, 20
0046F0B6   .  50            push    eax                                        ;eax=0012F5B8
0046F0B7   .  FF15 C0104000 call    dword ptr [<&MSVBVM60.__vbaVarTs>;  VarTstEq
0046F0BD   .  8BF8          mov     edi, eax

根据vbaVarTstEq说明,
-----------------------------------------------------------
__vbaVarTstEq                ;关系运算 =   
lea eax,var1
push eax                ;变量1
lea eax,var2
push eax                ;变量2
call __vbaVarTstEq        ;if var1 = var2 then ax = &Hffff
                        ;else ax = 0
                        ;end if   
-----------------------------------------------------------
它是push两个参数后,返回EAX的值。
----------------------------------------------------------
因此,我必须知道其他VB函数的功能才能判断。
2007-5-16 13:31
0
游客
登录 | 注册 方可回帖
返回
//