Как копировать файлы в fasm?

Как мне, например, файл 'E:\text.txt' скопировать в папку 'E:\files'?


Ответы (1 шт):

Автор решения: PRODIGY

Если папки E:\Files не существует, то функция CopyFile() вернёт ошибку. Тогда нужно сначала создать папку через CreateFile() и только потом в неё копировать.

format pe gui
include 'win32ax.inc'
;//----------
.data
oldFile   db   'D:\cpuz.txt',0
newFile   db   'D:\files\cpuz.txt',0
;//----------
.code
start:   invoke  CopyFile,oldFile,newFile,0
         or      eax,eax
         jne     @ok
         invoke  MessageBox,0,<'ERROR! Нет папки D:\Files',0>,<'Copy',0>,0
         jmp     @f
@ok:     invoke  MessageBox,0,<'OK! Файл скопирован.',0>,<'Copy',0>,0
@@:      invoke  ExitProcess,0
;//------------
.end start
→ Ссылка