Function at 0x418e00
Capabilities:
Self delete

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x403a66
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x90
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x401f80
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
mov dword [ebp - 4], 2
push 0xffffffffffffffff
call dword [sym.imp.MSVBVM60.DLL___vbaOnError]
mov dword [ebp - 4], 3
mov edx, 0x406ce0
lea ecx, [ebp - 0x28]
call dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
mov dword [ebp - 4], 4
call fcn.0041b240
mov edx, eax
lea ecx, [ebp - 0x28]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
mov dword [ebp - 4], 5
call dword [sym.imp.MSVBVM60.DLL_rtcDoEvents]
mov dword [ebp - 4], 6
mov eax, dword [ebp - 0x28]
push eax
push 0x406ce0
call dword [sym.imp.MSVBVM60.DLL___vbaStrCmp]
test eax, eax
jne 0x418fc9
mov dword [ebp - 4], 7
cmp dword [0x42888c], 0
jne 0x418ed7
push 0x42888c
push 0x407ce4
call dword [sym.imp.MSVBVM60.DLL___vbaNew2]
mov dword [ebp - 0xa8], 0x42888c
jmp 0x418ee1
mov dword [ebp - 0xa8], 0x42888c
mov ecx, dword [ebp - 0xa8]
mov edx, dword [ecx]
mov dword [ebp - 0x80], edx
lea eax, [ebp - 0x50]
push eax
mov ecx, dword [ebp - 0x80]
mov edx, dword [ecx]
mov eax, dword [ebp - 0x80]
push eax
call dword [edx + 0x14]
fnclex
mov dword [ebp - 0x84], eax
cmp dword [ebp - 0x84], 0
jge 0x418f2d
push 0x14
push 0x407cd4
mov ecx, dword [ebp - 0x80]
push ecx
mov edx, dword [ebp - 0x84]
push edx
call dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
mov dword [ebp - 0xac], eax
jmp 0x418f37
mov dword [ebp - 0xac], 0
mov eax, dword [ebp - 0x50]
mov dword [ebp - 0x88], eax
lea ecx, [ebp - 0x3c]
push ecx
mov edx, dword [ebp - 0x88]
mov eax, dword [edx]
mov ecx, dword [ebp - 0x88]
push ecx
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0x8c], eax
cmp dword [ebp - 0x8c], 0
jge 0x418f8a
push 0x50
push 0x407cf4
mov edx, dword [ebp - 0x88]
push edx
mov eax, dword [ebp - 0x8c]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
mov dword [ebp - 0xb0], eax
jmp 0x418f94
mov dword [ebp - 0xb0], 0
mov ecx, dword [ebp - 0x3c]
mov dword [ebp - 0xa4], ecx
mov dword [ebp - 0x3c], 0
mov edx, dword [ebp - 0xa4]
lea ecx, [ebp - 0x28]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
lea ecx, [ebp - 0x50]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeObj]
mov dword [ebp - 4], 8
call dword [sym.imp.MSVBVM60.DLL_rtcDoEvents]
mov dword [ebp - 4], 0xa
mov dword [ebp - 0x58], 0x80020004
mov dword [ebp - 0x60], 0xa
lea edx, [ebp - 0x60]
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcFreeFile]
movsx eax, ax
mov dword [ebp - 0x24], eax
lea ecx, [ebp - 0x60]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov dword [ebp - 4], 0xb
mov ecx, dword [ebp - 0x28]
push ecx
push 0x409250
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov ecx, dword [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
push 0xffffffffffffffff
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFileOpen]
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov dword [ebp - 4], 0xc
push 0x409270
mov ecx, dword [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
push 0x409288
call dword [sym.imp.MSVBVM60.DLL___vbaPrintFile]
add esp, 0xc
mov dword [ebp - 4], 0xd
push 0x409290
mov ecx, dword [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
push 0x409288
call dword [sym.imp.MSVBVM60.DLL___vbaPrintFile]
add esp, 0xc
mov dword [ebp - 4], 0xe
mov edx, dword [ebp + 0xc]
movsx eax, word [edx]
test eax, eax
jne 0x4190d6
mov dword [ebp - 4], 0xf
push 0x40937c
mov ecx, dword [ebp + 0x10]
mov edx, dword [ecx]
push edx
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov ecx, dword [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
push 0x409288
call dword [sym.imp.MSVBVM60.DLL___vbaPrintFile]
add esp, 0xc
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
jmp 0x41911b
mov dword [ebp - 4], 0x11
push 0x409418
mov eax, dword [ebp + 0x10]
mov ecx, dword [eax]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov ecx, dword [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
push 0x409288
call dword [sym.imp.MSVBVM60.DLL___vbaPrintFile]
add esp, 0xc
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov dword [ebp - 4], 0x13
push 0x409484
mov edx, dword [0x428078]
push edx
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov eax, dword [ebp - 0x28]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
push 0x409250
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x44]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov ecx, dword [0x428078]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x48]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov ecx, dword [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
push 0x409288
call dword [sym.imp.MSVBVM60.DLL___vbaPrintFile]
add esp, 0xc
lea edx, [ebp - 0x48]
push edx
lea eax, [ebp - 0x44]
push eax
lea ecx, [ebp - 0x40]
push ecx
lea edx, [ebp - 0x3c]
push edx
push 4
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
add esp, 0x14
mov dword [ebp - 4], 0x14
mov ecx, dword [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaFileClose]
mov dword [ebp - 4], 0x15
call dword [sym.imp.MSVBVM60.DLL_rtcDoEvents]
mov dword [ebp - 4], 0x16
push 0x407f80
call dword [sym.imp.MSVBVM60.DLL_VarPtr]
mov dword [ebp - 0x74], eax
push 0x4094a0
call dword [sym.imp.MSVBVM60.DLL_VarPtr]
mov dword [ebp - 0x78], eax
push 0x4094b4
mov eax, dword [0x428078]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov ecx, dword [ebp - 0x28]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
push 0x409250
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x44]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
mov edx, dword [0x428078]
push edx
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x48]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
push 0x4094f0
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x4c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
call dword [sym.imp.MSVBVM60.DLL_VarPtr]
mov dword [ebp - 0x7c], eax
push 7
push 0
mov eax, dword [ebp - 0x7c]
push eax
mov ecx, dword [ebp - 0x78]
push ecx
mov edx, dword [ebp - 0x74]
push edx
push 0
call fcn.00407660
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
lea eax, [ebp - 0x4c]
push eax
lea ecx, [ebp - 0x48]
push ecx
lea edx, [ebp - 0x44]
push edx
lea eax, [ebp - 0x40]
push eax
lea ecx, [ebp - 0x3c]
push ecx
push 5
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
add esp, 0x18
mov dword [ebp - 4], 0x17
call dword [sym.imp.MSVBVM60.DLL_rtcDoEvents]
push 0x419322
jmp 0x419318
lea ecx, [ebp - 0x28]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
ret