Function at 0x40f030
Capabilities:
Check http status code

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x402506
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x4e0
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x401cc0
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
mov edx, dword [ebp + 8]
lea ecx, [ebp - 0x284]
call dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
push 3
push 0x4065c8
lea eax, [ebp - 0x48]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaAryConstruct2]
mov dword [ebp - 4], 2
push 0xffffffffffffffff
call dword [sym.imp.MSVBVM60.DLL___vbaOnError]
mov dword [ebp - 4], 3
push 0
push 0xf
call fcn.00404c70
mov dword [ebp - 0x294], eax
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
mov ecx, dword [ebp - 0x294]
mov dword [ebp - 0x28], ecx
mov dword [ebp - 4], 4
mov dword [ebp - 0x280], 0x128
mov dword [ebp - 4], 5
lea edx, [ebp - 0x280]
push edx
lea eax, [ebp - 0x3c0]
push eax
push 0x404a70
call dword [sym.imp.MSVBVM60.DLL___vbaRecUniToAnsi]
push eax
mov ecx, dword [ebp - 0x28]
push ecx
call fcn.00404ce4
mov dword [ebp - 0x294], eax
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
lea edx, [ebp - 0x3c0]
push edx
lea eax, [ebp - 0x280]
push eax
push 0x404a70
call dword [sym.imp.MSVBVM60.DLL___vbaRecAnsiToUni]
mov ecx, dword [ebp - 0x294]
mov dword [ebp - 0x2c], ecx
mov dword [ebp - 4], 6
mov dword [ebp - 0x50], 0x1f4
mov dword [ebp - 4], 7
push 0x104
call dword [sym.imp.MSVBVM60.DLL_rtcSpaceBstr]
mov edx, eax
lea ecx, [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
mov dword [ebp - 4], 8
cmp dword [ebp - 0x2c], 0
je 0x40f38d
mov dword [ebp - 4], 9
mov edx, dword [ebp - 0x278]
push edx
push 0
push 0x410
call fcn.00404db4
mov dword [ebp - 0x294], eax
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
mov eax, dword [ebp - 0x294]
mov dword [ebp - 0x288], eax
mov dword [ebp - 4], 0xa
mov ecx, 1
sub ecx, 1
mov dword [ebp - 0x298], ecx
cmp dword [ebp - 0x298], 0xc8
jae 0x40f1cd
mov dword [ebp - 0x500], 0
jmp 0x40f1d9
call dword [sym.imp.MSVBVM60.DLL___vbaGenerateBoundsError]
mov dword [ebp - 0x500], eax
mov edx, dword [ebp - 0x50]
push edx
mov eax, dword [ebp - 0x24]
push eax
lea ecx, [ebp - 0x28c]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrToAnsi]
push eax
mov edx, dword [ebp - 0x298]
mov eax, dword [ebp - 0x3c]
mov ecx, dword [eax + edx*4]
push ecx
mov edx, dword [ebp - 0x288]
push edx
call fcn.00404e14
mov dword [ebp - 0x294], eax
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
mov eax, dword [ebp - 0x28c]
push eax
lea ecx, [ebp - 0x24]
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
mov edx, dword [ebp - 0x294]
mov dword [ebp - 0x30], edx
lea ecx, [ebp - 0x28c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov dword [ebp - 4], 0xb
mov eax, dword [ebp - 0x30]
push eax
mov ecx, dword [ebp - 0x24]
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftCharBstr]
mov edx, eax
lea ecx, [ebp - 0x28c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
lea edx, [ebp - 0x28c]
push edx
call fcn.0040fa10
mov edx, eax
lea ecx, [ebp - 0x54]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
lea ecx, [ebp - 0x28c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
mov dword [ebp - 4], 0xc
mov eax, dword [ebp - 0x54]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaLenBstr]
test eax, eax
jle 0x40f330
mov dword [ebp - 4], 0xd
push 1
mov ecx, dword [ebp - 0x284]
push ecx
push 0x406070
mov edx, dword [ebp - 0x54]
push edx
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x28c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
push 0x406070
call dword [sym.imp.MSVBVM60.DLL___vbaStrCat]
mov edx, eax
lea ecx, [ebp - 0x290]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
push 1
call dword [sym.imp.MSVBVM60.DLL___vbaInStr]
xor ecx, ecx
test eax, eax
setg cl
neg ecx
mov word [ebp - 0x298], cx
lea edx, [ebp - 0x290]
push edx
lea eax, [ebp - 0x28c]
push eax
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
add esp, 0xc
movsx ecx, word [ebp - 0x298]
test ecx, ecx
je 0x40f330
mov dword [ebp - 4], 0xe
lea edx, [ebp - 0x278]
push edx
call fcn.0040ef30
mov dword [ebp - 4], 0x11
lea eax, [ebp - 0x280]
push eax
lea ecx, [ebp - 0x4e8]
push ecx
push 0x404a70
call dword [sym.imp.MSVBVM60.DLL___vbaRecUniToAnsi]
push eax
mov edx, dword [ebp - 0x28]
push edx
call fcn.00404d2c
mov dword [ebp - 0x294], eax
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
lea eax, [ebp - 0x4e8]
push eax
lea ecx, [ebp - 0x280]
push ecx
push 0x404a70
call dword [sym.imp.MSVBVM60.DLL___vbaRecAnsiToUni]
mov edx, dword [ebp - 0x294]
mov dword [ebp - 0x2c], edx
jmp 0x40f15d
mov dword [ebp - 4], 0x13
mov eax, dword [ebp - 0x28]
push eax
call fcn.00404d70
call dword [sym.imp.MSVBVM60.DLL___vbaSetSystemError]
push 0x40f3fb
jmp 0x40f3c4
lea ecx, [ebp - 0x24]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea eax, [ebp - 0x48]
mov dword [ebp - 0x294], eax
lea ecx, [ebp - 0x294]
push ecx
push 0
call dword [sym.imp.MSVBVM60.DLL___vbaAryDestruct]
lea ecx, [ebp - 0x54]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x284]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
ret