易语言JW_取置文件时间例程源码,易语言读写文件时间模块源码 [db:版本]

易语言读写文件时间模块源码

系统结构:CreateFileA,GetFileTime,FileTimeToSystemTime,GetDateFormatA,GetTimeFormatA,CloseHandle,FileTimeToLocalFileTime,SetFileTime,SystemTimeToFileTime,LocalFileTimeToFileTime,GetLocalTime,JW_取文件时间,JW_置文件时间,CreateFileA,GetFileTime,FileTimeToSystemTime,GetDateFormatA,GetTimeFormatA,CloseHandle,FileTimeToLocalFileTime,SetFileTime,SystemTimeToFileTime,LocalFileTimeToFileTime,GetLocalTime,

======窗口程序集1
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |
======调用的Dll
| |
| |---[dll]------ CreateFileA
| |
| |---[dll]------ GetFileTime
| |
| |---[dll]------ FileTimeToSystemTime
| |
| |---[dll]------ GetDateFormatA
| |
| |---[dll]------ GetTimeFormatA
| |
| |---[dll]------ CloseHandle
| |
| |---[dll]------ FileTimeToLocalFileTime
| |
| |---[dll]------ SetFileTime
| |
| |---[dll]------ SystemTimeToFileTime
| |
| |---[dll]------ LocalFileTimeToFileTime
| |
| |---[dll]------ GetLocalTime
======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |------ JW_取文件时间
| |
| |------ JW_置文件时间
| |
| |
======调用的Dll
| |
| |---[dll]------ CreateFileA
| |
| |---[dll]------ GetFileTime
| |
| |---[dll]------ FileTimeToSystemTime
| |
| |---[dll]------ GetDateFormatA
| |
| |---[dll]------ GetTimeFormatA
| |
| |---[dll]------ CloseHandle
| |
| |---[dll]------ FileTimeToLocalFileTime
| |
| |---[dll]------ SetFileTime
| |
| |---[dll]------ SystemTimeToFileTime
| |
| |---[dll]------ LocalFileTimeToFileTime
| |
| |---[dll]------ GetLocalTime

调用的DLL命令:

.DLL命令 CreateFileA, 整数型, "kernel32", "CreateFileA", , 如执行成功，则返回文件句柄
.参数 lpFileName, 文本型, , 指向文件名的指针
.参数 dwDesiredAccess, 整数型, , 访问模式（写/读）
.参数 dwShareMode, 整数型, , 共享模式
.参数 lpSecurityAttributes, 整数型, , 指向安全属性的指针
.参数 dwCreationDisposition, 整数型, , 如何创建
.参数 dwFlagsAndAttributes, 整数型, , 文件属性
.参数 hTemplateFile, 整数型, , 用于复制文件句柄

.DLL命令 GetFileTime, 整数型, "kernel32", "GetFileTime"
.参数 hFile, 整数型
.参数 lpCreationTime, FILETIME, 传址, 创建时间
.参数 lpLastAccessTime, FILETIME, 传址, 访问时间
.参数 lpLastWriteTime, FILETIME, 传址, 修改时间

.DLL命令 FileTimeToSystemTime, 整数型, "kernel32", "FileTimeToSystemTime", , 根据一个FILETIME结构的内容，装会设置GetLastError
.参数 文件时间结构, FILETIME, , FILETIME，包含了文件时间的一个结构
.参数 系统时间结构, SYSTEMTIME, , SYSTEMTIME，用于装载系统时间信息的一个结构;

.DLL命令 GetDateFormatA, 整数型, "kernel32.dll", "GetDateFormatA", , 针对指定的“当地”格式，对一个系统日期进行格式化 格式化过后的字串的长度。
.参数 地方ID, 整数型, , Locale，用于决定格式的地方ID。lpFormat参数中指定的任何信息（倘若不是NULL）都优先于特定于地方的信息
.参数 标志, 整数型, , dwFlags，如指定了lpFormat，那么该参数应该为零。否则，可设为LOCALE_NOUSEROVERRIDE，强制使用系统地方参数——即使它们已由用户取代。
.参数 日期结构, SYSTEMTIME, 传址, lpDate，包含了一个系统日期的结构
.参数 格式化, 文本型, 传址, lpFormat，String，可设为NULL，使用特定于不同地方的值（用vbNullString传递一个NULL）。否则包含一个日期格式字串。
.参数 缓冲区文本, 文本型, , lpDateStr，指定一个缓冲区，用于容纳格式化过后的字串。注意事先对字串进行初始化
.参数 缓冲区文本长度, 整数型, , cchDate，缓冲区的长度。如为零，表示函数会返回需要缓冲区的大小;

.DLL命令 GetTimeFormatA, 整数型, "kernel32.dll", "GetTimeFormatA", , 针对指定的“当地”格式，对一个系统时间进行格式化。
.参数 地方ID, 整数型, , Locale，用于决定格式的地方ID。lpFormat参数中指定的任何信息（倘若不是NULL）都优先于特定于地方的信息
.参数 标志, 整数型, , dwFlags，如指定了lpFormat，那么该参数应该为零。否则，可设为LOCALE_NOUSEROVERRIDE，强制使用系统地方参数
.参数 时间结构, SYSTEMTIME, 传址, lpDate，SYSTEMTIME，用于包容系统时间的一个结构
.参数 格式化, 文本型, 传址, lpFormat，String，可设为NULL，使用特定于不同地方的值（用vbNullString传递一个NULL）。
.参数 缓冲区文本, 文本型, , lpDateStr，指定一个缓冲区，用于容纳格式化过后的字串。注意事先对字串进行初始化
.参数 缓冲区文本长度, 整数型, , cchDate，缓冲区的长度。如为零，表示函数会返回需要缓冲区的大小;

.DLL命令 CloseHandle, 整数型, "kernel32", "CloseHandle", , 关闭文件句柄
.参数 hwnd, 整数型

.DLL命令 FileTimeToLocalFileTime, 整数型
.参数 lpFileTime, FILETIME
.参数 lpLocalFileTime, FILETIME

.DLL命令 SetFileTime, 整数型, "kernel32"
.参数 hFile, 整数型
.参数 lpCreationTime, FILETIME, 传址
.参数 lpLastAccessTime, FILETIME, 传址
.参数 lpLastWriteTime, FILETIME, 传址

.DLL命令 SystemTimeToFileTime, 整数型, "kernel32"
.参数 lpSystemTime, SYSTEMTIME, 传址
.参数 lpFileTime, FILETIME, 传址

.DLL命令 LocalFileTimeToFileTime, 整数型, "kernel32"
.参数 lpLocalFileTime, FILETIME, 传址
.参数 lpFileTime, FILETIME, 传址

.DLL命令 GetLocalTime, , "kernel32", "GetLocalTime"
.参数 lpSystemTime, SYSTEMTIME, 传址

调用的DLL命令:

.DLL命令 CreateFileA, 整数型, "kernel32", "CreateFileA", , 如执行成功，则返回文件句柄
.参数 lpFileName, 文本型, , 指向文件名的指针
.参数 dwDesiredAccess, 整数型, , 访问模式（写/读）
.参数 dwShareMode, 整数型, , 共享模式
.参数 lpSecurityAttributes, 整数型, , 指向安全属性的指针
.参数 dwCreationDisposition, 整数型, , 如何创建
.参数 dwFlagsAndAttributes, 整数型, , 文件属性
.参数 hTemplateFile, 整数型, , 用于复制文件句柄

.DLL命令 GetFileTime, 整数型, "kernel32", "GetFileTime"
.参数 hFile, 整数型
.参数 lpCreationTime, FILETIME, 传址, 创建时间
.参数 lpLastAccessTime, FILETIME, 传址, 访问时间
.参数 lpLastWriteTime, FILETIME, 传址, 修改时间

.DLL命令 FileTimeToSystemTime, 整数型, "kernel32", "FileTimeToSystemTime", , 根据一个FILETIME结构的内容，装会设置GetLastError
.参数 文件时间结构, FILETIME, , FILETIME，包含了文件时间的一个结构
.参数 系统时间结构, SYSTEMTIME, , SYSTEMTIME，用于装载系统时间信息的一个结构;

.DLL命令 GetDateFormatA, 整数型, "kernel32.dll", "GetDateFormatA", , 针对指定的“当地”格式，对一个系统日期进行格式化 格式化过后的字串的长度。
.参数 地方ID, 整数型, , Locale，用于决定格式的地方ID。lpFormat参数中指定的任何信息（倘若不是NULL）都优先于特定于地方的信息
.参数 标志, 整数型, , dwFlags，如指定了lpFormat，那么该参数应该为零。否则，可设为LOCALE_NOUSEROVERRIDE，强制使用系统地方参数——即使它们已由用户取代。
.参数 日期结构, SYSTEMTIME, 传址, lpDate，包含了一个系统日期的结构
.参数 格式化, 文本型, 传址, lpFormat，String，可设为NULL，使用特定于不同地方的值（用vbNullString传递一个NULL）。否则包含一个日期格式字串。
.参数 缓冲区文本, 文本型, , lpDateStr，指定一个缓冲区，用于容纳格式化过后的字串。注意事先对字串进行初始化
.参数 缓冲区文本长度, 整数型, , cchDate，缓冲区的长度。如为零，表示函数会返回需要缓冲区的大小;

.DLL命令 GetTimeFormatA, 整数型, "kernel32.dll", "GetTimeFormatA", , 针对指定的“当地”格式，对一个系统时间进行格式化。
.参数 地方ID, 整数型, , Locale，用于决定格式的地方ID。lpFormat参数中指定的任何信息（倘若不是NULL）都优先于特定于地方的信息
.参数 标志, 整数型, , dwFlags，如指定了lpFormat，那么该参数应该为零。否则，可设为LOCALE_NOUSEROVERRIDE，强制使用系统地方参数
.参数 时间结构, SYSTEMTIME, 传址, lpDate，SYSTEMTIME，用于包容系统时间的一个结构
.参数 格式化, 文本型, 传址, lpFormat，String，可设为NULL，使用特定于不同地方的值（用vbNullString传递一个NULL）。
.参数 缓冲区文本, 文本型, , lpDateStr，指定一个缓冲区，用于容纳格式化过后的字串。注意事先对字串进行初始化
.参数 缓冲区文本长度, 整数型, , cchDate，缓冲区的长度。如为零，表示函数会返回需要缓冲区的大小;

.DLL命令 CloseHandle, 整数型, "kernel32", "CloseHandle", , 关闭文件句柄
.参数 hObject, 整数型

.DLL命令 FileTimeToLocalFileTime, 整数型
.参数 lpFileTime, FILETIME
.参数 lpLocalFileTime, FILETIME

.DLL命令 SetFileTime, 整数型, "kernel32"
.参数 hFile, 整数型
.参数 lpCreationTime, FILETIME, 传址
.参数 lpLastAccessTime, FILETIME, 传址
.参数 lpLastWriteTime, FILETIME, 传址

.DLL命令 SystemTimeToFileTime, 整数型, "kernel32"
.参数 lpSystemTime, SYSTEMTIME, 传址
.参数 lpFileTime, FILETIME, 传址

.DLL命令 LocalFileTimeToFileTime, 整数型, "kernel32"
.参数 lpLocalFileTime, FILETIME, 传址
.参数 lpFileTime, FILETIME, 传址

.DLL命令 GetLocalTime, , "kernel32", "GetLocalTime"
.参数 lpSystemTime, SYSTEMTIME, 传址