工控编程吧

标题: 174上位机VC MFC迭代复制文件夹及内部文件 [打印本页]

---

作者: qq263946146    时间: 2016-1-17 20:49
标题: 174上位机VC MFC迭代复制文件夹及内部文件

(, 下载次数: 0)

上传

点击文件名下载附件

174上位机VC MFC迭代复制文件夹及内部文件

功能展示

将指定的文件夹包括其内部的文件及子文件夹复制到其他目录可以用迭代的方法实现也可以SHFileOperation()函数实现，当前例程实现两种方法复制文件夹的功能，效果如图；

要点提示

SHFileOperation()函数控制文件夹时，可以通过设置它参数的具体值来完成，函数原型为int WINAPI SHFileOperation(LPSHFILEOPSTRUCT lpFileOp ); 指定lpFileOp .wFunc=FO_COPY或FO_MOVE或FO_DELETE或FO_RENAME;分别表示复制移动删除重命名文件；具体用法参考例程源码；

另一种方法是通过CFileFind类的成员函数遍历要复制的文件夹内容，再通过CopyFile(), CopyFolder()迭代复制文件和文件夹到指定目录；

实现功能

1.新建基于对话框的应用程序

2.拖拽一静态文本控件ID 为IDC_NOTE，用于显示操作结果；

拖拽两编辑框ID为IDC_EDIT1，IDC_EDIT2用于显示源文件夹及目标夹路径；

拖拽两按钮实现源文件夹及目标夹路径的选择；

两拖拽两按钮实现两种不同方法的复制；

1. void CGkbc8Dlg::OnBrowser1()
   
2. {
   
3.         //><获取桌面路径
   
4.         LPITEMIDLIST pidl;
   
5.         LPMALLOC pShellMalloc;
   
6.         char szDir[MAX_PATH];
   
7.         
   
8.         if(SUCCEEDED(SHGetMalloc(&pShellMalloc)))
   
9.         {
   
10.                 if(SUCCEEDED(SHGetSpecialFolderLocation(NULL,CSIDL_DESKTOP,&pidl)))
    
11.                 {
    
12.                         SHGetPathFromIDList(pidl, szDir);
    
13.                         pShellMalloc->Free(pidl);
    
14.                 }
    
15.                 pShellMalloc->Release();
    
16.         }
    
17. //><选择路径
    
18.     BROWSEINFO bi;   
    
19.     bi.hwndOwner      = this->GetSafeHwnd();  
    
20.     bi.pidlRoot       = NULL;  
    
21.     bi.pszDisplayName = NULL;   
    

复制代码

1. bi.lpszTitle      = TEXT("请选择文件夹");   
   
2.     bi.ulFlags        = BIF_RETURNONLYFSDIRS | BIF_STATUSTEXT;  
   
3.     bi.lpfn           = BrowseCallBackFun;NULL;  // //回调函数
   
4.     bi.lParam         = (LPARAM)szDir;//= 0;//传给回调函数的参数,设置默认路径
   
5.     bi.iImage         = 0;   
   
6. 
   
7.     pidl = SHBrowseForFolder(&bi);  
   
8.     if (pidl == NULL)  
   
9.         return;
   
10.   
    
11.     if (SHGetPathFromIDList(pidl, szDir))  
    
12.         {
    
13.                 CString sDir(szDir);
    
14.                 SetDlgItemText(IDC_EDIT2,sDir);
    
15.         }        
    
16. }
    
17. void CGkbc8Dlg::OnSinglecopy()
    
18. {
    
19.         CString sDir,sNewDir;
    
20.         GetDlgItemText(IDC_EDIT1,sDir);
    
21.         GetDlgItemText(IDC_EDIT2,sNewDir);        
    
22.         char SourceFolder[MAX_PATH+1]="";
    
23.                 strcpy(SourceFolder,sDir);
    
24.         char TargetFolder[MAX_PATH+1]="";
    
25.                 strcpy(TargetFolder,sNewDir);
    
26. //
    
27.         SHFILEOPSTRUCT lpFile;                                                                        
    
28.         lpFile.hwnd=GetSafeHwnd();
    
29.         lpFile.wFunc=FO_COPY;
    
30.         lpFile.pFrom=SourceFolder;
    
31.         lpFile.pTo=TargetFolder;
    
32.         lpFile.fFlags=FOF_ALLOWUNDO;
    
33.         lpFile.fAnyOperationsAborted=FALSE;
    
34.         lpFile.hNameMappings=NULL;
    
35.         lpFile.lpszProgressTitle=NULL;
    
36.         int ReturnValue=SHFileOperation(&lpFile);
    
37.         if(ReturnValue==0)
    
38.         {
    
39.                 if(lpFile.fAnyOperationsAborted==TRUE)
    
40.                         SetDlgItemText(IDC_NOTE,"复制文件夹取消");
    

复制代码

1. else
   
2.                         SetDlgItemText(IDC_NOTE,"复制文件夹成功");
   
3.         }
   
4.         else
   
5.                 SetDlgItemText(IDC_NOTE,"复制文件夹失败");
   
6. }
   
7. void CGkbc8Dlg::OnMulticopy()
   
8. {
   
9.         CString sFromDir,sToDir;
   
10.         GetDlgItemText(IDC_EDIT1,sFromDir);
    
11.         GetDlgItemText(IDC_EDIT2,sToDir);
    
12.         if(sFromDir.IsEmpty()||sToDir.IsEmpty())
    
13.                 return;
    
14.         sToDir+=sFromDir.Right(sFromDir.GetLength()-sFromDir.ReverseFind('\\')-1);
    
15.         if(!CopyFolder(sFromDir,sToDir))
    
16.                 SetDlgItemText(IDC_NOTE,"复制文件夹失败");
    
17.         else SetDlgItemText(IDC_NOTE,"复制文件夹成功");
    
18. }
    

复制代码

我们来演示下功能实现的整个过程

[iqiyi]http://player.video.qiyi.com/a87eed9b17b2e4757af2a354f123f78b/0/0/w_19rtdwh2v9.swf-albumId=5199645609-tvId=5199645609-isPurchase=0-cnId=12[/iqiyi]

(, 下载次数: 0)

上传

点击文件名下载附件

[note]1[/note]

---

欢迎光临 工控编程吧 (https://www.gkbc8.com/)

Powered by Discuz! X3.4