AX中API的简单调用

FilePath folder = "E:\\NewFolder1";
FilePath filePath;
container fileInfo;
int       fileHandle;
FileName _FileName;
;

_FileName = folder;
filePath = _FileName;

if (substr(_FileName,strlen(_FileName)-1,1) == ‘\\‘)
{
      _FileName = _FileName + ‘*.*‘;
}
else
{
      _FileName = _FileName + ‘\\*.*‘;
      filePath = filePath + ‘\\‘;
}

fileInfo = winAPI::findFirstFile(_FileName);
fileHandle = conpeek(fileInfo,1);

_FileName = winapi::findNextFile(fileHandle);

while (_FileName)
{
      _FileName = winapi::findNextFile(fileHandle);

      if (_FileName != "")
         winAPI::deleteFile(filePath + _FileName);

}