Autoit - Job 2 Ke Job 3 Alt Suit

#include <Array.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
#include <StringConstants.au3>

Example()

Func Example()
    ; Create a constant variable in Local scope of the message to display in FileSelectFolder.
    Local Const $sMessage = "Select a folder"

    ; Display an open dialog to select a file.
    Local $sFileSelectFolder = FileSelectFolder($sMessage, "")
    If @error Then
        ; Display the error message.
        MsgBox($MB_SYSTEMMODAL, "", "No folder was selected.")
    Else
        ; Display the selected folder.
        ; MsgBox($MB_SYSTEMMODAL, "", "You chose the following folder:" & @CRLF & $sFileSelectFolder)
		ConsoleWrite('Selected folder: ' & $sFileSelectFolder & @CRLF)
		Local $OutputFolder = FileSelectFolder($sMessage, "")
		Local $aFileList = _FileListToArray($sFileSelectFolder, "*")
		If @error = 1 Then
            MsgBox($MB_SYSTEMMODAL, "", "Path was invalid.")
            Exit
        EndIf
        If @error = 4 Then
            MsgBox($MB_SYSTEMMODAL, "", "No file(s) were found.")
            Exit
        EndIf
		; Display the results returned by _FileListToArray.
        ;_ArrayDisplay($aFileList, "$aFileList")
		Local $job_name[54] = ["¾ÆÅ©ºñ¼ó_³²", "¾ÆÅ©ºñ¼ó¾ËÆÄÄ«_³²", "±æ·Îƾũ·Î½º_³²", "Ä̺£·Î½º±æ·Îƾũ·Î½º_³²", "¹ÌÄÉ´Ð_³²", "¹ÌÄɴиäµÅÁö_³²", "·¹ÀÎÁ®_³²", "·¹ÀÎÁ®´Á´ë_³²", "·é³ªÀÌÆ®_³²", "»çÀڷ鳪ÀÌÆ®_³²", "¿ö·Ï_³²", "¿©¿ì¿ö·Ï_³²", "½¦µµ¿ìüÀ̼­_³²", "Ä̺£·Î½º½¦µµ¿ìüÀ̼­_³²", "¹Î½ºÆ®·²_³²", "ŸÁ¶¹Î½ºÆ®·²_³²", "¿ø´õ·¯_³²", "ŸÁ¶¿ø´õ·¯_³²", "½´¶ó_³²", "½´¶ó¾ËÆÄÄ«_³²", "°¡µå_³²", "±×¸®Æù°¡µå_³²", "»çÀڷξⰡµå_³²", "Á¦³×¸¯_³²", "Á¦³×¸¯¸äµÅÁö_³²", "¼Ò¼­·¯_³²", "¿©¿ì¼Ò¼­·¯_³²", "¾ÆÅ©ºñ¼ó_¿©", "¾ÆÅ©ºñ¼ó¾ËÆÄÄ«_¿©", "±æ·Îƾũ·Î½º_¿©", "Ä̺£·Î½º±æ·Îƾũ·Î½º_¿©", "¹ÌÄÉ´Ð_¿©", "¹ÌÄɴиäµÅÁö_¿©", "·¹ÀÎÁ®_¿©", "·¹ÀÎÁ®´Á´ë_¿©", "·é³ªÀÌÆ®_¿©", "»çÀڷ鳪ÀÌÆ®_¿©", "¿ö·Ï_¿©", "¿©¿ì¿ö·Ï_¿©", "½¦µµ¿ìüÀ̼­_¿©", "Ä̺£·Î½º½¦µµ¿ìüÀ̼­_¿©", "¹Î½ºÆ®·²_¿©", "ŸÁ¶¹Î½ºÆ®·²_¿©", "¿ø´õ·¯_¿©", "ŸÁ¶¿ø´õ·¯_¿©", "½´¶ó_¿©", "½´¶ó¾ËÆÄÄ«_¿©", "°¡µå_¿©", "±×¸®Æù°¡µå_¿©", "»çÀڷξⰡµå_¿©", "Á¦³×¸¯_¿©", "Á¦³×¸¯¸äµÅÁö_¿©", "¼Ò¼­·¯_¿©", "¿©¿ì¼Ò¼­·¯_¿©"]
		;_ArrayDisplay($job_name, "Job name")
		Local $job2_name[54] = ["ÇÏÀÌÇÁ¸®_³²", "ÇÏÀÌÇÁ¸®½ºÆ®¾ËÆÄÄ«_³²", "¾î½Ø½ÅÅ©·Î½º_³²", "Ä̺£·Î½º¾î½ê½ÅÅ©·Î½º_³²", "È­ÀÌÆ®½º¹Ì½º_³²", "È­ÀÌÆ®½º¹Ì½º¸äµÅÁö_³²", "½º³ªÀÌÆÛ_³²", "ŸÁ¶½º³ªÀÌÆÛ_³²", "·Îµå³ªÀÌÆ®_³²", "»çÀڷε峪ÀÌÆ®_³²", "ÇÏÀÌÀ§Àúµå_³²", "¿©¿ìÇÏÀÌÀ§Àúµå_³²", "½ºÅäÄ¿_³²", "Ä̺£·Î½º½ºÅäÄ¿_³²", "Ŭ¶ó¿î_³²", "ŸÁ¶Å©¶ó¿î_³²", "Áý½Ã_³²", "ŸÁ¶Â¤½Ã_³²", "èÇÇ¿Â_³²", "èÇǿ¾ËÆÄÄ«_³²", "Æȶóµò_³²", "ÆäÄÚÆȶóµò_³²", "»çÀÚÆȶóµò_³²", "Å©¸®¿¡ÀÌÅÍ_³²", "Å©¸®¿¡ÀÌÅ͸äµÅÁö_³²", "ÇÁ·ÎÆä¼­_³²", "¿©¿ìÇÁ·ÎÆä¼­_³²", "ÇÏÀÌÇÁ¸®_¿©", "ÇÏÀÌÇÁ¸®½ºÆ®¾ËÆÄÄ«_¿©", "¾î½Ø½ÅÅ©·Î½º_¿©", "Ä̺£·Î½º¾î½ê½ÅÅ©·Î½º_¿©", "È­ÀÌÆ®½º¹Ì½º_¿©", "È­ÀÌÆ®½º¹Ì½º¸äµÅÁö_¿©", "½º³ªÀÌÆÛ_¿©", "ŸÁ¶½º³ªÀÌÆÛ_¿©", "·Îµå³ªÀÌÆ®_¿©", "»çÀڷε峪ÀÌÆ®_¿©", "ÇÏÀÌÀ§Àúµå_¿©", "¿©¿ìÇÏÀÌÀ§Àúµå_¿©", "½ºÅäÄ¿_¿©", "Ä̺£·Î½º½ºÅäÄ¿_¿©", "Ŭ¶ó¿î_¿©", "ŸÁ¶Å©¶ó¿î_¿©", "Áý½Ã_¿©", "ŸÁ¶Â¤½Ã_¿©", "èÇÇ¿Â_¿©", "èÇǿ¾ËÆÄÄ«_¿©", "Æȶóµò_¿©", "ÆäÄÚÆȶóµò_¿©", "»çÀÚÆȶóµò_¿©", "Å©¸®¿¡ÀÌÅÍ_¿©", "Å©¸®¿¡ÀÌÅ͸äµÅÁö_¿©", "ÇÁ·ÎÆä¼­_¿©", "¿©¿ìÇÁ·ÎÆä¼­_¿©"]
		Local $size = UBound($job_name)
		Local $ijk
		ConsoleWrite($size & @CRLF)
		For $i = 1 To $aFileList[0]
			For $j = 0 To $size - 1
				Local $res = StringInStr( $aFileList[$i], $job_name[$j] )
				;ConsoleWrite('File: ' & $aFileList[$i] & @CRLF)
				;ConsoleWrite('Result [' & $i &'-'& $j & ']: ' & $res & @CRLF)
				if $res = 1 Then
					;FileCopy ( $sFileSelectFolder&'\'&$aFileList[$i], $OutputFolder )
					Local $newname = StringReplace($aFileList[$i], $job_name[$j], $job2_name[$j])
					FileMove($sFileSelectFolder&'\'&$aFileList[$i], $OutputFolder&'\'&$newname, $FC_OVERWRITE)
					$ijk += 1
					ConsoleWrite('Found: ' & $ijk & ' Files' & @CRLF)
				Endif
			Next
		Next
    EndIf
EndFunc   ;==>Example