PC:Archive the files to some other folder




Below code is used to archive the files to some other folder.

Local string &sarchive;

Local string &sFileName, &sMove_File_Cmd, &sFileArchivePath, &sFileRefPath;

&sarchive = "Archive";

&sarchive1 = "\\down1135.laccdd.com\PSShare$\GSCInternal\Abhinav\FA0009\Archive";

If FileExists(&sarchive, %FilePath_Absolute) Then
  Else
   CreateDirectory(&sarchive1, %FilePath_Absolute);
  End-If;

&sFilePath = LAC_WS_AET.FILE_PATH.Value;

&sarchive = "\\down1135.laccdd.com\PSShare$\GSCInternal\Abhinav\FA0009\Archive";

&sMove_File_Cmd = "cmd /c move  " | &sFilePath | " " | &sarchive;

&res1 = Exec(&sMove_File_Cmd, %Exec_Asynchronous + %FilePath_Absolute);

Comments

Popular posts from this blog

BI Publisher: If Condition with sub-string in rtf template