OpenOffice.info

Hallo Thomas,
vielen dank für deine schnelle Antwort. Wie du beschrieben hast habe ich eingebaut. Funktioniert, Super!!

willst du die Zahlen immer dreistellig mit führenden Nullen, so verwende den Befehl Format. Die Zeile heisst dann:
Code:
oStr = sAy + sSene + "/" + format(sNo, "000 ...

Hallo,

ich habe eine Datenbank in Base erstellt.
In dieser Datenbank soll jede Datensatznummer automatisch generiert werden. (z.B. 0207/001......n)
02 ist für akt. Monat, 07 ist für akt. Jahr und 001 .....n ist fortlaufende Nummer für Monat 02. D.h. für März , April, Mai .....Dez. fangen wir wieder ...

Also ich habe weiter versucht. Meine Code sieht so aus:

Sub IDno
Heute= CDateToIso (Now())
Dim sNo as Integer
oDoc=thisComponent ' Referenz auf Dokument
oForm=oDoc.DrawPage.Forms.GetByName("Form1") ' erstes Formular
oFeld2 = oForm.getByName("NO")
oFeld3 = oForm.getByName ("SELECT "bestNo.Last ...

Danke für die Info.
Ich werde weitersuchen.
Ich bin für jede weitere Hilfe und Tips dankbar.

Melek

Hallo Winfried,
danke für deine schnelle Antwort.

Ich verwende die interne HSQLDB-engine. Die Datensätze möchte ich per Formular einfügen.

Wenn es mit "reinen" BASIC-Anweisungen geht, wäre auch ok.

Nochmal Danke schön.

Melek

Hallo,
ich habe eine Datenbank in Base erstellt.
In dieser Datenbank soll jede Datensatznummer automatisch generiert werden. (0207/001......n)
02 ist für akt. Monat, 07 ist für akt. Jahr und 001 .....n ist fortlaufende Nummer für Monat 02. D.h. für März 07 fangen wir wieder mit 001. Habe ich mit ...