Set objShell = WScript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")

   strFile1 = "C:\1"
   strFile2 = "C:\2"
   strFile3 = "C:\3"
   strFile4 = "C:\4"
   strFile5 = "C:\5"
   strRenFile1 = "C:\2"
   strRenFile2 = "C:\3"
   strRenFile3 = "C:\4"
   strRenFile4 = "C:\5"	
   strRenFile5 = "C:\1"

   If objFSO.FileExists(strFile1) Then
          objFSO.MoveFile  strFile1, strRenFile1
          objShell.Run """C:\Program Files (x86)\DisplayFusion\DisplayFusionCommand.exe"" -monitorloadprofile profile_1"
   
   ElseIf objFSO.FileExists(strFile2) Then
          objFSO.MoveFile  strFile2, strRenFile2
          objShell.Run """C:\Program Files (x86)\DisplayFusion\DisplayFusionCommand.exe"" -monitorloadprofile profile_2"
   
   ElseIf objFSO.FileExists(strFile3) Then
          objFSO.MoveFile  strFile3, strRenFile3
          objShell.Run """C:\Program Files (x86)\DisplayFusion\DisplayFusionCommand.exe"" -monitorloadprofile profile_3"
   
   ElseIf objFSO.FileExists(strFile4) Then
          objFSO.MoveFile  strFile4, strRenFile4
          objShell.Run """C:\Program Files (x86)\DisplayFusion\DisplayFusionCommand.exe"" -monitorloadprofile profile_4"
      
   ElseIf objFSO.FileExists(strFile5) Then
          objFSO.MoveFile  strFile5, strRenFile5
          objShell.Run """C:\Program Files (x86)\DisplayFusion\DisplayFusionCommand.exe"" -monitorloadprofile profile_5"
   
   End If