Function at 0x424cc0
Capabilities:
Persist via run registry key

Disassembly:
push ebp
mov ebp, esp
sub esp, 8
push 0x401a26
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x9c
push ebx
push esi
push edi
mov dword [ebp - 8], esp
mov dword [ebp - 4], 0x401970
mov eax, dword [0x42a5bc]
xor edi, edi
cmp eax, edi
mov dword [ebp - 0x14], edi
mov dword [ebp - 0x18], edi
mov dword [ebp - 0x1c], edi
mov dword [ebp - 0x20], edi
mov dword [ebp - 0x24], edi
mov dword [ebp - 0x28], edi
mov dword [ebp - 0x2c], edi
mov dword [ebp - 0x30], edi
mov dword [ebp - 0x34], edi
mov dword [ebp - 0x44], edi
mov dword [ebp - 0x54], edi
mov dword [ebp - 0x64], edi
mov dword [ebp - 0x74], edi
mov dword [ebp - 0x84], edi
jne 0x424d38
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaNew2]
push 0x42a5bc
push 0x403e3c
call ebx
jmp 0x424d3e
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaNew2]
mov esi, dword [0x42a5bc]
mov eax, dword [esi]
lea ecx, [ebp - 0x30]
push ecx
push esi
call dword [eax + 0x14]
fnclex
cmp eax, edi
jge 0x424d67
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
push 0x14
push 0x403e2c
push esi
push eax
call edi
jmp 0x424d6d
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
mov eax, dword [ebp - 0x30]
mov edx, dword [eax]
lea ecx, [ebp - 0x20]
push ecx
push eax
mov esi, eax
call dword [edx + 0x50]
fnclex
test eax, eax
jge 0x424d8d
push 0x50
push 0x404674
push esi
push eax
call edi
mov eax, dword [ebp - 0x20]
push 1
lea edx, [ebp - 0x44]
mov dword [ebp - 0x3c], eax
push edx
lea eax, [ebp - 0x54]
push eax
mov dword [ebp - 0x20], 0
mov dword [ebp - 0x44], 8
call dword [sym.imp.MSVBVM60.DLL_rtcRightCharVar]
lea ecx, [ebp - 0x54]
push ecx
lea edx, [ebp - 0x74]
push edx
mov dword [ebp - 0x6c], 0x405114
mov dword [ebp - 0x74], 0x8008
call dword [sym.imp.MSVBVM60.DLL___vbaVarTstEq]
lea ecx, [ebp - 0x30]
mov si, ax
call dword [sym.imp.MSVBVM60.DLL___vbaFreeObj]
lea eax, [ebp - 0x54]
push eax
lea ecx, [ebp - 0x44]
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
mov eax, dword [0x42a5bc]
add esp, 0xc
test si, si
je 0x424ef9
test eax, eax
jne 0x424e0a
push 0x42a5bc
push 0x403e3c
call ebx
mov esi, dword [0x42a5bc]
mov edx, dword [esi]
lea eax, [ebp - 0x30]
push eax
push esi
call dword [edx + 0x14]
fnclex
test eax, eax
jge 0x424e2b
push 0x14
push 0x403e2c
push esi
push eax
call edi
mov eax, dword [ebp - 0x30]
mov ecx, dword [eax]
lea edx, [ebp - 0x20]
push edx
push eax
mov esi, eax
call dword [ecx + 0x50]
fnclex
test eax, eax
jge 0x424e4b
push 0x50
push 0x404674
push esi
push eax
call edi
mov eax, dword [0x42a5bc]
test eax, eax
jne 0x424e60
push 0x42a5bc
push 0x403e3c
call ebx
mov esi, dword [0x42a5bc]
mov eax, dword [esi]
lea ecx, [ebp - 0x34]
push ecx
push esi
call dword [eax + 0x14]
fnclex
test eax, eax
jge 0x424e81
push 0x14
push 0x403e2c
push esi
push eax
call edi
mov eax, dword [ebp - 0x34]
mov edx, dword [eax]
lea ecx, [ebp - 0x24]
push ecx
push eax
mov esi, eax
call dword [edx + 0x58]
fnclex
test eax, eax
jge 0x424ea1
push 0x58
push 0x404674
push esi
push eax
call edi
mov edx, dword [ebp - 0x20]
mov eax, dword [ebp - 0x24]
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
push edx
push eax
call esi
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
mov edx, eax
lea ecx, [ebp - 0x28]
call edi
push eax
push 0x405164
call esi
mov edx, eax
lea ecx, [ebp - 0x14]
call edi
lea ecx, [ebp - 0x28]
push ecx
lea edx, [ebp - 0x24]
push edx
lea eax, [ebp - 0x20]
push eax
push 3
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
lea ecx, [ebp - 0x34]
push ecx
lea edx, [ebp - 0x30]
push edx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeObjList]
add esp, 0x1c
jmp 0x425006
test eax, eax
jne 0x424f09
push 0x42a5bc
push 0x403e3c
call ebx
mov esi, dword [0x42a5bc]
mov eax, dword [esi]
lea ecx, [ebp - 0x30]
push ecx
push esi
call dword [eax + 0x14]
fnclex
test eax, eax
jge 0x424f2a
push 0x14
push 0x403e2c
push esi
push eax
call edi
mov eax, dword [ebp - 0x30]
mov edx, dword [eax]
lea ecx, [ebp - 0x20]
push ecx
push eax
mov esi, eax
call dword [edx + 0x50]
fnclex
test eax, eax
jge 0x424f4a
push 0x50
push 0x404674
push esi
push eax
call edi
mov eax, dword [0x42a5bc]
test eax, eax
jne 0x424f5f
push 0x42a5bc
push 0x403e3c
call ebx
mov esi, dword [0x42a5bc]
mov edx, dword [esi]
lea eax, [ebp - 0x34]
push eax
push esi
call dword [edx + 0x14]
fnclex
test eax, eax
jge 0x424f80
push 0x14
push 0x403e2c
push esi
push eax
call edi
mov eax, dword [ebp - 0x34]
mov ecx, dword [eax]
lea edx, [ebp - 0x24]
push edx
push eax
mov esi, eax
call dword [ecx + 0x58]
fnclex
test eax, eax
jge 0x424fa0
push 0x58
push 0x404674
push esi
push eax
call edi
mov eax, dword [ebp - 0x20]
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
push eax
push 0x405114
call esi
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
mov edx, eax
lea ecx, [ebp - 0x28]
call edi
mov ecx, dword [ebp - 0x24]
push eax
push ecx
call esi
mov edx, eax
lea ecx, [ebp - 0x2c]
call edi
push eax
push 0x405164
call esi
mov edx, eax
lea ecx, [ebp - 0x14]
call edi
lea edx, [ebp - 0x2c]
push edx
lea eax, [ebp - 0x24]
push eax
lea ecx, [ebp - 0x28]
push ecx
lea edx, [ebp - 0x20]
push edx
push 4
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
lea eax, [ebp - 0x34]
push eax
lea ecx, [ebp - 0x30]
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeObjList]
add esp, 0x20
mov edx, 0x405174
lea ecx, [ebp - 0x1c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
mov eax, dword [ebp - 0x1c]
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaStrToAnsi]
lea edx, [ebp - 0x18]
push edx
push eax
lea ecx, [ebp - 0x20]
push ecx
call edi
push eax
push 0x80000002
call fcn.00403f0c
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
call ebx
mov edx, dword [ebp - 0x20]
push edx
lea eax, [ebp - 0x1c]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
lea ecx, [ebp - 0x20]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov eax, dword [0x42a5bc]
test eax, eax
jne 0x42506b
push 0x42a5bc
push 0x403e3c
call dword [sym.imp.MSVBVM60.DLL___vbaNew2]
mov esi, dword [0x42a5bc]
mov ecx, dword [esi]
lea edx, [ebp - 0x30]
push edx
push esi
call dword [ecx + 0x14]
fnclex
test eax, eax
jge 0x425090
push 0x14
push 0x403e2c
push esi
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
mov eax, dword [ebp - 0x30]
mov ecx, dword [eax]
lea edx, [ebp - 0x20]
push edx
push eax
mov esi, eax
call dword [ecx + 0x58]
fnclex
test eax, eax
jge 0x4250b4
push 0x58
push 0x404674
push esi
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
push 0
push 0x80
lea ecx, [ebp - 0x74]
push ecx
lea edx, [ebp - 0x44]
lea eax, [ebp - 0x14]
push edx
mov dword [ebp - 0x6c], eax
mov dword [ebp - 0x74], 0x4008
call dword [sym.imp.MSVBVM60.DLL_rtcStrConvVar2]
lea eax, [ebp - 0x44]
push eax
lea ecx, [ebp - 0x54]
push ecx
mov dword [ebp - 0x7c], 1
mov dword [ebp - 0x84], 2
call dword [sym.imp.MSVBVM60.DLL___vbaLenVarB]
push eax
lea edx, [ebp - 0x84]
push edx
lea eax, [ebp - 0x64]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaVarAdd]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaI4Var]
mov ecx, dword [ebp - 0x14]
push eax
push ecx
lea edx, [ebp - 0x28]
push edx
call edi
push eax
mov eax, dword [ebp - 0x20]
push 1
push 0
push eax
lea ecx, [ebp - 0x24]
push ecx
call edi
mov edx, dword [ebp - 0x18]
push eax
push edx
call fcn.00403f98
call ebx
mov eax, dword [ebp - 0x28]
push eax
lea ecx, [ebp - 0x14]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
lea edx, [ebp - 0x28]
push edx
lea eax, [ebp - 0x24]
push eax
lea ecx, [ebp - 0x20]
push ecx
push 3
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
add esp, 0x10
lea ecx, [ebp - 0x30]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeObj]
lea edx, [ebp - 0x64]
push edx
lea eax, [ebp - 0x44]
push eax
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
mov ecx, dword [ebp - 0x18]
add esp, 0xc
push ecx
call fcn.00403f50
call ebx
push 0x4251d8
jmp 0x4251c7
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x14]
call esi
lea ecx, [ebp - 0x1c]
call esi
ret