Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Hochgezählte Nummer wird doppelt vergeben
zurück: Tabellenfelder automatisch mit Datum des Monats füllen weiter: Problem mit einfacherer Insert Into Anweisung Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
crack24
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Apr 2014, 15:17
Rufname:

Hochgezählte Nummer wird doppelt vergeben - Hochgezählte Nummer wird doppelt vergeben

Nach oben
       Version: Office 2003

Hallo,

vielleicht habt ihr einen Tip für mich. In unserer Angebots-Datenbank werden manchmal die Angebotsnummern doppelt vergeben, obwohl laut Code die letzte Nummer +1 vergeben werden soll. ANR ist diese Angebotsnummer.

Frontend und Backend liegen zentral im Netz und ca. 5 Personen greifen gleichzeitig auf diese .mdb Datei des Frontends zu.
Im Formular klickt man auf "Neues Angebot erstellen" und folgender Code wird dann ausgeführt. Danach hat man erstmal eine leere Angebotsmaske, wo nur die generierte Nummer drinsteht und dann die restlichen Daten eingetragen werden.
Code:
Private Sub Schaltfläche91_Click()
On Error GoTo Schaltfläche91_Click_Err
    DoCmd.GoToRecord acForm, "Angebot", acLast
    Merker_ANR = ANR
    DoCmd.GoToRecord acForm, "Angebot", acNewRec
    Forms!Angebot!Kunde = Null
    DoCmd.RepaintObject acForm, "Angebot"
    ANR = Merker_ANR + 1
    SendKeys "^{'}", True
    DoCmd.RunCommand acCmdSaveRecord
    DoCmd.RepaintObject acForm, "Angebot"
    DoCmd.GoToControl "Kunde"
Schaltfläche91_Click_Exit:
    Exit Sub
Schaltfläche91_Click_Err:
    MsgBox Error$
    Resume Schaltfläche91_Click_Exit
End Sub
Der Code ist nicht von mir erstellt, deswegen bin ich mir nicht sicher ob alle Anweisungen da Sinn machen.

4-5x im Monat passiert es dann, dass eine Nummer doppelt vergeben wird. Aber nie dreifach oder mehr, immer nur doppelt. Habt ihr dazu eine Idee?

Viele Grüße
crack
MissPh!
Office-VBA-Programmiererin


Verfasst am:
28. Apr 2014, 00:49
Rufname:
Wohnort: NRW

AW: Hochgezählte Nummer wird doppelt vergeben - AW: Hochgezählte Nummer wird doppelt vergeben

Nach oben
       Version: Office 2003

Hallo,

wenn du keine Autowert-ID einsetzen willst oder kannst, so muss die beim Anlegen eines neuen Datensatzes vergebene neue Nummer auch sofort gespeichert werden, um nicht auch noch von einem zweiten Benutzer vergeben werden zu können.

So ist es aber natürlich immer noch möglich, dass der Datensatz zu einer neu vergebenen Nummer am Ende nicht gespeichert wird und die Nummer somit "verloren" ist. Warum also setzt du keine Autowert-ID ein, die von Access ohne weiteres Dazutun gemanagt wird?!

BTW:
Der gezeigte VBA-Code sieht arg nach konvertiertem Makro-Code aus - und ist dementsprechend optimierungsbedürftig.
Und Sendkeys sollte man nach Möglichkeit überhaupt nicht verwenden.
Fraglich bleibt auch die Deklaration der benutzten Variablen und der Name des ausführenden Formulars.

_________________
Gruß MissPh!
Bitsqueezer
Office-VBA-Programmierer


Verfasst am:
28. Apr 2014, 07:59
Rufname:

AW: Hochgezählte Nummer wird doppelt vergeben - AW: Hochgezählte Nummer wird doppelt vergeben

Nach oben
       Version: Office 2003

Hallo,

versuch's mal hiermit:
Autowert und individuelle Zähler

In einer Mehrbenutzerumgebung kann man am besten mit einer AutoID sicherstellen, daß ein Wert nicht zweimal vergeben wird. Den Wert selbst kann man dann als Zähler verwenden. Da die AutoID aber auch vergeben wird, wenn man nur einen neuen Datensatz zu schreiben beginnt und dann mit ESC den Vorgang abbricht, hätte man Lücken im Counter.
In dem Beispiel oben wird das umgangen, indem eine Zählertabelle verwendet wird, in die ein Wert geschrieben wird, wenn wirklich ein neuer Counterwert gebraucht wird, nämlich erst beim Speichern des gewünschten Datensatzes (also in Form_BeforeUpdate), nachdem auch alle Validierungen erfolgt sind. Mit dem Countermodul aus dem Beispiel kann man auch das Format des Counters ziemlich frei festlegen.

Gruß

Christian
Gast



Verfasst am:
28. Apr 2014, 10:25
Rufname:

AW: Hochgezählte Nummer wird doppelt vergeben - AW: Hochgezählte Nummer wird doppelt vergeben

Nach oben
       Version: Office 2003

Ja es ist ein konvertiertes Makro. Wofür diese Sendkeys Anweisung ist, habe ich acuh noch nicht herausgefunden.

Einen AutoWert habe ich bisher nicht benutzt weil die Geschäftsführung die Nummer wie bisher im Format "356-0414" haben möchte. Wobei die erste Zahl pro Monat hochzählt und die anderen beiden den aktuellen Monat und Jahr darstellen.

Ich schaue mir mal das Beispiel von Bitsqueezer an, vielleicht komme ich damit weiter.

Vielen Dank euch fürs anschauen.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Automatischen Wert nach Kriterien vergeben 2 Heaven77 294 07. Aug 2009, 10:23
Heaven77 Automatischen Wert nach Kriterien vergeben
Keine neuen Beiträge Access Tabellen & Abfragen: In eine Tabelle Daten nur schreiben wenn nicht doppelt 1 esi 589 24. Feb 2009, 10:46
esi In eine Tabelle Daten nur schreiben wenn nicht doppelt
Keine neuen Beiträge Access Tabellen & Abfragen: Feld aus Text und fortlaufender Nummer 2 schnacko 494 11. Feb 2009, 10:11
schnacko Feld aus Text und fortlaufender Nummer
Keine neuen Beiträge Access Tabellen & Abfragen: Forlaufende Nummer nach bestimmten Kriterien in Abfrage 7 cp08 492 13. Nov 2008, 04:29
Willi Wipp Forlaufende Nummer nach bestimmten Kriterien in Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Eindeutige Nummer als Primärschlüssel 1 Haddrwaidaag 793 16. Jun 2008, 10:38
stpimi Eindeutige Nummer als Primärschlüssel
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage nur mit erster 5 stelle des Textes bzw. Nummer 1 alex951357 383 05. März 2008, 16:33
JörgG Abfrage nur mit erster 5 stelle des Textes bzw. Nummer
Keine neuen Beiträge Access Tabellen & Abfragen: Fortlaufende Nummer in Abschnitten 1 Blocki 387 08. Okt 2007, 20:44
jens05 Fortlaufende Nummer in Abschnitten
Keine neuen Beiträge Access Tabellen & Abfragen: laufende Nummer per Buttonklick übertragen 2 janosch1979 1199 04. Jul 2007, 10:23
janosch1979 laufende Nummer per Buttonklick übertragen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage Ergebnis doppelt! 1 sonja2007 588 04. Apr 2007, 17:45
Thomas2007 Abfrage Ergebnis doppelt!
Keine neuen Beiträge Access Tabellen & Abfragen: Zeige aus 2 eintraegen nur den mit der hoeheren Nummer 5 bandit_12 488 19. Feb 2007, 07:06
bandit_12 Zeige aus 2 eintraegen nur den mit der hoeheren Nummer
Keine neuen Beiträge Access Tabellen & Abfragen: IDENT automatisch vergeben lassen 2 ? 784 31. Aug 2006, 14:23
Gast IDENT automatisch vergeben lassen
Keine neuen Beiträge Access Tabellen & Abfragen: abfrage gibt jeden datensatz doppelt oder dreifach aus 13 andiww086 785 10. Aug 2006, 11:16
Gast abfrage gibt jeden datensatz doppelt oder dreifach aus
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Expression Web Forum