Dear users,
Simple Pascal Script to create a txt file containing the files handled by our file mover.
1 Add PS as Destination
2. Add the following Pascal Script. Don’t forget to adjust the ctOutputPath and ctOutputFilename.
Var tmpList: TStringList; tmpFile: String; Const ctOutputPath = 'C:\Test\Out\'; ctOutputFilename = 'Info.txt'; Begin psExitCode:= 1; // Init Var tmpFile := ctOutputPath + ctOutputFilename; tmpList := TStringList.Create; Try psLogWrite(1, '', 'Add ' + psfilePath + psFileName + ' to ' + tmpFile); If FileExists(tmpFile) Then tmpList.LoadFromFile(tmpFile); tmpList.Append(psFilePath + psFilename); tmpList.SaveToFile(tmpFile); Finally tmpList.Free; End; End.
Regards,
Pascal
