Auto ID erzeugen

Ilse

Hallo,

ich möchte gerne eine eindeutige ID für meine
Scan-Dokumente erzeugen.
Das Problem:
die ID darf nur einmal existieren und sollte ziemlich kurz sein!

Beispel mit Datum:

Datei-171011-1.pdf
Datei-171011-2.pdf

Hier mal mein Code

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

[/autoit][autoit][/autoit][autoit]

$Form1_1 = GUICreate("Form1", 429, 146, 274, 224)
$Nummer = GUICtrlCreateButton("Nummer erzeugen", 96, 8, 307, 41)
$Dateiname = GUICtrlCreateInput("Dateiname", 96, 56, 217, 28)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("Dateiname", 16, 64, 70, 20)
$ID = GUICtrlCreateInput("", 96, 104, 305, 28)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("ID", 64, 112, 17, 20)
$suffix = GUICtrlCreateInput(".pdf", 320, 64, 81, 24)
GUISetState(@SW_SHOW)

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

[/autoit][autoit][/autoit][autoit]

Case $Nummer
$Org = GUICtrlRead($Dateiname)
$pre = GUICtrlRead($suffix)
GUICtrlSetData($ID, $Org&"-"&$pre)

[/autoit][autoit][/autoit][autoit]

EndSwitch
WEnd

[/autoit][autoit][/autoit][autoit][/autoit]

Habt Ihr eine Idee wie man da das Datum
einbauen kann + fortlaufende ID ?

Liebe Grüße
Ilse

**BugFix**

Nutze die Makros:

[autoit]

$id = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC

[/autoit]

Je nachdem, wie oft am Tag du generierst, kannst du auch verkürzen und hinter den Datumswerten einen internen fortlaufenden Zähler konstanter Länge anhängen.

[autoit]

$iCounter = 1
$id = @YEAR & @MON & @MDAY & StringRight('00' & $iCounter, 3) ; == somit ist der Counter immer 3-stellig
$iCounter += 1

[/autoit]

Damit der Dateiname in der Reihenfolge der Erstellung sortiert wird, sollte auf jeden Fall die Reihenfolge Jahr-Monat-Tag verwendet werden. Kannst ja vom Jahr noch die ersten 2 Stellen abschnippeln (StringTrimLeft(@YEAR), 2).

Ilse

Hallo Bugfix,

dank dir für deine Tipps!
Klappt Super.

Liebe Grüße
Ilse

James · AutoIt Version (Prod): 3.3.14.2

Auch wenn das Thema schon gelöst ist, hier mal meine Idee:

[autoit]

((@YEAR - 1970) * 86400*360) + (@YDAY * 86400) + (@HOUR * 3600) + (@MIN * 60) + @SEC

[/autoit]

Das sind einfach nur die Sekunden seit dem Start der Unix-Epoche.

MfG, James C.

Ilse

Hallo Bugfix,

habe noch ein Problem:

[autoit]

$id2 = StringTrimLeft(@YEAR), 2) & @MON & @MDAY & @HOUR & @MIN &StringRight('00' & $iCounter, 3) ; == somit ist der Counter immer 3-stellig

[/autoit]

Das mit StringTrimLeft klappt nicht!
Bekomme Fehlermeldung
called with wrong number of args

...und danke auch an James!

Grüße
Ilse

**Schnitzel**

Was soll denn die klammer nach @Year?
Statt deiner Stringrightbastelei wäre übrigens Stringformat die "normale" Methode gewesen

**BugFix**

Zitat von Schnitzel

Statt deiner Stringrightbastelei wäre übrigens Stringformat die "normale" Methode gewesen

Also ich würde StringFormat nicht als 'normale' Methode bezeichnen. Aufgrund der nicht gerade angenehmen Syntax setze ich es z.B. nur ein, wenn nicht irgendwie vermeidbar. Btw. ist die "Stringbastelei" auch die schnellere Methode.

Ilse

ok,

ich hab's

$id2 = StringTrimLeft (@YEAR, 2) & @MON

Danke

Ilse