einfache Filenummerierung Topic is solved

[shaleme]

Hallo,

ich bearbeite mehrfach einzelne Files pro Tag, ich möchte wenn ich den Filenamen vergebe eine einfache fortlaufende Nummer, beginnend mit x001, einfügen.

Beispiel:
Rechnung 27011 x001.pdf
Angebot 174711 x002.pdf
Bestellung 1821 x003.pdf

Ich benutze zwar AHK und habe mir einige Skripte zusammengebastelt aber meine Kenntnisse sind rudimentär.

Vielen Dank für eure Hilfe und Nachsicht mit einem Anfänger!

[BoBo]

Nachdem ich gefühlte 100J nicht mehr gecoded habe hier ein Anfängerscript von mir

Die Idee hinter dem Script ist wie folgt ..

1. Script wird gestartet und lauert im Hintergrund.
2. User beschließt Datei umzubennenen ..
3. dazu kann er zu jedem Zeitpunkt die fortlaufende Nummer durch Betätigen der Tastenkombination "Alt+p" generieren.
4. Diese befindet sich nun in der Zwischenablage zur weiteren Verwendung.
5. Have fun !

Code: Select all

#SingleInstance , Force
#NoEnv  	; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir % A_ScriptDir


	/*

	In diesem Kommentarabschnitt (hier mal die "INI"-Sektion" genannt) speichern wir den zuletzt vergebenen Wert. Default ist "1".

	[Sektion]
	
		Key =1

	*/

Datei 	:= A_ScriptName						; Script in welchem die INI-Sektion geführt wird (hier mal intern im Script angelegt. s.o.)


!p::											; Alt+p = "prepare"
	ClipBoard := ""								; Reset der Zwischenablage
	SetFormat, float, 03.0						; Vorkommazahl auf 3stelliges Format festlegen
	IniRead, Nummer,%A_ScriptName%, Sektion, Key 	; Den letzten vergebenen Wert in der "INI"-Sektion auslesen
	Nummer += 0.0  							; Zahlenformat der Variablen zuweisen ("000")
	Clipboard := Nummer							; Zahlenwert in die Zwischenablage übertragen
	SoundBeep, 600, 200							; "Beep!"
	ToolTip, % " .. x" Nummer						; Anzeige des aktuellen Wertes
	Sleep, 1200								; Schnarche 1.2 sek
	ToolTip									; Anzeige verabschiedet sich
	Nummer++								; Wert um 1 erhöhen
	IniWrite, %Nummer%, %A_ScriptName%, Sektion, Key	; Neuen Wert in der "INI"-Sektion abspeichern
	Return									; Zurück auf Los. Ziehe keine 500€ ein!

!r::											; Alt+r = "Reset"
	IniWrite, 1, %A_ScriptName%, Sektion, Key			; Wert in der INI-Section auf 1 zurücksetzen
	SoundBeep									; "Beep!"
	Return									; s.o.
	
!x::	ExitApp									; Alt+x = "eXit" Beendet das Script

[BoBo]

Holla,
kaum das man ein script schreibt, schon findet es reissenden absatz