Cкопировать папку полностью

[3oppo]

Задача скопировать папку полностью, со всеми под папками и файлами.

Уткнулся в определение файл это или папка?! Что то в WinApi не нашел таких функций, поиск по форум ничего не дал..

[Gustav]

А если просто командником c xcopy ?

static void Job217(Args _args)
{
    ;
    WinAPI::shellExecute('cmd', @'/c xcopy C:\temp C:\NotExistingYetFolder\ /E');
}

[3oppo]

Не пойдёт.. Там нужно кое какие изменения вносить в файлы..

[Zick-Zibn]

Версия Axapta какая. Если 4.0, то советую посмотреть в сторону .NET пространство имен System.IO

[3oppo]

3.0 SP 5

[Gustav]

Может это подойдёт?
Dynamics AX Geek: Finding files with WinAPI

[3oppo]

Догнал..

WinApi::pathExists(_sPath)

до этого смотрел WinApi::folderExists(_sPath) но это не то..

Всем спасибо!

[Zick-Zibn]

Посмотрите класс SysFileDeployment метод copy.

[3oppo]

Вот что получилось:

static boolean copyDir(str _sDirFrom, str _sDirTo, boolean _bAllIncluded = true, str _sFilter = '*.*')
{
    str         sSeekPath , sS;
    container   con;
    int         handl;
    int         iE;
    FileName    FileName;
    ;

    if (!WinApi::folderExists( _sDirFrom ))
    {
        info (strfmt ('Директория %1 не существует', _sDirFrom));
        return false;
    }

    //fileCreateAllDir(_sDirTo);

    sSeekPath           +=  _sDirFrom + '\\' + _sFilter;
    [handl, FileName]   =   WinApi::findFirstFile( sSeekPath );

    while (FileName)
    {
        if ( FileName == '.' || FileName == '..')
        {
            FileName    = winapi::findNextFile(handl);
            continue;
        }

        if(_bAllIncluded && WinApi::pathExists(_sDirFrom + '\\' + FileName ) )  // this is folder
        {
            Glob::copyDir(_sDirFrom + '\\' + FileName, _sDirTo + '\\' + FileName, _bAllIncluded, _sFilter); // call itself
        }


        iE      = WinApi::copyFile( _sDirFrom + '\\' + FileName,
                                    _sDirTo   + '\\' + FileName);
        // iE error processing if need

        FileName= winapi::findNextFile(handl);
    }

    return false;

}

[Gustav]

Цитата:

Сообщение от 3oppo

Там нужно кое какие изменения вносить в файлы..

А какого характера изменения? Нельзя было сначала оптом всё копирнуть, а потом вносить изменения в файлы в их новых копиях?