易语言目录文件操作模块源码 [db:版本]

易语言目录文件操作模块源码

系统结构:模块_打开文件,模块_关闭文件,模块_取文件长度,模块_读入字节集,模块_写出字节集,模块_到文件首,模块_到文件尾,模块_取当前读写位置,模块_移动读写位置,模块_取文件时间,模块_置文件时间,模块_对比文件,时间类型转换,时间比较,模块_搜索目录,归递搜索目录,模块_目录是否存在,模块_创建多级目录,模块_搜索文件,同步对比目录,删除多余,删除多余文件,复制差异,检查差异文件,CreateFile,CloseHandle,GetFileSize,RtlMoveMemory,lstrcpyn,WriteFile_,ReadFile_,FlushFileBuffers,SetFilePointer,GetFileTime,SystemTimeToFileTime,FileTimeToSystemTime,LocalFileTimeToFileTime,FileTimeToLocalFileTime,PathIsDirectory,SetFileTime,SetEndOfFile,

======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======文件操作接口程序集
| |
| |------ 模块_打开文件
| |
| |------ 模块_关闭文件
| |
| |------ 模块_取文件长度
| |
| |------ 模块_读入字节集
| |
| |------ 模块_写出字节集
| |
| |------ 模块_到文件首
| |
| |------ 模块_到文件尾
| |
| |------ 模块_取当前读写位置
| |
| |------ 模块_移动读写位置
| |
| |------ 模块_取文件时间
| |
| |------ 模块_置文件时间
| |
| |------ 模块_对比文件
| |
| |------ 时间类型转换
| |
| |------ 时间比较
| |
| |
======目录操作接口程序集
| |
| |------ 模块_搜索目录
| |
| |------ 归递搜索目录
| |
| |------ 模块_目录是否存在
| |
| |------ 模块_创建多级目录
| |
| |------ 模块_搜索文件
| |
| |
======目录对比程序集
| |
| |------ 同步对比目录
| |
| |------ 删除多余
| |
| |------ 删除多余文件
| |
| |------ 复制差异
| |
| |------ 检查差异文件
| |
| |
======调用的Dll
| |
| |---[dll]------ CreateFile
| |
| |---[dll]------ CloseHandle
| |
| |---[dll]------ GetFileSize
| |
| |---[dll]------ RtlMoveMemory
| |
| |---[dll]------ lstrcpyn
| |
| |---[dll]------ WriteFile_
| |
| |---[dll]------ ReadFile_
| |
| |---[dll]------ FlushFileBuffers
| |
| |---[dll]------ SetFilePointer
| |
| |---[dll]------ GetFileTime
| |
| |---[dll]------ SystemTimeToFileTime
| |
| |---[dll]------ FileTimeToSystemTime
| |
| |---[dll]------ LocalFileTimeToFileTime
| |
| |---[dll]------ FileTimeToLocalFileTime
| |
| |---[dll]------ PathIsDirectory
| |
| |---[dll]------ SetFileTime
| |
| |---[dll]------ SetEndOfFile

调用的DLL命令:

.DLL命令 CreateFile, 整数型, "kernel32.dll", "CreateFileA", , 打开或创建文件，返回文件句柄
.参数 lpFileName, 文本型, , 文件路径
.参数 dwDesiredAccess, 整数型, , 打开方式
.参数 dwShareMode, 整数型, , 共享方式
.参数 lpSecurityAttributes, 整数型, , 安全属性
.参数 dwCreationDisposition, 整数型, , 创建方式
.参数 dwFlagsAndAttributes, 整数型, , 文件属性
.参数 hTemplateFile, 整数型, , 用于复制文件句柄

.DLL命令 CloseHandle, 逻辑型, "kernel32.dll", "CloseHandle", , 关闭一个内核对象
.参数 hObject, 整数型, , 文件句柄

.DLL命令 GetFileSize, 整数型, "kernel32", "GetFileSize", , 取出文件的长度
.参数 文件句柄, 整数型
.参数 尺寸大小, 整数型, 传址

.DLL命令 RtlMoveMemory, , "kernel32", "RtlMoveMemory", , 复制内存
.参数 目的变量, 整数型, , pTo
.参数 源, 整数型, 传址, uFrom
.参数 尺寸, 整数型, , lSize

.DLL命令 lstrcpyn, 整数型, "kernel32", "lstrcpynA", , 取长整数型地址
.参数 数据1, 长整数型, 传址, lpString1
.参数 数据2, 长整数型, 传址, lpString2
.参数 数据长度, 整数型, , iMaxLength

.DLL命令 WriteFile_, 逻辑型, "kernel32.dll", "WriteFile", , 从文件缓冲区写出数据到文件
.参数 hFile, 整数型, , 文件句柄
.参数 Buffer, 字节集, , 写的字节
.参数 nNumberOfBytesToWrite, 整数型, , 写的数量
.参数 lpNumberOfBytesWritten, 整数型, 传址, 实际写的数量
.参数 lpOverlapped, 整数型

.DLL命令 ReadFile_, 逻辑型, "kernel32.dll", "ReadFile", , 从文件读入数据到文件缓冲区
.参数 hFile, 整数型, , 文件句柄
.参数 Buffer, 字节集, , 读的字节
.参数 nNumberOfBytesToRead, 整数型, , 读的数量
.参数 lpNumberOfBytesRead, 整数型, 传址, 实际读的数量
.参数 lpOverlapped, 整数型

.DLL命令 FlushFileBuffers, 整数型, "kernel32", "FlushFileBuffers"
.参数 hFile, 整数型

.DLL命令 SetFilePointer, 整数型, "kernel32.dll", "SetFilePointer", , 设置当前读写位置，返回当前指针
.参数 hFile, 整数型, , 文件句柄
.参数 lDistanceToMove, 整数型, , 低位偏移字节
.参数 lpDistanceToMoveHigh, 整数型, , 高位偏移指针
.参数 dwMoveMethod, 整数型, , 方式, 0 从头, 1 当前, 2 文件尾

.DLL命令 GetFileTime, 逻辑型, "kernel32", "GetFileTime", , 取出指定文件时间，非0表示成功
.参数 文件号, 整数型
.参数 创建时间, 文件时间, , UTC格式的文件时间，下同
.参数 访问时间, 文件时间
.参数 修改时间, 文件时间

.DLL命令 SystemTimeToFileTime, 整数型, "kernel32", "SystemTimeToFileTime", , 系统时间转换为本地时间，把系统时间转换为本地格式的文件时间，非0表示成功
.参数 系统时间, 系统时间
.参数 文件时间, 文件时间, , 本地格式的文件时间

.DLL命令 FileTimeToSystemTime, 整数型, "kernel32", "FileTimeToSystemTime", , 把本地格式的文件时间转换为系统时间，非0表示成功
.参数 文件时间, 文件时间, , 本地格式的文件时间
.参数 系统时间, 系统时间

.DLL命令 LocalFileTimeToFileTime, 整数型, "kernel32", "LocalFileTimeToFileTime", , 本地时间转换为文件时间，把本地格式的文件时间转换为UTC格式的文件时间，非0表示成功
.参数 本地时间, 文件时间, , 本地格式的文件时间
.参数 文件时间, 文件时间, , UTC格式的文件时间

.DLL命令 FileTimeToLocalFileTime, 整数型, "kernel32", "FileTimeToLocalFileTime", , 文件时间转换为本地时间，把UTC格式的文件时间转换为本地格式的文件时间，非0表示成功
.参数 文件时间, 文件时间, , UTC格式的文件时间
.参数 本地时间, 文件时间, , 本地格式的文件时间

.DLL命令 PathIsDirectory, 逻辑型, "shlwapi.dll", "PathIsDirectoryA", , 目录是否存在,存在返回真，不存在返回假
.参数 路径文本, 文本型, , pszPath

.DLL命令 SetFileTime, 逻辑型, "kernel32", "SetFileTime", , 设置指定文件时间，非0表示成功。
.参数 文件号, 整数型
.参数 创建时间, 文件时间, , 本地格式的文件时间，下同
.参数 访问时间, 文件时间
.参数 修改时间, 文件时间

.DLL命令 SetEndOfFile, 逻辑型, "kernel32.dll", "SetEndOfFile", , 文件截断, 截断当前指针
.参数 hFile, 整数型, , 文件句柄