'00401E70 55 PUSH EBP
'00401E71 8BEC MOV EBP, ESP
'00401E73 83EC0C SUB ESP, 0C
'00401E76 68C6104000 PUSH 004010C6
'00401E7B 64 FS:
'00401E7C A100000000 MOV EAX, DWORD PTR [00000000]
'00401E81 50 PUSH EAX
'00401E82 64 FS:
'00401E83 892500000000 MOV DWORD PTR [00000000], ESP
'00401E89 83EC3C SUB ESP, 3C
'00401E8C 53 PUSH EBX
'00401E8D 56 PUSH ESI
'00401E8E 57 PUSH EDI
'00401E8F 8965F4 MOV DWORD PTR [EBP-0C], ESP
'00401E92 C745F898104000 MOV DWORD PTR [EBP-08], 00401098
'00401E99 8B7508 MOV ESI, DWORD PTR [EBP+08]
'00401E9C 8BC6 MOV EAX, ESI
'00401E9E 83E001 AND EAX, 01
'00401EA1 8945FC MOV DWORD PTR [EBP-04], EAX
'00401EA4 83E6FE AND ESI, FE
'00401EA7 56 PUSH ESI
'00401EA8 897508 MOV DWORD PTR [EBP+08], ESI
'00401EAB 8B0E MOV ECX, DWORD PTR [ESI]
'00401EAD FF5104 CALL DWORD PTR [ECX+04]
'00401EB0 8B16 MOV EDX, DWORD PTR [ESI]
'00401EB2 33FF XOR EDI, EDI
'00401EB4 56 PUSH ESI
'00401EB5 897DE8 MOV DWORD PTR [EBP-18], EDI
'00401EB8 897DE4 MOV DWORD PTR [EBP-1C], EDI
'00401EBB 897DD4 MOV DWORD PTR [EBP-2C], EDI
'00401EBE 897DC4 MOV DWORD PTR [EBP-3C], EDI
'00401EC1 FF9200030000 CALL DWORD PTR [EDX+00000300]
'00401EC7 50 PUSH EAX
'00401EC8 8D45E4 LEA EAX, DWORD PTR [EBP-1C]
'00401ECB 50 PUSH EAX
'00401ECC FF1520104000 CALL DWORD PTR [00401020] *** Référence to '__vbaObjSet'***
'00401ED2 8BF0 MOV ESI, EAX
'00401ED4 8D55E8 LEA EDX, DWORD PTR [EBP-18]
'00401ED7 52 PUSH EDX
'00401ED8 56 PUSH ESI
'00401ED9 8B0E MOV ECX, DWORD PTR [ESI]
'00401EDB FF91A0000000 CALL DWORD PTR [ECX+000000A0]
'00401EE1 3BC7 CMP EAX, EDI
'00401EE3 DBE2 FNCLEX
'00401EE5 7D12 JGE 401EF9
'00401EE7 68A0000000 PUSH 000000A0
'00401EEC 68F81B4000 PUSH 00401BF8
'00401EF1 56 PUSH ESI
'00401EF2 50 PUSH EAX
'00401EF3 FF1514104000 CALL DWORD PTR [00401014] *** Référence to '__vbaHresultCheckObj'***
'00401EF9 8B45E8 MOV EAX, DWORD PTR [EBP-18]
'00401EFC 50 PUSH EAX
'00401EFD 680C1C4000 PUSH 00401C0C
'00401F02 FF1538104000 CALL DWORD PTR [00401038] *** Référence to '__vbaStrCmp'***
'00401F08 8BF0 MOV ESI, EAX
'00401F0A 8D4DE8 LEA ECX, DWORD PTR [EBP-18]
'00401F0D F7DE NEG ESI
'00401F0F 1BF6 SBB ESI, ESI
'00401F11 46 INC ESI
'00401F12 F7DE NEG ESI
'00401F14 FF158C104000 CALL DWORD PTR [0040108C] *** Référence to '__vbaFreeStr'***
'00401F1A 8D4DE4 LEA ECX, DWORD PTR [EBP-1C]
'00401F1D FF1590104000 CALL DWORD PTR [00401090] *** Référence to '__vbaFreeObj'***
'00401F23 66 Opsize:
'00401F24 3BF7 CMP ESI, EDI
'00401F26 747F JE 401FA7
'00401F28 393D24304000 CMP DWORD PTR [00403024], EDI
'00401F2E 7510 JNE 401F40
'00401F30 6824304000 PUSH 00403024
'00401F35 6814144000 PUSH 00401414
'00401F3A FF1560104000 CALL DWORD PTR [00401060] *** Référence to '__vbaNew2'***
'00401F40 83EC10 SUB ESP, 10
'00401F43 B90A000000 MOV ECX, 0000000A
'00401F48 8BDC MOV EBX, ESP
'00401F4A 894DD4 MOV DWORD PTR [EBP-2C], ECX
'00401F4D B804000280 MOV EAX, 80020004
'00401F52 83EC10 SUB ESP, 10
'00401F55 890B MOV DWORD PTR [EBX], ECX
'00401F57 8B4DC8 MOV ECX, DWORD PTR [EBP-38]
'00401F5A 8BD0 MOV EDX, EAX
'00401F5C 8B3524304000 MOV ESI, DWORD PTR [00403024]
'00401F62 894B04 MOV DWORD PTR [EBX+04], ECX
'00401F65 8BCC MOV ECX, ESP
'00401F67 8B3E MOV EDI, DWORD PTR [ESI]
'00401F69 56 PUSH ESI
'00401F6A 894308 MOV DWORD PTR [EBX+08], EAX
'00401F6D 8B45D0 MOV EAX, DWORD PTR [EBP-30]
'00401F70 89430C MOV DWORD PTR [EBX+0C], EAX
'00401F73 8B45D4 MOV EAX, DWORD PTR [EBP-2C]
'00401F76 8901 MOV DWORD PTR [ECX], EAX
'00401F78 8B45D8 MOV EAX, DWORD PTR [EBP-28]
'00401F7B 894104 MOV DWORD PTR [ECX+04], EAX
'00401F7E 895108 MOV DWORD PTR [ECX+08], EDX
'00401F81 8B55E0 MOV EDX, DWORD PTR [EBP-20]
'00401F84 89510C MOV DWORD PTR [ECX+0C], EDX
'00401F87 FF97B0020000 CALL DWORD PTR [EDI+000002B0]
'00401F8D 33FF XOR EDI, EDI
'00401F8F 3BC7 CMP EAX, EDI
'00401F91 DBE2 FNCLEX
'00401F93 7D12 JGE 401FA7
'00401F95 68B0020000 PUSH 000002B0
'00401F9A 68141C4000 PUSH 00401C14
'00401F9F 56 PUSH ESI
'00401FA0 50 PUSH EAX
'00401FA1 FF1514104000 CALL DWORD PTR [00401014] *** Référence to '__vbaHresultCheckObj'***
'00401FA7 897DFC MOV DWORD PTR [EBP-04], EDI
'00401FAA 68C51F4000 PUSH 00401FC5
'00401FAF EB13 JMP 401FC4
'00401FB1 8D4DE8 LEA ECX, DWORD PTR [EBP-18]
'00401FB4 FF158C104000 CALL DWORD PTR [0040108C] *** Référence to '__vbaFreeStr'***
'00401FBA 8D4DE4 LEA ECX, DWORD PTR [EBP-1C]
'00401FBD FF1590104000 CALL DWORD PTR [00401090] *** Référence to '__vbaFreeObj'***
'00401FC3 C3 RET