Autohotkey: PictureMoveAndRename

Tags: Categories: Software, Web

Zur Abwechslung mal wieder ein simples Autohotkey-Skript- Es verschiebt ausgewählte Bilder bspw. von einer SD-Karte auf die Festplatte und benennt die Bilder in aussagekräftigere Namen um:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
 
; zu verschiebende Dateien auswählen
FileSelectFile, files, M3 
 
; Auswahl des ZielVerzeichniss
FileSelectFolder, ZielFolder, , 0, Bitte den Zielordner auswählen
 
; Bilderpräfix eingeben
InputBox, BilderPrefix, Bilder umbenennen, Präfix für die Bilder eingeben...
 
; Eingabe des Namens für den Fotoordner
InputBox, FolderName, Ordnernamen eingeben, Name des neuen Ordners:, , , , , , , , [%A_YYYY%-%A_MM%-%A_DD%]
 
; erstelle den Ordner
FileCreateDir, %ZielFolder%\%FolderName%
 
Zielpfad = %ZielFolder%\%FolderName%
 
if files =
{
    MsgBox, Auswahl der zu verschiebenden Dateien abgebrochen!
    return
}
 
; Counter wird benötigt, damit die umbenannten Dateien mit 1 beginnen!
Counter = 1
 
; parse die selektierten Dateien
; Verschiebe die Dateien ins Zielverzeichnis
Loop, parse, files, `n
{ 
 
	; in der ersten Zeile steht das QuellVerzeichnis
	if a_index = 1
         QuelleFolder=%A_LoopField%
 
	FileMove, %QuelleFolder%\%A_LoopField%, %Zielpfad%
}
 
 
; benenne Bilder um
Loop, %Zielpfad%\*.jpg
{
	;den vorderen Teil (RIMG) abschneiden und nur die Bildnummer
	StringTrimLeft, BilderNummer, A_LoopFileName, 4
	MsgBox, %Zielpfad%\%BilderPrefix%%BilderNummer%
	FileMove, %Zielpfad%\%A_LoopFileName%, %Zielpfad%\%BilderPrefix%%BilderNummer%
 
}
 
return

Quelltext komplett anzeigen

Related posts:

  1. TrueCrypt-Container automatisch mit Autohotkey mounten Das Tool TrueCrypt dürfte hinlänglich bekannt sein. Ich verwende es,...
  2. LaTeX Word Counter Hat man sein wie auch immer geartetes Werk in LaTeX...
  3. AHK-Skripte XX: FolderSpy (vorerst letzte Autohotkey-Skript-Vorstellung) In dieser Reihe stelle ich in loser Reihenfolge Autohotkey-Skripte vor,...
  4. AHK-Skripte XVII: Autohotkey for Pocket PCs / WinCE In dieser Reihe stelle ich in loser Reihenfolge Autohotkey-Skripte vor,...

2 Kommentare

Horst Scheuer on Jan 24, 2009 Said:


Klasse, noch ein AutoHotkey-Fan. Dein Script werde ich auf jeden Fall mal testen.

thomas on Jan 24, 2009 Said:


Es vereinfacht mir den Digitakamera-auf-Festplatte Workflow.

Aber als sonderlich ausgereift würde ich das nicht bezeichnen ;-) Aber für meinen Hausgebrauch reicht es mir aus.

Leave A Reply