code:

---

;***** Move Deleted users files based on DIRUSE.EXE utilty
;***** E:\Utilities\FileUt~1\diruse E:\Data /f:E:\Data\MIL01Detail.csv /s /t /v /d:w
;***** Modify the file removing the First Twp columns and all rows that you do not
;***** want to remove save the file as DeletedUser.csv

; $X is the line pulled from DeletedUser.csv
; $Path is the Path of the file
; $Source is the Path that robocopy uses for Source
; $Dest is the Path that robocopy uses for Destination
; $File is the Filename that robocopy uses
; $Opti is the Options that robocopy uses
; $ShellCMD is the command line that is passed out to run

;DEBUG "ON"

OPEN(1, "DeletedUser.csv", 2) ;Deleted User file created by DIRUSE.EXE

$X = ReadLine(1)
While @Error=0

  $Path = Left($X, InStrRev($X,"\") - 1)
  If INSTR ($Path, " ") = 0
    $Source = $Path ;Source Path
    $Dest = "E:\Old" + Right($Path, Len($Path) - 2) ;Destination Path
  Else
    $Source = Chr(34) + $Path + Chr(34) ;Source Path
    $Dest = Chr(34) + "E:\Old" + Right($Path, Len($Path) - 2) + Chr(34) ;Destination Path
  EndIf

  $FileName = Right($X, Len($X) - Len($Path) - 1) ;File Name
  If INSTR ($FileName, " ") = 0
    $File = $FileName ;File Name
  Else
    $File = Chr(34) + $FileName + Chr(34) ;File Name
  EndIf

  $Opti = "/R:3 /Z /MOVE" ;Options

  $ShellCMD = "RoboCopy " + $Source + " " + $Dest + " " + $File + " " + $Opti

  Shell "%comspec% /c $ShellCMD"

  $X = ReadLine(1)
Loop

Close(1) ;Close Deleted User file

---