Function at 0x439050
Capabilities:
Persist via run registry key

Disassembly:
push ebp
mov ebp, esp
sub esp, 8
push 0x404276
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x40
push ebx
push esi
push edi
mov dword [ebp - 8], esp
mov dword [ebp - 4], 0x402ab0
xor eax, eax
lea ecx, [ebp - 0x38]
mov dword [ebp - 0x2c], eax
lea edx, [ebp - 0x14]
mov dword [ebp - 0x28], eax
push ecx
mov dword [ebp - 0x24], eax
lea eax, [ebp - 0x2c]
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaStrToAnsi]
push edx
xor esi, esi
push eax
push 0x3f
push esi
push esi
push esi
lea ecx, [ebp - 0x30]
push 0x41de7c
push ecx
mov dword [ebp - 0x14], esi
mov dword [ebp - 0x20], esi
mov dword [ebp - 0x30], esi
mov dword [ebp - 0x34], esi
mov dword [ebp - 0x3c], esi
mov dword [ebp - 0x40], esi
mov dword [ebp - 0x24], 1
mov dword [ebp - 0x28], esi
mov dword [ebp - 0x2c], 0xc
mov dword [ebp - 0x38], esi
call edi
push eax
push 0x80000002
call fcn.0041f038
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
mov dword [ebp - 0x3c], eax
call ebx
mov edx, dword [ebp - 0x3c]
lea ecx, [ebp - 0x30]
mov dword [ebp - 0x18], edx
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov eax, dword [ebp - 0x18]
cmp eax, esi
jne 0x439263
cmp word [ebp + 8], si
je 0x4391b0
mov eax, dword [0x441028]
add eax, 0x48
push eax
call fcn.00437180
mov edx, eax
lea ecx, [ebp - 0x30]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
push 0x422284
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x20]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
lea ecx, [ebp - 0x30]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov ecx, dword [ebp - 0x20]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaLenBstr]
mov edx, dword [ebp - 0x20]
push eax
lea eax, [ebp - 0x34]
push edx
push eax
call edi
push eax
push 1
push esi
lea ecx, [ebp - 0x30]
push 0x41dedc
push ecx
call edi
mov edx, dword [ebp - 0x14]
push eax
push edx
call fcn.0041f080
mov dword [ebp - 0x38], eax
call ebx
mov eax, dword [ebp - 0x34]
lea ecx, [ebp - 0x20]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
mov edx, dword [ebp - 0x38]
lea eax, [ebp - 0x34]
lea ecx, [ebp - 0x30]
push eax
push ecx
push 2
mov dword [ebp - 0x1c], edx
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
mov ecx, dword [ebp - 0x14]
add esp, 0xc
push ecx
call fcn.0041f144
call ebx
push 0x43928b
jmp 0x439281
lea edx, [ebp - 0x40]
lea eax, [ebp - 0x3c]
push edx
lea ecx, [ebp - 0x38]
push eax
push ecx
push esi
lea edx, [ebp - 0x30]
push 0x41dedc
push edx
mov dword [ebp - 0x40], esi
mov dword [ebp - 0x3c], esi
mov dword [ebp - 0x38], esi
call edi
push eax
mov eax, dword [ebp - 0x14]
push eax
call fcn.0041f0cc
mov dword [ebp - 0x44], eax
call ebx
lea ecx, [ebp - 0x30]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov ecx, dword [ebp - 0x44]
mov eax, ecx
sub eax, esi
je 0x439228
sub eax, 2
je 0x439213
sub eax, 0xe8
je 0x439228
mov dword [ebp - 0x1c], ecx
mov ecx, dword [ebp - 0x14]
push ecx
call fcn.0041f144
call ebx
push 0x43928b
jmp 0x439281
mov ecx, dword [ebp - 0x14]
mov dword [ebp - 0x1c], esi
push ecx
call fcn.0041f144
call ebx
push 0x43928b
jmp 0x439281
lea ecx, [ebp - 0x30]
push 0x41dedc
push ecx
call edi
mov edx, dword [ebp - 0x14]
push eax
push edx
call fcn.0041f100
mov dword [ebp - 0x38], eax
call ebx
mov eax, dword [ebp - 0x38]
lea ecx, [ebp - 0x30]
mov dword [ebp - 0x1c], eax
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov ecx, dword [ebp - 0x14]
push ecx
call fcn.0041f144
call ebx
push 0x43928b
jmp 0x439281
mov dword [ebp - 0x1c], eax
push 0x43928b
jmp 0x439281
lea ecx, [ebp - 0x20]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
ret