baidu_38411250 2018-10-15 16:38 采纳率: 33.3%
浏览 1188
已采纳

(vc6)怎么将一个文件拷贝到指定目录下的所有子文件夹中

假设有一个文件a.html,需要将它发送到a目录下面的子文件夹下,a目录文件名不变,子文件夹名字每次开机会改变名字,小白一个,希望给个完整源码:能将a.html发送到指定目录下的所有子文件夹中

  • 写回答

4条回答 默认 最新

  • threenewbee 2018-10-16 02:26
    关注

    给你完整写了一个

    void GetFilePath(CString filename, CString filetitle, CString strDir);
    
    void CQ702697Dlg::OnButton1() 
    {
        // TODO: Add your control notification handler code here
        CFileDialog dlg(TRUE);
        CString filename = "";
        CString filetitle = "";
        if (dlg.DoModal() == IDOK)
        {
            filename = dlg.GetPathName();
            filetitle = dlg.GetFileTitle() + "." + dlg.GetFileExt();
        }
        else
        {
            return;
        }
        char lpDir[301];
        XBrowseForFolder(this->m_hWnd, "C:\\", -1, "Q702697", lpDir, 300, TRUE); 
        CString dir = (CString)lpDir;
        GetFilePath(filename, filetitle, dir);
    
    }
    
    void GetFilePath(CString filename, CString filetitle, CString strDir)
    {
        CFileFind finder;
        BOOL isNotEmpty=finder.FindFile(strDir+"*.*");
        while(isNotEmpty)
        {
            isNotEmpty=finder.FindNextFile();
            CString filename1=finder.GetFilePath();
            if(finder.IsDirectory())
            {
                if(!(finder.IsDots()||finder.IsReadOnly()))
                {
                    CString newfilename = filename1+"/"+filetitle;
                    CopyFile(filename, newfilename, FALSE);
                    GetFilePath(filename,filetitle,filename1+"/");
                }
            }
        }
    } 
    

    下载地址:
    https://download.csdn.net/download/caozhy/10723095

    运行效果:
    图片说明

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(3条)

报告相同问题?

悬赏问题

  • ¥15 HFSS 中的 H 场图与 MATLAB 中绘制的 B1 场 部分对应不上
  • ¥15 如何在scanpy上做差异基因和通路富集?
  • ¥20 关于#硬件工程#的问题,请各位专家解答!
  • ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
  • ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
  • ¥30 截图中的mathematics程序转换成matlab
  • ¥15 动力学代码报错,维度不匹配
  • ¥15 Power query添加列问题
  • ¥50 Kubernetes&Fission&Eleasticsearch
  • ¥15 報錯:Person is not mapped,如何解決?