Hallo zusammen,
ich habe hier im archivierten Forum ein super Script gefunden (danke @winniepuh77).
https://autohotkey.com/board/topic/1181 ... angsnummer
Kann man das Script so anpassen, dass es keine GUI benötigt und einfach auf Tastendruck die neue Vorgangsnummer ausspuckt? Meine bescheidenen Kenntnisse reichen leider nicht für eine Modifikation aus.
Viele Grüße, Betriebsdirektor
vorhandenes Script "Vorgangsnummer" anpassen
Moderator: jNizM
-
- Posts: 7
- Joined: 09 Aug 2018, 08:08
Re: vorhandenes Script "Vorgangsnummer" anpassen
Weil mir gerade langweilig ist, ein Versuch:
Code: Select all
#NoEnv
; In der Datei wird die zuletzt verwendete Vorgangsnummer abgelegt
Datei := A_ScriptDir . "\Vorgang.txt"
; Die Monate werden als "A" für Januar, "B" für Februar usw. dargestellt.
Monate := ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L"]
Return
; --------------------------------------------------------------------
^+v:: ; Strg+Shift+v -> Vorgangsnummer generieren
Jetzt := A_Now
FormatTime, Jahr, %Jetzt%, yy
FormatTime, Monat, %Jetzt%, M
Monat := Monate[Monat]
Nummer := 0
If FileExist(Datei)
FileRead, LetzteNummer, %Datei%
Else
LetzteNummer := Jahr . Monat . "00"
If ((Jahr . Monat) = SubStr(LetzteNummer, 1, 3))
Nummer := SubStr(LetzteNummer, 4)
Nummer++
; Die laufende Nummer ist 3-stellig, ggf. muss {:03} angepasst werden.
Vorgang := Format("{:02}{:}{:03}", Jahr, Monat, Nummer)
MsgBox, 36, Vorgang, Vorgangsnummer %Vorgang% übertragen?
IfMsgBox, Yes
{
ToolTip, Hier muss Deine Aktion stehen!
FileDelete, %Datei%
FileAppend, %Vorgang%, %Datei%
}
Return
-
- Posts: 7
- Joined: 09 Aug 2018, 08:08
Re: vorhandenes Script "Vorgangsnummer" anpassen
Vielen Dank @just me,
ich stehe aber irgendwie auf dem Schlauch. Was meinst du mit ?
Sorry, bin absoluter Anfänger und noch beim kleinen 1 mal 1.
P.S. die MsgBox wird nicht benötigt. Es kann direkt die Ausgabe erfolgen.
Viele Grüße, Betriebsdirektor
ich stehe aber irgendwie auf dem Schlauch. Was meinst du mit
Code: Select all
ToolTip, Hier muss Deine Aktion stehen!
Sorry, bin absoluter Anfänger und noch beim kleinen 1 mal 1.
P.S. die MsgBox wird nicht benötigt. Es kann direkt die Ausgabe erfolgen.
Viele Grüße, Betriebsdirektor
Who is online
Users browsing this forum: No registered users and 28 guests