我想用VB调用winhex api 拷贝windows\system32\config\system

p212937

因为系统一开始引导，就以独占的方式占用了config里的几个注册表文件像，system,sam,SOFTWARE,SECURITY,DEFAULT,

而我想在系统下，做一个系统热备份功能，但是这些文件拷不出来

    Dim Buffer() As Byte   
    Dim Res As Long   
    Dim Newres As Long   
    Dim Lopen As Long
   
    Res = WHX_Init(1&)   
    Lopen = WHX_OpenEx("C:\\Windows\\System32\\config\\SYSTEM", &H1)   

    Call WHX_SetBlock(0, 512)   

    Newres = WHX_CopyIntoNewFile("D:\\SYSTEM")      
    Call WHX_Close   
    Call WHX_Done   

    MsgBox "完成", vbCritical, AppName

        以上代码拷D盘东西是正常的。


    哪位大侠，给个思路和方向？谢谢