vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Datenbanken
Was läuft hier nicht richtig? 
Autor: Auge
Datum: 09.11.09 18:40

Hallo,

VB6 mit Access2000 DB, das ganze mit DAO-Zugriff.
Ich habe eine Tabelle mit einem Zahlenfeld "lfdNR". Das Feld wird beim Buchen mit fortlaufenden Nummern von 1 bis X gefüllt. Klappt auch meistens Es ist aber einige Male vorgekommen, dass Nummern doppelt vorhanden sind...fatal.
Ein Auszug aus dem Code:

Dim sRechnr as Single
Set RS = DB.OpenRecordset("SELECT * From Umsatz order by lfdnr ASC")
RS.MoveLast
If IsNull(RS!lfdnr) Then
sRechnr = 0
Else
sRechnr = RS!lfdnr
End If
sRechnr = sRechnr + 1

Das heißt, ich öffne die DB gehe auf den letzten Datensatz und lese diesen aus, erhöhe um 1 und Buche.
Die Abfrage nach Nullwerten ist / war nötig, weil die ersten hundert Datensätze noch keine fortlaufende Nummer hatten. Wie gesagt, es passiert immer mal (ca. 10 von 1000), das Nummern doppelt vorliegen. Was läuft da falsch.

Besten Dank für eure Hilfe.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Was läuft hier nicht richtig?1.184Auge09.11.09 18:40
Re: Was läuft hier nicht richtig?842ModeratorDieter09.11.09 20:56
Re: Was läuft hier nicht richtig?656Auge10.11.09 09:37
Re: Was läuft hier nicht richtig?683Auge11.11.09 05:14
Re: Was läuft hier nicht richtig?629Auge11.11.09 10:32
Re: Was läuft hier nicht richtig?618Dirk11.11.09 09:41
Re: Was läuft hier nicht richtig?664Auge11.11.09 10:43

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel