OD里的大神帮忙看看
本帖最后由 lvkeqin 于 2022-10-12 12:13 编辑有没有大神知道下面是什么意思
00414DD2 .89B5 20FFFFFF mov dword ptr ss:,esi
00414DD8 .8D8D 40FFFFFF lea ecx,dword ptr ss:
00414DDE .51 push ecx
00414DDF .8D95 50FFFFFF lea edx,dword ptr ss:
00414DE5 .52 push edx
00414DE6 .8D85 60FFFFFF lea eax,dword ptr ss:
00414DEC .50 push eax
00414DED .8D8D 70FFFFFF lea ecx,dword ptr ss:
00414DF3 .51 push ecx
00414DF4 .8D55 80 lea edx,dword ptr ss:
00414DF7 .52 push edx
00414DF8 .8D45 90 lea eax,dword ptr ss:
00414DFB .50 push eax
00414DFC .8D8D 30FFFFFF lea ecx,dword ptr ss:
00414E02 .51 push ecx
00414E03 .8D55 C0 lea edx,dword ptr ss:
00414E06 .52 push edx
00414E07 .8D45 B0 lea eax,dword ptr ss:
00414E0A .50 push eax
00414E0B .8B35 00114000 mov esi,dword ptr ds:[<&MSVBVM60.__vbaVa>;msvbvm60.__vbaVarCat
00414E11 .FFD6 call esi ;<&MSVBVM60.__vbaVarCat>
00414E13 .50 push eax
00414E14 .8D8D 20FFFFFF lea ecx,dword ptr ss:
00414E1A .51 push ecx
00414E1B .8D55 A0 lea edx,dword ptr ss:
00414E1E .52 push edx
00414E1F .FFD6 call esi
00414E21 .50 push eax
00414E22 .FF15 64104000 call dword ptr ds:[<&MSVBVM60.#596>] ;msvbvm60.rtcInputBox
00414E28 .8BD0 mov edx,eax
00414E2A .8D4D E0 lea ecx,dword ptr ss:
00414E2D .8B3D 6C114000 mov edi,dword ptr ds:[<&MSVBVM60.__vbaSt>;msvbvm60.__vbaStrMove
00414E33 .FFD7 call edi ;<&MSVBVM60.__vbaStrMove>
00414E35 .8D85 40FFFFFF lea eax,dword ptr ss:
00414E3B .50 push eax
00414E3C .8D8D 50FFFFFF lea ecx,dword ptr ss:
00414E42 .51 push ecx
00414E43 .8D95 60FFFFFF lea edx,dword ptr ss:
00414E49 .52 push edx
00414E4A .8D85 70FFFFFF lea eax,dword ptr ss:
00414E50 .50 push eax
00414E51 .8D4D 80 lea ecx,dword ptr ss:
00414E54 .51 push ecx
00414E55 .8D55 90 lea edx,dword ptr ss:
00414E58 .52 push edx
00414E59 .8D45 A0 lea eax,dword ptr ss:
00414E5C .50 push eax
00414E5D .8D4D B0 lea ecx,dword ptr ss:
00414E60 .51 push ecx
00414E61 .8D55 C0 lea edx,dword ptr ss:
00414E64 .52 push edx
00414E65 .6A 09 push 0x9
00414E67 .8B35 20104000 mov esi,dword ptr ds:[<&MSVBVM60.__vbaFr>;msvbvm60.__vbaFreeVarList
00414E6D .FFD6 call esi ;<&MSVBVM60.__vbaFreeVarList>
00414E6F .83C4 28 add esp,0x28
00414E72 .8D45 E0 lea eax,dword ptr ss:
00414E75 .8985 38FFFFFF mov dword ptr ss:,eax
00414E7B .C785 30FFFFFF>mov dword ptr ss:,0x4008
00414E85 .8D8D 30FFFFFF lea ecx,dword ptr ss:
00414E8B .51 push ecx
00414E8C .8D55 C0 lea edx,dword ptr ss:
00414E8F .52 push edx
00414E90 .FF15 74104000 call dword ptr ds:[<&MSVBVM60.#520>] ;msvbvm60.rtcTrimVar
00414E96 .C785 28FFFFFF>mov dword ptr ss:,fuli2.004056>
00414EA0 .C785 20FFFFFF>mov dword ptr ss:,0x8008
00414EAA .8D45 C0 lea eax,dword ptr ss:
00414EAD .50 push eax ; /var18
00414EAE .8D8D 20FFFFFF lea ecx,dword ptr ss: ; |
00414EB4 .51 push ecx ; |var28
00414EB5 .FF15 98104000 call dword ptr ds:[<&MSVBVM60.__vbaVarTs>; \__vbaVarTstEq
00414EBB .66:8985 B4FEF>mov word ptr ss:,ax
00414EC2 .8D4D C0 lea ecx,dword ptr ss:
00414EC5 .FF15 14104000 call dword ptr ds:[<&MSVBVM60.__vbaFreeV>;msvbvm60.__vbaFreeVar
00414ECB .66:399D B4FEF>cmp word ptr ss:,bx
补充内容 (2022-10-23 18:09):
Private Sub Command1_Click() '41A850
Dim var_34 As Variant
loc_0041A8E8: On Error GoTo loc_0041AE64
loc_0041A90B: var_2C = Form2.Text1.Text
loc_0041A938: var_24 = var_2C
loc_0041A9FB: var_E0 = CBool((Trim(var_24) = global_004056D4) Or (Len(Trim(var_24)) = ""))
loc_0041AA1F: If var_E0 = 0 Then GoTo loc_0041AAC7
loc_0041AA91: MsgBox("请输入验证密码再登录!", 48, "系统提示", 10, 10)
loc_0041AABC: Set var_34 = Form2.Text1
loc_0041AAC2: GoTo loc_0041B1B2
loc_0041AAC7: ' Referenced from: 0041AA1F
loc_0041AAD9: var_2C = "7DFE56A36"
loc_0041AAF8: var_30 = Proc_1_0_416E70(var_24, var_2C)
loc_0041AB2D: var_28 = Left(0, 8)
loc_0041AB95: var_20 = Mid(var_28, 5, 1)
loc_0041AC12: global_0041C02C = "20" & Mid(var_28, 6, 2)
loc_0041AC70: global_0041C030 = Mid(var_28, 2, 3)
loc_0041AD2A: var_8030 = CBool((Left(var_28, 1) = global_00407328) And (Right(var_28, 1) = global_00407330))
loc_0041AD45: If var_8030 = 0 Then GoTo loc_0041B0D2
loc_0041AD6D: var_104 = (var_20 = global_00407340)
loc_0041AD73: var_8038 = (var_20 = "S")
loc_0041ADA0: If (var_20 = global_00407348) Then GoTo loc_0041AFD8
loc_0041ADB1: var_8040 = Form2.Proc_2_5_41B250(var_20, var_2C)
loc_0041AE46: var_8048 = Form1.Show 10, var_A0
loc_0041AE64: ' Referenced from: 0041A8E8
loc_0041AE64: var_804C = Err
loc_0041AE75: Set var_34 = Err
loc_0041AE83: var_DC = Err.Number
loc_0041AEB8: If (var_DC) = 0 Then GoTo loc_0041AFC8
loc_0041AF27: MsgBox("请输入正确的验证密码!", 16, "系统提示", 10, 10)
loc_0041AF65: Form2.Text1.Text = global_004056D4
loc_0041AFA1: Form2.Text1.SetFocus
loc_0041AFC8: ' Referenced from: 0041AEB8
loc_0041AFC8: Exit Sub
loc_0041AFD3: GoTo loc_0041B212
loc_0041AFD8: ' Referenced from: 0041ADA0
loc_0041B011: var_54 = "系统提示"
loc_0041B044: MsgBox("请输入正确的验证密码!", 48, var_54, 10, 10)
loc_0041B05C: var_64 = var_54
loc_0041B081: Form2.Text1.Text = global_004056D4
loc_0041B0B6: Set var_34 = Form2.Text1
loc_0041B0BD: var_34.SetFocus
loc_0041B0C7: If var_34.SetFocus >= 0 Then GoTo loc_0041AFBF
loc_0041B0CD: GoTo loc_0041AFAD
loc_0041B0D2: ' Referenced from: 0041AD45
loc_0041B12A: var_44 = "请输入正确的验证密码!"
loc_0041B13E: MsgBox(var_44, 48, "系统提示", 10, 10)
loc_0041B156: var_54 = var_44
loc_0041B17B: Form2.Text1.Text = global_004056D4
loc_0041B1B0: Set var_34 = Form2.Text1
loc_0041B1B2: ' Referenced from: 0041AAC2
loc_0041B1B7: var_34.SetFocus
loc_0041B1C1: If var_34.SetFocus >= 0 Then GoTo loc_0041AFBF
loc_0041B1C7: GoTo loc_0041AFAD
loc_0041B211: Exit Sub
loc_0041B212: ' Referenced from: 0041AFD3
End Sub 嗯,看了,代码真不错 写得相当完美,简直无缝可透。 这是真不知道啊。。擦 VB程序了,用VB反编译工具11.5版本吧。 太复杂,暂时只能看懂英文,不知道具体意义 boot 发表于 2022-10-13 11:12
VB程序了,用VB反编译工具11.5版本吧。
用了,但是里面和这一样是汇编语言,这里面有没有显示加法减法之类的? boot 发表于 2022-10-13 11:12
VB程序了,用VB反编译工具11.5版本吧。
用了,里面显示和这一样汇编语言,请问这里面有没有加法减法之类的语句? lvkeqin 发表于 2022-10-13 15:50
用了,里面显示和这一样汇编语言,请问这里面有没有加法减法之类的语句? ...
没有看到运算 byh3025 发表于 2022-10-13 17:45
没有看到运算
大佬你能帮忙看看其它的汇编吗?
页:
[1]
2