02. november 2005 - 11:18
Der er
1 kommentar og
1 løsning
Tjekke filer, opret mappe og flyt filerne !
Jeg skal bruge et script til at tjekke nogle filer i en mappe
Filerne kunne feks hedde:
Drew Carey-(episode 1).mpg
Drew Carey-(episode 2).mpg
Spin City-(episode 1).mpg
Spin City-(episode 1).mpg
Nu er idéen så at den skal Scanne mappen igennem så den feks finder Drew Carey-(osv) og derefter opretter en mappe med navnet og kopierer alle filer indeholdende drew carey til mappen drew carey.
Ved ik lige om det er forklaret så det er til at forstå.
Systemet skal bruges til en HTPC hvis nogen er i tvivl ;-)
Håber nogen kan hjælpe med det !!
02. november 2005 - 12:26
#1
Jeg har løst det med programmering i AutoIT
Koden kom til at se sådan ud hvis nogen er interesseret:
#include "Config.cfg"
While 1
$search = FileFindFirstFile($folder & "\*.*")
If $search = -1 Then
MsgBox(0, "Error", "No files/directories matched the search pattern")
Exit
EndIf
While 1
$file = FileFindNextFile($search)
If @error Then ExitLoop
if $file <> "." and $file <> ".." Then
$dir = StringSplit($file, "-")
If FileExists("$folder & $dir[1]") Then
Else
DirCreate($folder & "\" & $dir[1])
FileMove($folder & "\" & $dir[1] & "*", $folder & "\" & $dir[1] & "\")
EndIf
$size = Round(DirGetSize($folder & "\" & $dir[1]) / 1024 / 1024)
if $size < 10 Then
DirRemove($folder & "\" & $dir[1], 1)
Endif
endif
WEnd
FileClose($search)
$sleeptime = $sleep * 60 * 1000
Sleep($sleeptime) ;five seconds
Wend
Config.cfg
------------------------------------
; Angiv folderen hvor filer skal flyttes til mapper
$folder = "c:\recordings"
$sleep = 15 ; Tid i minutter mellem hver flytning
---------------------------------------------------------
