Function at 0x438ec0
Capabilities:
Persist via run registry key

Disassembly:
push ebp
mov ebp, esp
sub esp, 0xc
push 0x404276
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x54
push ebx
push esi
push edi
mov dword [ebp - 0xc], esp
mov dword [ebp - 8], 0x402a90
mov edx, dword [ebp + 8]
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
xor edi, edi
lea ecx, [ebp - 0x18]
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 - 0x40], edi
mov dword [ebp - 0x50], edi
mov dword [ebp - 0x54], edi
call esi
mov edx, dword [ebp - 0x18]
lea ecx, [ebp - 0x1c]
call esi
mov eax, dword [ebp - 0x18]
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaStrToAnsi]
lea ecx, [ebp - 0x24]
push eax
push ecx
call ebx
push eax
call fcn.0041ef90
mov dword [ebp - 0x54], eax
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
mov edx, dword [ebp - 0x24]
lea eax, [ebp - 0x18]
push edx
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
mov esi, dword [ebp - 0x54]
xor ecx, ecx
cmp esi, 1
setne cl
neg ecx
mov esi, ecx
lea ecx, [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
cmp si, di
je 0x438e50
lea edx, [ebp - 0x50]
lea ecx, [ebp - 0x40]
mov dword [ebp - 0x48], 0x422284
mov dword [ebp - 0x50], 8
call dword [sym.imp.MSVBVM60.DLL___vbaVarDup]
lea edx, [ebp - 0x40]
push edx
push 0x104
call dword [sym.imp.MSVBVM60.DLL_rtcStringBstr]
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
mov edx, eax
lea ecx, [ebp - 0x20]
call esi
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov eax, dword [ebp - 0x18]
push eax
call 0x438ec0
mov edx, eax
lea ecx, [ebp - 0x30]
call esi
mov ecx, dword [ebp - 0x30]
mov eax, dword [ebp - 0x20]
lea edx, [ebp - 0x54]
mov dword [ebp - 0x68], ecx
push edx
lea ecx, [ebp - 0x2c]
push eax
push ecx
mov dword [ebp - 0x54], 0x104
mov dword [ebp - 0x30], edi
call ebx
mov edx, dword [ebp - 0x68]
push eax
lea ecx, [ebp - 0x24]
call esi
lea edx, [ebp - 0x28]
push eax
push edx
call ebx
push eax
call fcn.0041ef3c
mov ebx, eax
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
mov eax, dword [ebp - 0x2c]
lea ecx, [ebp - 0x20]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
xor edx, edx
cmp ebx, edi
sete dl
neg edx
lea eax, [ebp - 0x30]
mov ebx, edx
lea ecx, [ebp - 0x2c]
push eax
lea edx, [ebp - 0x28]
push ecx
lea eax, [ebp - 0x24]
push edx
push eax
push 4
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
add esp, 0x14
cmp bx, di
je 0x438e50
mov ecx, dword [ebp - 0x20]
push 1
push ecx
push 0x422284
push edi
call dword [sym.imp.MSVBVM60.DLL___vbaInStr]
mov edx, dword [ebp - 0x20]
sub eax, 1
jo 0x438eb2
push eax
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftCharBstr]
mov edx, eax
lea ecx, [ebp - 0x24]
call esi
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcTrimBstr]
mov edx, eax
lea ecx, [ebp - 0x20]
call esi
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x24]
call edi
mov eax, dword [ebp - 0x20]
mov edx, dword [ebp - 0x18]
lea ecx, [ebp - 0x40]
push eax
push ecx
push 3
push edx
mov dword [ebp - 0x38], 0x80020004
mov dword [ebp - 0x40], 0xa
call dword [sym.imp.MSVBVM60.DLL_rtcMidCharBstr]
mov edx, eax
lea ecx, [ebp - 0x24]
call esi
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x1c]
call esi
lea ecx, [ebp - 0x24]
call edi
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
push 0x438e9c
jmp 0x438e8b
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x18]
call esi
lea ecx, [ebp - 0x20]
call esi
ret
call dword [sym.imp.MSVBVM60.DLL___vbaErrorOverflow]
nop
nop
nop
nop
nop
nop
nop
nop
push ebp
mov ebp, esp
sub esp, 0xc
push 0x404276
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x3c
push ebx
push esi
push edi
mov dword [ebp - 0xc], esp
mov dword [ebp - 8], 0x402aa0
mov edx, dword [ebp + 8]
xor esi, esi
lea ecx, [ebp - 0x18]
mov dword [ebp - 0x18], esi
mov dword [ebp - 0x1c], esi
mov dword [ebp - 0x24], esi
mov dword [ebp - 0x34], esi
call dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
mov eax, dword [ebp - 0x18]
lea ecx, [ebp - 0x24]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrToAnsi]
push eax
call fcn.0041efdc
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
mov edx, dword [ebp - 0x24]
lea eax, [ebp - 0x18]
push edx
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x24]
call edi
mov ecx, dword [ebp - 0x18]
push 1
push ecx
push esi
call dword [sym.imp.MSVBVM60.DLL_rtcBstrFromAnsi]
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
mov edx, eax
lea ecx, [ebp - 0x24]
call ebx
push eax
push esi
call dword [sym.imp.MSVBVM60.DLL___vbaInStr]
lea ecx, [ebp - 0x24]
mov esi, eax
call edi
test esi, esi
je 0x438f88
mov edx, dword [ebp - 0x18]
sub esi, 2
jo 0x439048
push esi
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftCharBstr]
mov edx, eax
lea ecx, [ebp - 0x1c]
call ebx
push 0x439032
jmp 0x439028
mov edx, dword [ebp - 0x18]
lea ecx, [ebp - 0x1c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
mov eax, dword [ebp - 0x1c]
push 1
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcRightCharBstr]
mov edx, eax
lea ecx, [ebp - 0x24]
call ebx
push eax
push 0x41fc3c
call dword [sym.imp.MSVBVM60.DLL___vbaStrCmp]
mov esi, eax
lea ecx, [ebp - 0x24]
neg esi
sbb esi, esi
inc esi
neg esi
call edi
test si, si
je 0x438fff
mov ecx, dword [ebp - 0x1c]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaLenBstr]
sub eax, 1
lea edx, [ebp - 0x34]
jo 0x439048
mov dword [ebp - 0x2c], eax
mov eax, dword [ebp - 0x1c]
push edx
push 1
push eax
mov dword [ebp - 0x34], 3
call dword [sym.imp.MSVBVM60.DLL_rtcMidCharBstr]
mov edx, eax
lea ecx, [ebp - 0x1c]
call ebx
lea ecx, [ebp - 0x34]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
push 0x439032
jmp 0x439028
lea ecx, [ebp - 0x18]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
ret
call dword [sym.imp.MSVBVM60.DLL___vbaErrorOverflow]
nop
nop