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
Post a Comment