Hallo ich möchte eigentlich nur überprüfen ob ein Ordner die Größe verändert und mir den namen des Ordners ausgeben es befinden sich ca 30 Ordner im Verzeichnis mit datei'n im Unterordner. Habe wahrscheinlich wiedermal die Kirche ums Dorf getragen ist alles nur schnell zusammengebastelt und besitzt noch Relikte aus irgendwelchen test also bitte nicht verwirrt sein das ganze wird noch im nachhinein optimiert falls es den funktioniert
[autoit]#include <array.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
#include <Process.au3>
FileDelete(@TempDir & "\test.txt")
FileDelete(@TempDir & "\names.txt")
FileDelete(@TempDir & "\linecount.txt")
$path = @AppDataDir & "\Ts3Client\chats\"
$cmd1 = "dir " & $path & " > %temp%\test.txt " & "\O S"
_RunDos($cmd1)
Dim $array[0]
Dim $array1[0]
Dim $array2[0]
_RunDos($cmd1)
$file= FileRead(@TempDir & "\test.txt")
$string = StringSplit($file," ")
Global $zahl = 61
;MsgBox(0,"",$string)
;_ArrayDisplay($string,"testarray")
$stringsplit = StringSplit($string[$zahl],"==")
$stringsplit[1] = $stringsplit[1]
_ArrayAdd($array,$stringsplit[1])
;MsgBox(0,"",$array)
;>>>>>>>>>>>----------------------------------------------------ORDNER NAMEN--------------------------------------------
;_ArrayAdd($array,"hi")
do
;_ArrayDisplay($array,"testarray")
$zahl = $zahl +16
$stringsplit = StringSplit($string[$zahl],"==")
_ArrayAdd($array,$stringsplit[1])
Until $string[$zahl] = "Datei(en),"
;_ArrayDisplay($array,"testarray")
;<<<<<<-------------------------------------------------------ORDNER NAMEN--------------------------------------------
;>>>>>>>>>>>---------------------------------------------------ORDNER GRÖSSE--------------------------------------------
$zahl1 = 1
do
Global $size = DirGetSize($path & $array[$zahl1] & "==")
;MsgBox(0,"size",$array[$zahl1] & "==")
$zahl1 = $zahl1 +1
_ArrayAdd($array1,$size)
;_ArrayDisplay($array1,"size")
Until $size = "-1"
;<<<<<<<<<<----------------------------------------------------ORDNER GRÖSSE--------------------------------------------
;UDI5
;eG5Ja
;dn1kb htc
;<>>>>>>>>>>>>>----------------------------------------------------ORDNER vergleichen--------------------------------------------
$zahl2 = 1
$zahl2 = 0
$zahl4 = 0
$zahl5 = 0
$zahl6 = 3
[/autoit][autoit][/autoit][autoit]While 1
[/autoit][autoit][/autoit][autoit]$zahl3 = 0
$zahl5 = 0
do
Global $size11 = DirGetSize($path & $array[$zahl2] & "==")
_ArrayAdd($array2,$size11)
;MsgBox(0,"",$size11 & " " & $array[$zahl2] & "==")
_ArrayDisplay($array2,"tehst")
_ArrayDisplay($array1,$zahl4)
if $array2[$zahl4] > $array1[$zahl4] Then
;MsgBox(0,"","CHANGED!!!!!!!")
EndIf
$zahl2 = $zahl2 +1
MsgBox(0,"",$array2[$zahl4] & " " & $array1[$zahl6])
$zahl4 = $zahl4 +1
$zahl6 = $zahl6 +1
Until $size = "-1"
[/autoit][autoit][/autoit][autoit];_ArrayDisplay($array2,"tehst2222222")
do
_ArrayDelete($array2,$zahl5)
$zahl5 = $zahl5 +1
Until $zahl5 =100
[/autoit][autoit][/autoit][autoit]WEnd
[/autoit][autoit][/autoit][autoit];<<<<<<<<<<----------------------------------------------------ORDNER vergleichen--------------------------------------------
[/autoit][autoit][/autoit][autoit][/autoit]