Contact Us Now

Q: I want to generate a file which is called “complete” in target folder after all files are moved to target folder.

Var
  tmpFile: TStringList;
Const
  ctFilePath = 'C:\Test\Out\OutPS\';
  ctFileName = 'complete.txt';
  ctFileContent = 'dummy file';
Begin
  psExitCode:= 1;
  // ... add your code here
  If psCounter > 0 Then
  Begin
    tmpFile := TStringList.Create;
    Try
      Try
        tmpFile.Add(ctFileContent);
        tmpFile.SaveToFile(ctFilePath + ctFileName);
        psLogWrite(1, '', 'Save complete file succes');
      Except
        psLogWrite(1, '', 'Save complete file error');
      End;
    Finally
      tmpFile.Free
    End;
  End;
End.

#filetransfer #mft #filemanagement