====使用API函数CreateFile打开两个文件，并且都不共享，如何快速将一个文件的内容快速写入到另外一个文件中====

Question

dim mFileHwndA as long
dim mFilePathA as string
dim mFileHwndB as long
dim mFilePathB as stringmFilePathA="c:\111.dat"
mFilePathB="c:\222.dat"mFileHwndA = CreateFile(mTempFilePath, GENERIC_READ Or GENERIC_WRITE, 0, sa, CREATE_ALWAYS, FILE_ATTRIBUTE_HIDDEN, 0&)mFileHwndB = CreateFile(strFilePath, GENERIC_READ Or GENERIC_WRITE, 0, sa, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0&)现在我要把mFileHwndA句柄的文件内容写入到mFileHwndB句柄文件中，我现在的做法是首先
CloseHandle mFileHwndA
CloseHandle mFileHwndB
然后再
CopyFile mFilePathA,mFilePathB,0然后再重新打开两个文件，不过这样不仅麻烦，而且两个文件的句柄都变了！！
如果在不关闭的情况下直接快速写入，考虑到文件可能会比较大（比如100MB），如果一次读入byte数组可能会内存溢出。谢谢了，顺祝CSDN上面的朋友新年快乐！！

Answer 1

先str记下原文件名,copy file ,再rename!

Answer 2

为源文件创建文件映射（CreateFileMapping）
再将文件映射地址（MapViewOfFile）传给WriteFile这样就不需要自己建缓冲区、不需要自己写代码
而且效率更高CreateFileMapping VB声明 
Declare Function CreateFileMapping Lib "kernel32" Alias "CreateFileMappingA" (ByVal hFile As Long, lpFileMappigAttributes As SECURITY_ATTRIBUTES, ByVal flProtect As Long, ByVal dwMaximumSizeHigh As Long, ByVal dwMaximumSizeLow As Long, ByVal lpName As String) As Long 
说明 
创建一个新的文件映射对象 
返回值 
Long，新建文件映射对象的句柄；零意味着出错。会设置GetLastError。即使函数成功，但倘若返回的句柄属于一个现成的文件映射对象，那么GetLastError也会设置成ERROR_ALREADY_EXISTS。在这种情况下，文件映射的长度就是现有对象的长度，而不是这个函数指定的尺寸 
参数表 
参数 类型及说明 
hFile Long，指定欲在其中创建映射的一个文件句柄。&HFFFFFFFF&表示在内存中创建一个文件映射 
lpFileMappigAttributes SECURITY_ATTRIBUTES，指定一个安全对象，在创建文件映射时使用。如果为NULL（用ByVal As Long传递零），表示使用默认安全对象 
flProtect Long，下述常数之一： 
PAGE_READONLY 以只读方式打开映射 
PAGE_READWRITE 以可读、可写方式打开映射 
PAGE_WRITECOPY 为写操作留下备份 
可组合使用下述一个或多个常数 
SEC_COMMIT 为文件映射一个小节中的所有页分配内存 
SEC_IMAGE 文件是个可执行文件 
SEC_RESERVE 为没有分配实际内存的一个小节保留虚拟内存空间 
dwMaximumSizeHigh Long，文件映射的最大长度（高32位） 
dwMaximumSizeLow Long，文件映射的最小长度（低32位）。如这个参数和dwMaximumSizeHigh都是零，就用磁盘文件的实际长度 
lpName String，指定文件映射对象的名字。如存在这个名字的一个映射，函数就会打开它。用vbNullString创建一个无名的文件映射 
MapViewOfFile, MapViewOfFileEx VB声明 
Declare Function MapViewOfFile& Lib "kernel32" (ByVal hFileMappingObject As Long, ByVal dwDesiredAccess As Long, ByVal dwFileOffsetHigh As Long, ByVal dwFileOffsetLow As Long, ByVal dwNumberOfBytesToMap As Long)
Declare Function MapViewOfFileEx& Lib "kernel32" (ByVal hFileMappingObject As Long, ByVal dwDesiredAccess As Long, ByVal dwFileOffsetHigh As Long, ByVal dwFileOffsetLow As Long, ByVal dwNumberOfBytesToMap As Long, lpBaseAddress As Any) 
说明 
将一个文件映射对象映射到当前应用程序的地址空间。MapViewOfFileEx允许我们指定一个基本地址来进行映射 
返回值 
Long，文件映射在内存中的起始地址。零表示出错。会设置GetLastError 
参数表 
参数 类型及说明 
hFileMappingObject Long，文件映射对象的句柄 
dwDesiredAccess Long，下述常数之一： 
FILE_MAP_WRITE 映射可读可写。文件映射对象必须通过PAGE_READWRITE访问创建 
FILE_MAP_READ 映射只读。文件映射对象必须通过PAGE_READ 或 PAGE_READWRITE访问创建 
FILE_MAP_ALL_ACCESS 与FILE_MAP_WRITE相同 
FILE_MAP_COPY 映射时保留写操作的副本。文件映射对象必须用PAGE_WRITECOPY访问在win95下创建 
dwFileOffsetHigh Long，文件中映射起点的高32位地址 
dwFileOffsetLow Long，文件中映射起点的低32位地址 
dwNumberOfBytesToMap Long，文件中要映射的字节数。用零映射整个文件映射对象 
lpBaseAddress Long，指定映射文件映射对象的地址。如这个地址处没有足够的内存空间，那么对MapViewOfFileEx的调用会失效。零表示允许windows寻找一个地址 
注解 
dwFileOffsetLow和dwFileOffsetHigh必须反映一个偏移距离，它由系统的内存分配精度决定。例如，假设系统的内存精度是64KB（即最小分配单位是64KB），则这些值必须是64KB的整数倍。大多数应用程序都简单的用零从文件的起始处开始映射。lpBaseAddress也必须是内存分配精度的整数倍
 
其他 
声明中的参数类型为Any，而参数表中都是Long，我也不明白。但关于这个函数的英文资料的确是这样的。 

Answer 3

什么文件系统?如果是NTFS的话,可以考虑用createhardlink建立NTFS硬连接