004153B0 push ebp 004153B1 mov ebp,esp 004153B3 sub esp,0Ch 004153B6 push 00401476h 004153BB mov eax,fs:[00000000h] 004153C1 push eax 004153C2 mov fs:[00000000h],esp 004153C9 sub esp,28h 004153CC push ebx 004153CD push esi 004153CE mov esi,[ebp+00000008h] 004153D1 push edi 004153D2 mov eax,esi 004153D4 and esi,FFFFFFFEh 004153D7 mov [ebp-0000000Ch],esp 004153DA and eax,01h 004153DD mov ecx,[esi] * Possible string reference 401288h "" | 004153DF mov dword ptr [ebp-00000008h],00401288h 004153E6 push esi 004153E7 mov [ebp-00000004h],eax 004153EA mov [ebp+00000008h],esi 004153ED call dword ptr [ecx+00000004h] 004153F0 mov edx,[esi] 004153F2 xor eax,eax 004153F4 push esi 004153F5 mov [ebp-00000018h],eax 004153F8 mov [ebp-0000001Ch],eax 004153FB mov [ebp-00000020h],eax 004153FE mov [ebp-00000024h],eax 00415401 mov [ebp-00000028h],eax 00415404 call dword ptr [edx+00000354h] * Reference to MSVBVM50.__vbaObjSet | 0041540A mov ebx,[0041F23Ch] 00415410 push eax 00415411 lea eax,[ebp-00000024h] 00415414 push eax 00415415 call ebx 00415417 mov edi,eax 00415419 lea edx,[ebp-00000018h] 0041541C push edx 0041541D push edi 0041541E mov ecx,[edi] 00415420 call dword ptr [ecx+000000A8h] 00415426 test eax,eax 00415428 jnl 0041543Ch 0041542A push 000000A8h * Possible string reference 409150h "" | 0041542F push 00409150h 00415434 push edi 00415435 push eax * Reference to MSVBVM50.__vbaHresultCheckObj | 00415436 call dword ptr [0041F220h] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 00415428(C) | 0041543C mov eax,[ebp-00000018h] 0041543F push eax * Possible string reference 409740h "Todas" | 00415440 push 00409740h * Reference to MSVBVM50.__vbaStrCmp | 00415445 call dword ptr [0041F280h] 0041544B mov edi,eax 0041544D lea ecx,[ebp-00000018h] 00415450 neg edi 00415452 sbb edi,edi 00415454 neg edi 00415456 neg edi * Reference to MSVBVM50.__vbaFreeStr | 00415458 call dword ptr [0041F368h] 0041545E lea ecx,[ebp-00000024h] * Reference to MSVBVM50.__vbaFreeObj | 00415461 call dword ptr [0041F36Ch] 00415467 test di,di 0041546A jz 00415637h 00415470 mov ecx,[esi] 00415472 push esi 00415473 call dword ptr [ecx+00000368h] 00415479 lea edx,[ebp-00000024h] 0041547C push eax 0041547D push edx 0041547E call ebx 00415480 mov edi,eax 00415482 lea ecx,[ebp-00000028h] 00415485 push ecx 00415486 push edi 00415487 mov eax,[edi] 00415489 call dword ptr [eax+000000E0h] 0041548F test eax,eax 00415491 jnl 004154A5h 00415493 push 000000E0h * Possible string reference 4093B4h "" | 00415498 push 004093B4h 0041549D push edi 0041549E push eax * Reference to MSVBVM50.__vbaHresultCheckObj | 0041549F call dword ptr [0041F220h] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 00415491(C) | 004154A5 mov edi,[ebp-00000028h] 004154A8 lea ecx,[ebp-00000024h] * Reference to MSVBVM50.__vbaFreeObj | 004154AB call dword ptr [0041F36Ch] 004154B1 test di,di 004154B4 jz 00415549h 004154BA mov edx,[esi] 004154BC push esi 004154BD call dword ptr [edx+00000354h] 004154C3 push eax 004154C4 lea eax,[ebp-00000024h] 004154C7 push eax 004154C8 call ebx 004154CA mov edi,eax 004154CC lea edx,[ebp-00000018h] 004154CF push edx 004154D0 push edi 004154D1 mov ecx,[edi] 004154D3 call dword ptr [ecx+000000A8h] 004154D9 test eax,eax 004154DB jnl 004154EFh 004154DD push 000000A8h * Possible string reference 409150h "" | 004154E2 push 00409150h 004154E7 push edi 004154E8 push eax * Reference to MSVBVM50.__vbaHresultCheckObj | 004154E9 call dword ptr [0041F220h] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 004154DB(C) | 004154EF mov eax,[ebp-00000018h] * Reference to MSVBVM50.__vbaStrCat | 004154F2 mov ebx,[0041F20Ch] * Possible string reference 409750h "SELECT * FROM directorio WHERE apellidos LIKE '" | 004154F8 push 00409750h 004154FD push eax 004154FE call ebx * Reference to MSVBVM50.__vbaStrMove | 00415500 mov edi,[0041F34Ch] 00415506 mov edx,eax 00415508 lea ecx,[ebp-0000001Ch] 0041550B call edi 0041550D push eax * Possible string reference 4097B4h "*' " | 0041550E push 004097B4h 00415513 call ebx 00415515 mov edx,eax 00415517 lea ecx,[ebp-00000020h] 0041551A call edi 0041551C mov edx,eax 0041551E lea ecx,[esi+00000034h] * Reference to MSVBVM50.__vbaStrCopy | 00415521 call dword ptr [0041F300h] 00415527 lea ecx,[ebp-00000020h] 0041552A lea edx,[ebp-0000001Ch] 0041552D push ecx 0041552E lea eax,[ebp-00000018h] 00415531 push edx 00415532 push eax 00415533 push 03h * Reference to MSVBVM50.__vbaFreeStrList | 00415535 call dword ptr [0041F308h] 0041553B add esp,10h 0041553E lea ecx,[ebp-00000024h] * Reference to MSVBVM50.__vbaFreeObj | 00415541 call dword ptr [0041F36Ch] 00415547 jmp 00415555h * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 004154B4(C) | * Reference to MSVBVM50.__vbaStrMove | 00415549 mov edi,[0041F34Ch] * Reference to MSVBVM50.__vbaStrCat | 0041554F mov ebx,[0041F20Ch] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 00415547(U) | 00415555 mov ecx,[esi] 00415557 push esi 00415558 call dword ptr [ecx+00000364h] 0041555E lea edx,[ebp-00000024h] 00415561 push eax 00415562 push edx * Reference to MSVBVM50.__vbaObjSet | 00415563 call dword ptr [0041F23Ch] 00415569 mov ecx,[eax] 0041556B lea edx,[ebp-00000028h] 0041556E push edx 0041556F push eax 00415570 mov [ebp-0000002Ch],eax 00415573 call dword ptr [ecx+000000E0h] 00415579 test eax,eax 0041557B jnl 00415592h 0041557D mov ecx,[ebp-0000002Ch] 00415580 push 000000E0h * Possible string reference 4093B4h "" | 00415585 push 004093B4h 0041558A push ecx 0041558B push eax * Reference to MSVBVM50.__vbaHresultCheckObj | 0041558C call dword ptr [0041F220h] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 0041557B(C) | 00415592 mov edx,[ebp-00000028h] 00415595 lea ecx,[ebp-00000024h] 00415598 mov [ebp-00000034h],edx * Reference to MSVBVM50.__vbaFreeObj | 0041559B call dword ptr [0041F36Ch] 004155A1 cmp word ptr [ebp-00000034h],00h 004155A6 jz 00415645h 004155AC mov eax,[esi] 004155AE push esi 004155AF call dword ptr [eax+00000354h] 004155B5 lea ecx,[ebp-00000024h] 004155B8 push eax 004155B9 push ecx * Reference to MSVBVM50.__vbaObjSet | 004155BA call dword ptr [0041F23Ch] 004155C0 mov edx,[eax] 004155C2 lea ecx,[ebp-00000018h] 004155C5 push ecx 004155C6 push eax 004155C7 mov [ebp-0000002Ch],eax 004155CA call dword ptr [edx+000000A8h] 004155D0 test eax,eax 004155D2 jnl 004155E9h 004155D4 mov edx,[ebp-0000002Ch] 004155D7 push 000000A8h * Possible string reference 409150h "" | 004155DC push 00409150h 004155E1 push edx 004155E2 push eax * Reference to MSVBVM50.__vbaHresultCheckObj | 004155E3 call dword ptr [0041F220h] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 004155D2(C) | 004155E9 mov eax,[ebp-00000018h] * Possible string reference 4097C0h "SELECT * FROM directorio WHERE nombres LIKE '" | 004155EC push 004097C0h 004155F1 push eax 004155F2 call ebx 004155F4 mov edx,eax 004155F6 lea ecx,[ebp-0000001Ch] 004155F9 call edi 004155FB push eax * Possible string reference 4097B4h "*' " | 004155FC push 004097B4h 00415601 call ebx 00415603 mov edx,eax 00415605 lea ecx,[ebp-00000020h] 00415608 call edi 0041560A mov edx,eax 0041560C lea ecx,[esi+00000034h] * Reference to MSVBVM50.__vbaStrCopy | 0041560F call dword ptr [0041F300h] 00415615 lea ecx,[ebp-00000020h] 00415618 lea edx,[ebp-0000001Ch] 0041561B push ecx 0041561C lea eax,[ebp-00000018h] 0041561F push edx 00415620 push eax 00415621 push 03h * Reference to MSVBVM50.__vbaFreeStrList | 00415623 call dword ptr [0041F308h] 00415629 add esp,10h 0041562C lea ecx,[ebp-00000024h] * Reference to MSVBVM50.__vbaFreeObj | 0041562F call dword ptr [0041F36Ch] 00415635 jmp 00415645h * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 0041546A(C) | * Possible string reference 409820h "SELECT * FROM directorio " | 00415637 mov edx,00409820h 0041563C lea ecx,[esi+00000034h] * Reference to MSVBVM50.__vbaStrCopy | 0041563F call dword ptr [0041F300h] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 004155A6(C), 00415635(U) | 00415645 mov ecx,[esi] 00415647 push esi 00415648 call dword ptr [ecx+000006F8h] 0041564E test eax,eax 00415650 jnl 00415664h 00415652 push 000006F8h * Possible string reference 4081F8h "" | 00415657 push 004081F8h 0041565C push esi 0041565D push eax * Reference to MSVBVM50.__vbaHresultCheckObj | 0041565E call dword ptr [0041F220h] * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 00415650(C) | 00415664 mov dword ptr [ebp-00000004h],00000000h * Possible string reference 415694h "" | 0041566B push 00415694h 00415670 jmp 00415693h 00415672 lea edx,[ebp-00000020h] 00415675 lea eax,[ebp-0000001Ch] 00415678 push edx 00415679 lea ecx,[ebp-00000018h] 0041567C push eax 0041567D push ecx 0041567E push 03h * Reference to MSVBVM50.__vbaFreeStrList | 00415680 call dword ptr [0041F308h] 00415686 add esp,10h 00415689 lea ecx,[ebp-00000024h] * Reference to MSVBVM50.__vbaFreeObj | 0041568C call dword ptr [0041F36Ch] 00415692 ret * Referenced by a (U)nconditional or (C)onditional Jump or (c)all at Address: | 00415670(U) | 00415693 ret 00415694 mov eax,[ebp+00000008h] 00415697 push eax 00415698 mov edx,[eax] 0041569A call dword ptr [edx+00000008h] 0041569D mov ecx,[ebp-00000014h] 004156A0 mov eax,[ebp-00000004h] 004156A3 pop edi 004156A4 pop esi 004156A5 mov fs:[00000000h],ecx 004156AC pop ebx 004156AD mov esp,ebp 004156AF pop ebp 004156B0 ret 0004h 004156B3 nop 004156B4 nop 004156B5 nop 004156B6 nop 004156B7 nop 004156B8 nop 004156B9 nop 004156BA nop 004156BB nop 004156BC nop 004156BD nop 004156BE nop 004156BF nop