Hey, danke schonmal dafür
Sorry, Script hatte ich vergessen...
Meinst du das könnte man irgendwie kürzer schreiben? Hatte eigentlich gehofft das ich ein relativ einfaches Script schreiben könnte werde ich aber mal morgen abend dran setzen und versuchen das so einzubauen, falls keine anderen Vorschläge kommen
Und jetzt hier nochmal das Script:
Spoiler anzeigen
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.8.0
Author: NightmarePhoenix
Script Function:
Desktop aufräumen.
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]; Script Start - Add your code below here
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]#include <GUIConstantsEx.au3>
#include <GUIConstants.au3>
$Deskren = GUICreate("Deskren", 250, 155)
$Pics = GuiCtrlCreateButton ("Clear Pictures", 5, 5, 100, 25)
$Vids = GuiCtrlCreateButton ("Clear Videos", 5, 35, 100, 25)
$PDF = GuiCtrlCreateButton ("Clear PDF's", 5, 65, 100, 25)
$HTML = GuiCtrlCreateButton ("Clear HTML's", 5, 95, 100, 25)
$All = GuiCtrlCreateButton ("Clear All", 5, 125, 100, 25)
$Info = GUICtrlCreateLabel ("Info-Box für Info's :P", 110, 5, 135, 145)
GUISetState ()
_main ()
[/autoit] [autoit][/autoit] [autoit]Func _main()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $Pics
_MovePics()
Case $msg = $Vids
_MoveVids()
Case $msg = $PDF
_MovePDF()
Case $msg = $HTML
_MoveHTML()
Case $msg = $All
_MoveAll()
EndSelect
If $msg = $GUI_EVENT_CLOSE Then Exit
WEnd
EndFunc
;##############################################################################
[/autoit] [autoit][/autoit] [autoit]Func _MovePics()
FileMove( @ScriptDir&"\*.jpeg", @Scriptdir&"\Sortieren\Bilder", 0+8)
FileMove( @ScriptDir&"\*.jpg", @Scriptdir&"\Sortieren\Bilder", 0+8)
FileMove( @ScriptDir&"\*.png", @Scriptdir&"\Sortieren\Bilder", 0+8)
FileMove( @ScriptDir&"\*.bmp", @Scriptdir&"\Sortieren\Bilder", 0+8)
FileMove( @ScriptDir&"\*.gif", @Scriptdir&"\Sortieren\Bilder", 0+8)
FileMove( @ScriptDir&"\*.pdn", @Scriptdir&"\Sortieren\PaintNET", 0+8)
GuiCtrlDelete($Info)
$Info = GUICtrlCreateLabel ("Bilder werden verschoben.", 110, 5, 135, 90)
EndFunc
;##############################################################################
[/autoit] [autoit][/autoit] [autoit]Func _MoveVids()
FileMove( @ScriptDir&"\*.mp4", @Scriptdir&"\Sortieren\Videos", 0+8)
FileMove( @ScriptDir&"\*.flv", @Scriptdir&"\Sortieren\Videos", 0+8)
GuiCtrlDelete($Info)
$Info = GUICtrlCreateLabel ("Videos werden verschoben.", 110, 5, 135, 90)
EndFunc
;##############################################################################
[/autoit] [autoit][/autoit] [autoit]Func _MovePDF()
FileMove( @ScriptDir&"\*.pdf", @Scriptdir&"\Sortieren\PDF", 0+8)
FileMove( @ScriptDir&"\*.xps", @Scriptdir&"\Sortieren\PDF", 0+8)
GuiCtrlDelete($Info)
$Info = GUICtrlCreateLabel ("PDF-Dateien werden verschoben.", 110, 5, 135, 90)
EndFunc
;##############################################################################
[/autoit] [autoit][/autoit] [autoit]Func _MoveHTML()
FileMove( @ScriptDir&"\*.html", @Scriptdir&"\Sortieren\Links", 0+8)
GuiCtrlDelete($Info)
$Info = GUICtrlCreateLabel ("HTML-Dateien werden verschoben.", 110, 5, 135, 90)
EndFunc
;##############################################################################
[/autoit] [autoit][/autoit] [autoit]Func _MoveAll()
DirCreate(@Scriptdir&"\Sortieren\Bilder")
DirCreate(@Scriptdir&"\Sortieren\Videos")
EndFunc