xREL.v3

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=..\Downloads\1433_icon.ico
#AutoIt3Wrapper_Outfile=..\Downloads\Mediamove.Exe
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.12.0
 Author:         myName

 Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <File.au3>
#include <Array.au3>
#include<IE.au3>

$sDir = "D:\Downloads\extracted\"

$array = _FileListToArray($sDir)
;_ArrayDisplay($array)

if IsArray($array) then
for $i = 1 to $array[0]
$Files = _FileListToArray($sDir & $array[$i],"*",0)
;_ArrayDisplay($FIles)
For $Index = 1 To $Files[0]
    If StringRight($Files[$Index],4) <> ".mkv" Then
        FileDelete($sDir & "" & $array[$i] & "\" & $Files[$Index])
		DirRemove($sDir & "" & $array[$i] & "\" & $Files[$Index])
    EndIf
	Filemove($sDir & "" & $array[$i] & "\" & $Files[$Index],$sDir & $array[$i] & "\" & $array[$i] & ".mkv")
Next
Next

$transfer = _FileListToArray($sDir)

$movies = DriveStatus("Z:")
if $movies = "READY" then
for $x = 1 to $transfer[0]
	Traytip("Move Script","Übertrage Files:" & @crlf & $transfer[$x],2,1)
	Dirmove($sDir & $transfer[$x],"\\192.168.0.20\Files\Movies\" &$transfer[$x])
	;msgbox(0,"",$sDir & $transfer[$x])
Next
Msgbox(0,"Move Script","Übertragungen erledigt")
$oIE = _IEcreate('http://osmcsmc@192.168.0.12:8080/jsonrpc?request={"jsonrpc":"2.0","method":"VideoLibrary.Scan"}',0,0)
_IEloadwait($oIE)
_IEQuit($oIE)
Else
	Msgbox(0,"Move Script","NAS nicht erreichbar, bitte prüfen!")
Endif
Else
	Traytip("Move Script","Keine Filme zum Bearbeiten gefunden",2,1)
Endif