Function at 0x42104c
Capabilities:
Parse pe header
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x4037c6
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x1ac
call sub.MSVBVM50.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x402078
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
push 0x409074
lea eax, [ebp - 0x3c]
push eax
call sub.MSVBVM50.DLL___vbaAryConstruct
push 0x409074
lea eax, [ebp - 0x74]
push eax
call sub.MSVBVM50.DLL___vbaAryConstruct
mov dword [ebp - 4], 2
mov dword [ebp - 0xa4], 0x80020004
mov dword [ebp - 0xac], 0xa
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcFreeFile
mov word [ebp - 0x88], ax
lea ecx, [ebp - 0xac]
call sub.MSVBVM50.DLL___vbaFreeVar
mov dword [ebp - 4], 3
mov edx, 0x406a8c
lea ecx, [ebp - 0x44]
call sub.MSVBVM50.DLL___vbaStrCopy
mov dword [ebp - 4], 4
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcGetPresentDate
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL___vbaDateVar
fstp qword [ebp - 0x7c]
lea ecx, [ebp - 0xac]
call sub.MSVBVM50.DLL___vbaFreeVar
mov dword [ebp - 4], 5
mov eax, dword [ebp + 8]
push dword [eax]
push dword [ebp - 0x88]
push 0xffffffffffffffff
push 1
call sub.MSVBVM50.DLL___vbaFileOpen
mov dword [ebp - 4], 6
and dword [ebp - 0x4c], 0
mov dword [ebp - 4], 7
push dword [ebp - 0x88]
call sub.MSVBVM50.DLL_rtcFileLength
mov dword [ebp - 0x144], eax
fild dword [ebp - 0x144]
fstp qword [ebp - 0x5c]
mov dword [ebp - 4], 8
push 1
push 1
push 1
push 0x405ff4
push 0x441068
push 0x14
push 0
call sub.MSVBVM50.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 4], 9
mov word [ebp - 0xf0], 0x64
push dword [ebp + 0x10]
lea eax, [ebp - 0xf0]
push eax
push dword [ebp + 0xc]
call fcn.0042b285
mov dword [ebp - 4], 0xa
push dword [ebp - 0x88]
call sub.MSVBVM50.DLL_rtcEndOfFile
movsx eax, ax
test eax, eax
jne 0x4221be
mov dword [ebp - 4], 0xb
push dword [ebp - 0x88]
lea eax, [ebp - 0x44]
push eax
call sub.MSVBVM50.DLL___vbaLineInputStr
mov dword [ebp - 4], 0xc
push dword [ebp - 0x88]
call sub.MSVBVM50.DLL_rtcEndOfFile
movsx eax, ax
test eax, eax
jne 0x4212d2
mov dword [ebp - 4], 0xd
push 0xffffffffffffffff
call sub.MSVBVM50.DLL___vbaOnError
mov dword [ebp - 4], 0xe
push dword [ebp - 0x88]
call sub.MSVBVM50.DLL_rtcFileSeek
imul eax, eax, 0x64
jo 0x4223c3
mov dword [ebp - 0x148], eax
fild dword [ebp - 0x148]
fstp qword [ebp - 0x150]
fld qword [ebp - 0x150]
cmp dword [section..data], 0
jne 0x421252
fdiv qword [ebp - 0x5c]
jmp 0x42125d
push dword [ebp - 0x58]
push dword [ebp - 0x5c]
call sub.MSVBVM50.DLL__adj_fdiv_m64
fstp qword [ebp - 0xd4]
fnstsw ax
test al, 0xd
jne 0x4223be
mov dword [ebp - 0xdc], 5
push 0x10
pop eax
call sub.MSVBVM50.DLL___vbaChkstk
lea esi, [ebp - 0xdc]
mov edi, esp
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
push 0x4085b8
push 0
push 0x4085a0
mov eax, dword [ebp + 0xc]
push dword [eax]
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL___vbaLateMemCallLd
add esp, 0x10
push eax
call sub.MSVBVM50.DLL___vbaObjVar
push eax
call sub.MSVBVM50.DLL___vbaLateMemSt
lea ecx, [ebp - 0xbc]
call sub.MSVBVM50.DLL___vbaFreeVar
mov dword [ebp - 4], 0xf
push 0
call sub.MSVBVM50.DLL___vbaOnError
jmp 0x421338
mov dword [ebp - 4], 0x11
mov dword [ebp - 0xd4], 0x64
mov dword [ebp - 0xdc], 2
push 0x10
pop eax
call sub.MSVBVM50.DLL___vbaChkstk
lea esi, [ebp - 0xdc]
mov edi, esp
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
push 0x4085b8
push 0
push 0x4085a0
mov eax, dword [ebp + 0xc]
push dword [eax]
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL___vbaLateMemCallLd
add esp, 0x10
push eax
call sub.MSVBVM50.DLL___vbaObjVar
push eax
call sub.MSVBVM50.DLL___vbaLateMemSt
lea ecx, [ebp - 0xbc]
call sub.MSVBVM50.DLL___vbaFreeVar
mov dword [ebp - 4], 0x13
push dword [ebp - 0x44]
call sub.MSVBVM50.DLL___vbaLenBstr
mov ecx, eax
call sub.MSVBVM50.DLL___vbaI2I4
mov word [ebp - 0x40], ax
mov dword [ebp - 4], 0x14
mov dword [ebp - 0x12c], 7
mov dword [ebp - 0x128], 1
mov dword [ebp - 0x8c], 1
jmp 0x421391
mov eax, dword [ebp - 0x8c]
add eax, dword [ebp - 0x128]
jo 0x4223c3
mov dword [ebp - 0x8c], eax
mov eax, dword [ebp - 0x8c]
cmp eax, dword [ebp - 0x12c]
jg 0x4219dd
mov dword [ebp - 4], 0x15
push 1
push dword [ebp - 0x44]
push 0x407c20
push 0
call sub.MSVBVM50.DLL___vbaInStr
test eax, eax
jle 0x421904
mov dword [ebp - 4], 0x16
lea eax, [ebp - 0x44]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
push 1
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcLeftCharVar
push 0x22
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL_rtcVarBstrFromAnsi
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL___vbaVarTstEq
mov word [ebp - 0x104], ax
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xac]
push eax
push 2
call sub.MSVBVM50.DLL___vbaFreeVarList
add esp, 0xc
movsx eax, word [ebp - 0x104]
test eax, eax
je 0x421622
mov dword [ebp - 4], 0x17
mov eax, dword [ebp - 0x44]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 8
push 0x22
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcVarBstrFromAnsi
lea eax, [ebp - 0x44]
mov dword [ebp - 0xe4], eax
mov dword [ebp - 0xec], 0x4008
push 2
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
push 0
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL___vbaInStrVar
push eax
call sub.MSVBVM50.DLL___vbaI4Var
push eax
lea eax, [ebp - 0xec]
push eax
lea eax, [ebp - 0xcc]
push eax
call sub.MSVBVM50.DLL_rtcLeftCharVar
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x4214d3
and dword [ebp - 0x154], 0
jmp 0x4214de
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x154], eax
lea eax, [ebp - 0xcc]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov edx, eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea ecx, [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
lea eax, [ebp - 0xcc]
push eax
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xac]
push eax
push 3
call sub.MSVBVM50.DLL___vbaFreeVarList
add esp, 0x10
mov dword [ebp - 4], 0x18
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x42155a
and dword [ebp - 0x158], 0
jmp 0x421565
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x158], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
push dword [ebp - 0x44]
call sub.MSVBVM50.DLL___vbaStrCmp
test eax, eax
je 0x42161d
mov dword [ebp - 4], 0x19
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x108], eax
cmp dword [ebp - 0x108], 7
jae 0x4215a7
and dword [ebp - 0x15c], 0
jmp 0x4215b2
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x15c], eax
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x4215d1
and dword [ebp - 0x160], 0
jmp 0x4215dc
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x160], eax
mov eax, dword [ebp - 0x108]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
push 0x407c20
call sub.MSVBVM50.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov edx, eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea ecx, [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
jmp 0x4216cd
mov dword [ebp - 4], 0x1c
lea eax, [ebp - 0x44]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
push 1
push dword [ebp - 0x44]
push 0x407c20
push 0
call sub.MSVBVM50.DLL___vbaInStr
push eax
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcLeftCharVar
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421680
and dword [ebp - 0x164], 0
jmp 0x42168b
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x164], eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov edx, eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea ecx, [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
lea ecx, [ebp - 0xac]
call sub.MSVBVM50.DLL___vbaFreeVar
mov dword [ebp - 4], 0x1e
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x4216f3
and dword [ebp - 0x168], 0
jmp 0x4216fe
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x168], eax
lea eax, [ebp - 0x44]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
push dword [ebp - 0x44]
call sub.MSVBVM50.DLL___vbaLenBstr
mov esi, eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaLenBstr
sub esi, eax
jo 0x4223c3
push esi
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcRightCharVar
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM50.DLL___vbaStrMove
lea ecx, [ebp - 0xac]
call sub.MSVBVM50.DLL___vbaFreeVar
mov dword [ebp - 4], 0x1f
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x42178f
and dword [ebp - 0x16c], 0
jmp 0x42179a
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x16c], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaLenBstr
cmp eax, 1
jle 0x4218ff
mov dword [ebp - 4], 0x20
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x10c], eax
cmp dword [ebp - 0x10c], 7
jae 0x4217da
and dword [ebp - 0x170], 0
jmp 0x4217e5
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x170], eax
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x108], eax
cmp dword [ebp - 0x108], 7
jae 0x421804
and dword [ebp - 0x174], 0
jmp 0x42180f
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x174], eax
mov eax, dword [ebp - 0x108]
mov ecx, dword [ebp - 0x30]
lea eax, [ecx + eax*4]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
mov eax, dword [ebp - 0x10c]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaLenBstr
sub eax, 1
jo 0x4223c3
push eax
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcLeftCharVar
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL_rtcTrimVar
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xcc]
push eax
call sub.MSVBVM50.DLL_rtcUpperCaseVar
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x42189e
and dword [ebp - 0x178], 0
jmp 0x4218a9
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x178], eax
lea eax, [ebp - 0xcc]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov edx, eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea ecx, [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
lea eax, [ebp - 0xcc]
push eax
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xac]
push eax
push 3
call sub.MSVBVM50.DLL___vbaFreeVarList
add esp, 0x10
jmp 0x4219d1
mov dword [ebp - 4], 0x23
lea eax, [ebp - 0x44]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcTrimVar
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL_rtcUpperCaseVar
mov eax, dword [ebp - 0x8c]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421963
and dword [ebp - 0x17c], 0
jmp 0x42196e
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x17c], eax
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov edx, eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea ecx, [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xac]
push eax
push 2
call sub.MSVBVM50.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x24
mov edx, 0x406a8c
lea ecx, [ebp - 0x44]
call sub.MSVBVM50.DLL___vbaStrCopy
mov dword [ebp - 4], 0x26
jmp 0x421379
mov dword [ebp - 4], 0x27
push 2
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421a00
and dword [ebp - 0x180], 0
jmp 0x421a0b
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x180], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL_rtcR8ValFromBstr
fstp qword [ebp - 0x100]
push 1
pop eax
dec eax
mov dword [ebp - 0x108], eax
cmp dword [ebp - 0x108], 7
jae 0x421a3e
and dword [ebp - 0x184], 0
jmp 0x421a49
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x184], eax
push 1
pop eax
dec eax
mov dword [ebp - 0x10c], eax
cmp dword [ebp - 0x10c], 7
jae 0x421a65
and dword [ebp - 0x188], 0
jmp 0x421a70
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x188], eax
push 3
pop eax
dec eax
mov dword [ebp - 0x110], eax
cmp dword [ebp - 0x110], 7
jae 0x421a8c
and dword [ebp - 0x18c], 0
jmp 0x421a97
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x18c], eax
push 3
pop eax
dec eax
mov dword [ebp - 0x114], eax
cmp dword [ebp - 0x114], 7
jae 0x421ab3
and dword [ebp - 0x190], 0
jmp 0x421abe
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x190], eax
push 2
pop eax
dec eax
mov dword [ebp - 0x118], eax
cmp dword [ebp - 0x118], 7
jae 0x421ada
and dword [ebp - 0x194], 0
jmp 0x421ae5
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x194], eax
mov eax, dword [ebp - 0x118]
mov ecx, dword [ebp - 0x68]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL_rtcR8ValFromBstr
call sub.MSVBVM50.DLL___vbaFpR8
fstp qword [ebp - 0x19c]
fld qword [ebp - 0x100]
call sub.MSVBVM50.DLL___vbaFpR8
fcomp qword [ebp - 0x19c]
fnstsw ax
sahf
jae 0x421b23
mov dword [ebp - 0x1a0], 1
jmp 0x421b2a
and dword [ebp - 0x1a0], 0
push 1
pop eax
dec eax
mov dword [ebp - 0x11c], eax
cmp dword [ebp - 0x11c], 7
jae 0x421b46
and dword [ebp - 0x1a4], 0
jmp 0x421b51
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1a4], eax
mov eax, dword [ebp - 0x108]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
mov eax, dword [ebp - 0x10c]
mov ecx, dword [ebp - 0x68]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCmp
mov esi, eax
neg esi
sbb esi, esi
neg esi
neg esi
mov eax, dword [ebp - 0x110]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
mov eax, dword [ebp - 0x114]
mov ecx, dword [ebp - 0x68]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCmp
neg eax
sbb eax, eax
neg eax
neg eax
or si, ax
mov eax, dword [ebp - 0x1a0]
neg eax
or si, ax
mov eax, dword [ebp - 0x11c]
mov ecx, dword [ebp - 0x68]
push dword [ecx + eax*4]
push 0x406a8c
call sub.MSVBVM50.DLL___vbaStrCmp
neg eax
sbb eax, eax
neg eax
neg eax
and si, ax
movsx eax, si
test eax, eax
je 0x421cb4
mov dword [ebp - 4], 0x28
mov eax, dword [ebp - 0x4c]
add eax, 1
jo 0x4223c3
mov dword [ebp - 0x4c], eax
mov dword [ebp - 4], 0x29
push 1
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421c10
and dword [ebp - 0x1a8], 0
jmp 0x421c1b
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1a8], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x68]
push dword [ecx + eax*4]
push 0x40906c
call sub.MSVBVM50.DLL___vbaStrCmp
test eax, eax
jne 0x421c49
mov dword [ebp - 4], 0x2a
push dword [ebp + 0xc]
push dword [ebp + 0x10]
call fcn.00426bad
jmp 0x421c82
mov dword [ebp - 4], 0x2c
push dword [ebp + 0xc]
push dword [ebp + 0x10]
call fcn.00427e97
mov dword [ebp - 4], 0x2d
mov dword [ebp - 0xd4], 0x44105c
mov dword [ebp - 0xdc], 0x4005
lea eax, [ebp - 0xdc]
push eax
call fcn.0042b58a
mov dword [ebp - 4], 0x2f
and word [0x441058], 0
mov dword [ebp - 4], 0x30
push 1
push 1
push 1
push 0x405ff4
push 0x441068
push 0x14
push 0
call sub.MSVBVM50.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 4], 0x32
push 3
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421cd7
and dword [ebp - 0x1ac], 0
jmp 0x421ce2
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1ac], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea eax, [ecx + eax*4]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcTrimVar
push 0x14
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL_rtcLeftCharVar
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov edx, eax
mov ecx, 0x441048
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xac]
push eax
push 2
call sub.MSVBVM50.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x33
mov edx, 0x406a8c
mov ecx, 0x441050
call sub.MSVBVM50.DLL___vbaStrCopy
mov dword [ebp - 4], 0x34
mov edx, 0x406a8c
mov ecx, 0x441054
call sub.MSVBVM50.DLL___vbaStrCopy
mov dword [ebp - 4], 0x35
push 4
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421dbd
and dword [ebp - 0x1b0], 0
jmp 0x421dc8
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1b0], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea eax, [ecx + eax*4]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcTrimVar
push 0x14
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL_rtcLeftCharVar
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov edx, eax
mov ecx, 0x44104c
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xac]
push eax
push 2
call sub.MSVBVM50.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x36
push 6
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421e77
and dword [ebp - 0x1b4], 0
jmp 0x421e82
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1b4], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL_rtcR8ValFromBstr
cmp dword [section..data], 0
jne 0x421ea4
fdiv qword [0x4019c0]
jmp 0x421eb5
push dword [0x4019c4]
push dword [0x4019c0]
call sub.MSVBVM50.DLL__adj_fdiv_m64
fstp qword [0x44105c]
fnstsw ax
test al, 0xd
jne 0x4223be
mov dword [ebp - 4], 0x37
and word [0x441058], 0
mov dword [ebp - 4], 0x38
push dword [0x441068]
push 1
call sub.MSVBVM50.DLL___vbaUbound
mov ecx, eax
call sub.MSVBVM50.DLL___vbaI2I4
mov word [ebp - 0x24], ax
mov dword [ebp - 4], 0x39
movsx eax, word [ebp - 0x24]
push eax
push dword [0x441068]
call sub.MSVBVM50.DLL___vbaDerefAry1
mov cx, word [ebp - 0x24]
mov word [eax], cx
mov dword [ebp - 4], 0x3a
push 5
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x421f34
and dword [ebp - 0x1b8], 0
jmp 0x421f3f
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1b8], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
lea eax, [ecx + eax*4]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcUpperCaseVar
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0xbc]
push eax
call sub.MSVBVM50.DLL_rtcTrimVar
push 0x10
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xcc]
push eax
call sub.MSVBVM50.DLL_rtcLeftCharVar
lea eax, [ebp - 0xcc]
push eax
call sub.MSVBVM50.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaStrMove
mov esi, eax
movsx eax, word [ebp - 0x24]
push eax
push dword [0x441068]
call sub.MSVBVM50.DLL___vbaDerefAry1
mov ecx, eax
add ecx, 4
mov edx, esi
call sub.MSVBVM50.DLL___vbaStrCopy
lea ecx, [ebp - 0x9c]
call sub.MSVBVM50.DLL___vbaFreeStr
lea eax, [ebp - 0xcc]
push eax
lea eax, [ebp - 0xbc]
push eax
lea eax, [ebp - 0xac]
push eax
push 3
call sub.MSVBVM50.DLL___vbaFreeVarList
add esp, 0x10
mov dword [ebp - 4], 0x3b
mov esi, 0x407114
movsx eax, word [ebp - 0x24]
push eax
push dword [0x441068]
call sub.MSVBVM50.DLL___vbaDerefAry1
mov ecx, eax
add ecx, 8
mov edx, esi
call sub.MSVBVM50.DLL___vbaStrCopy
mov dword [ebp - 4], 0x3c
push 7
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x422042
and dword [ebp - 0x1bc], 0
jmp 0x42204d
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1bc], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x30]
push dword [ecx + eax*4]
call sub.MSVBVM50.DLL_rtcR8ValFromBstr
cmp dword [section..data], 0
jne 0x42206f
fdiv qword [0x4019c0]
jmp 0x422080
push dword [0x4019c4]
push dword [0x4019c0]
call sub.MSVBVM50.DLL__adj_fdiv_m64
fnstsw ax
test al, 0xd
jne 0x4223be
movsx eax, word [ebp - 0x24]
push eax
push dword [0x441068]
call sub.MSVBVM50.DLL___vbaDerefAry1
fstp qword [eax + 0xc]
mov dword [ebp - 4], 0x3d
mov ax, word [ebp - 0x24]
mov word [0x441058], ax
mov dword [ebp - 4], 0x3e
push dword [0x441068]
push 1
call sub.MSVBVM50.DLL___vbaLbound
push eax
push dword [0x441068]
push 1
call sub.MSVBVM50.DLL___vbaUbound
add eax, 1
jo 0x4223c3
push eax
push 1
push 0x405ff4
push 0x441068
push 0x14
push 0
call sub.MSVBVM50.DLL___vbaRedimPreserve
add esp, 0x1c
mov dword [ebp - 4], 0x3f
mov word [ebp - 0x124], 7
mov word [ebp - 0x120], 1
mov word [ebp - 0x24], 1
jmp 0x422128
mov ax, word [ebp - 0x24]
add ax, word [ebp - 0x120]
jo 0x4223c3
mov word [ebp - 0x24], ax
mov ax, word [ebp - 0x24]
cmp ax, word [ebp - 0x124]
jg 0x4221b9
mov dword [ebp - 4], 0x40
movsx eax, word [ebp - 0x24]
dec eax
mov dword [ebp - 0x108], eax
cmp dword [ebp - 0x108], 7
jae 0x42215d
and dword [ebp - 0x1c0], 0
jmp 0x422168
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1c0], eax
movsx eax, word [ebp - 0x24]
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x422185
and dword [ebp - 0x1c4], 0
jmp 0x422190
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1c4], eax
mov eax, dword [ebp - 0x108]
mov ecx, dword [ebp - 0x30]
mov edx, dword [ecx + eax*4]
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x68]
lea ecx, [ecx + eax*4]
call sub.MSVBVM50.DLL___vbaStrCopy
mov dword [ebp - 4], 0x41
jmp 0x422113
jmp 0x4211b3
mov dword [ebp - 4], 0x43
push 1
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x4221e1
and dword [ebp - 0x1c8], 0
jmp 0x4221ec
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1c8], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x68]
push dword [ecx + eax*4]
push 0x406a8c
call sub.MSVBVM50.DLL___vbaStrCmp
test eax, eax
je 0x4222b5
mov dword [ebp - 4], 0x44
mov eax, dword [ebp - 0x4c]
add eax, 1
jo 0x4223c3
mov dword [ebp - 0x4c], eax
mov dword [ebp - 4], 0x45
push 1
pop eax
dec eax
mov dword [ebp - 0x104], eax
cmp dword [ebp - 0x104], 7
jae 0x422243
and dword [ebp - 0x1cc], 0
jmp 0x42224e
call sub.MSVBVM50.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x1cc], eax
mov eax, dword [ebp - 0x104]
mov ecx, dword [ebp - 0x68]
push dword [ecx + eax*4]
push 0x40906c
call sub.MSVBVM50.DLL___vbaStrCmp
test eax, eax
jne 0x42227c
mov dword [ebp - 4], 0x46
push dword [ebp + 0xc]
push dword [ebp + 0x10]
call fcn.00426bad
jmp 0x4222b5
mov dword [ebp - 4], 0x48
push dword [ebp + 0xc]
push dword [ebp + 0x10]
call fcn.00427e97
mov dword [ebp - 4], 0x49
mov dword [ebp - 0xd4], 0x44105c
mov dword [ebp - 0xdc], 0x4005
lea eax, [ebp - 0xdc]
push eax
call fcn.0042b58a
mov dword [ebp - 4], 0x4c
push dword [ebp - 0x88]
call sub.MSVBVM50.DLL___vbaFileClose
mov dword [ebp - 4], 0x4d
mov eax, dword [ebp + 8]
mov dword [ebp - 0xd4], eax
mov dword [ebp - 0xdc], 0x4008
lea eax, [ebp - 0xdc]
push eax
call sub.MSVBVM50.DLL_rtcKillFiles
mov dword [ebp - 4], 0x4e
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL_rtcGetPresentDate
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM50.DLL___vbaDateVar
fstp qword [ebp - 0x54]
lea ecx, [ebp - 0xac]
call sub.MSVBVM50.DLL___vbaFreeVar
mov dword [ebp - 4], 0x4f
push dword [ebp + 0x10]
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x54]
push eax
lea eax, [ebp - 0x7c]
push eax
push dword [ebp + 0xc]
call fcn.0042ad13
wait
push 0x4223ad
jmp 0x42236b
lea eax, [ebp - 0x3c]
mov dword [ebp - 0xf4], eax
lea eax, [ebp - 0xf4]
push eax
push 0
call sub.MSVBVM50.DLL___vbaAryDestruct
lea ecx, [ebp - 0x44]
call sub.MSVBVM50.DLL___vbaFreeStr
lea eax, [ebp - 0x74]
mov dword [ebp - 0xf8], eax
lea eax, [ebp - 0xf8]
push eax
push 0
call sub.MSVBVM50.DLL___vbaAryDestruct
lea ecx, [ebp - 0x98]
call sub.MSVBVM50.DLL___vbaFreeStr
ret
jmp 0x4037cc
call sub.MSVBVM50.DLL___vbaErrorOverflow