[cc lang="ASM"]include 'win32ax.inc'
.data
ruta db 'c:\windows\system32\calc.exe',0
.code
start:
stdcall Leer
proc Leer
locals
manija dd ?
larchivo dd ?
espacio dd ?
bleidos dd ?
error dd ?
endl
invoke CreateFile,ruta, GENERIC_READ, FILE_SHARE_READ, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0
mov [manija],eax
invoke GetFileSize,[manija],0
mov [larchivo],eax
invoke GlobalAlloc,GPTR,[larchivo]
mov [espacio],eax
invoke ReadFile,[manija],[espacio],[larchivo],addr bleidos,0
invoke CloseHandle,[manija]
invoke MessageBox,0,[espacio],'Ves como lee?',MB_OK
ret
endp
.end start[/cc]
