Office: (Office 2007) Daten abfragen, Seriennummer hoch zählen, in Formular schreiben

teste mal ob es überhaupt DS gibt, das vorm löschen einfügen...
Code:

Ist aber nur mal zum testen...
Verstehe ich zwar auch nicht, wieso wird die Seriennummer immer wieder gelöscht?
Die müsste doch mit einem Auftrag immer wieder nachvollziehbar sein.

 

Die Seriennummer wird im Auftrag vermerkt und muss nicht gespeichert werden.
Bei der Meldung kommt (fast erwartet) Kein DS vorhanden...

 

Da war doch irgendwo die Rede von Stückzahl und dass diese Anzahl Sätze eingefügt werden soll bzw. ja eigentlich nur die Seriennummern erzeugt ...
Das bring ich irgendwie noch nicht mit dem gezeigten und auch nicht mit Alfreds Code überein.

IMHO:

1. Anzahl Stück des Auftrags ermitteln (DCount auf Tabelle)
2. Seriennummer aus Eingabe oder Formular auslesen
3. Schleife mit Zähler (For i = 1 to Anzahl Stück)
   dabei Seriennummernfeld in tbl1auftragsdaten aktualisieren (SQL UPDATE)
   und die Nummer jeweils um 1 erhöhen
4. fertich

maike

 

...wie ich das jetzt verstanden habe, sollte das Recordset die Datensätze liefern und gleichzeitig die Stückzahl.
Da anscheinend, aber nicht sicher, in seinem Code die beiden Recordset die gleiche Anzahl der DS liefern, habe ich eines entfernt.

Dann die InputBox, anschließend Seriennummern löschen,
und über die Anzahl der DS die Seriennummern aufsteigend in die Tabelle Seriennummern einfügen...
Ich würde das auch mit einem Recordset erledigen, nur habe ich noch nicht so 100% über die Tabelle Seriennummern durchgeblickt.
Was wird da wirklich alles eingefügt?
Das... Code:

...kann mM so nicht funktionieren, da ja der Select-Teil fehlt.

Auf jeden Fall, sollte zuerst mal sichergestellt werden, dass Datensätze vorhanden sind.

Mal ein Debug.Print sSQL einfügen und damit eine Abfrage generieren.
Dann sieht man ja was nicht stimmt. So würde es halt ich machen.

Wenn das alles nur um die Seriennummern geht, könnte man die Anzahl der DS auch mit DCount abfragen, wäre einfacher.

Mehr weiß ich jetzt auch nicht und solange es keine Daten gibt, kann es sowieso nicht funktionieren
Der Code könnte dann ungefähr so aussehen...
Code:

 

Guten Morgen fleißige Helferlein, *wink.gif*

also ich habe jetzt den Code wie unten umgeschrieben und habe keine Fehlermeldung bekommen *wink.gif* aber leider schreibt er die Seriennummern nicht an die Tabelle "Seriennummer". Theoretisch müsste ja jetzt wenn ich eine fiktive Stückzahl 3 habe aus der Tabelle "tbl1Auftragsdaten" nehme und mit dem Code der Seriennummer"Hochzählung" kombiniere, dann sollten in der Tabelle "Seriennummer" 3 verschiedene Seriennummern auftauchen. *tongue.gif*


Code:

 

Ich frach nochma: Warum müssen die Seriennummern in der Tabelle Seriennummer geparkt werden? Wieso schreibst du die nicht gleich in die Auftragstabelle?
maike

 

Also in #20 ist iAnz nicht initialisiert. Die For Schleife wird gar nicht ausgeführt.

Wenn ein Code nicht funktioniert - kommt auch bei allen Profis vor - dann Schrittweise durchgehen, dafür gibt es den Debugger. Aber das weißt du sicher schon.

 

\@Maikek

die Seriennummer kann auch in der tbl1Auftragsdaten gespeichert werden. Das funktioniert auch, dann habe ich alle nötigen Daten in einer einzigen Tabelle. Ich dachte nur, wenn ich die Seriennummer "extern" speichere, dann ist das einfacher zu programmieren.... *stupid *smashing

 

Welcher Datensatz welche Seriennummer bekommt ist egal?
Dann versuch' es mal so:
Code:

maike

 

Hey Maike,

also ich habe jetzt den Code so wie er unten aufgeführt ist, wenn ich debug.print Zielseriennummer mache, dann kommt null.
Ich glaube es fehlt die deklaration, was iAnz ist oder?

Ich schreibe ja zu Anfang in eine Tabelle eine Zeile mit meinen Auftragsdaten. Dann frage ich nach der Seriennummer (6-stellig oder nicht)
und dann "steht" der Code. Theoretisch müsste ich ja die Seriennummer bspw. an die tbl1Auftragsdaten anfügen und dann hätte ich bei einer Stückzahl von 3 Stück, 3 Datensätze, die bis auf die Seriennummer identisch sind. Richtig?

Code:

 

hast du meinen Vorschlag ausprobiert?
maike

 

Code:

Was soll hier auch laufen?

 

Ja, aber er speichert dann das Ergebnis in keine Tabelle oder so...

Und genau deswegen bin ich der Anfänger und ihr die Profis *wink.gif*

 

Du müsstest iAnz einen Wert >= 1 zuweisen, ehe die Schleife laufen soll.
Das wurde in Beitrag #22 schon angemerkt.

Die Fähigkeit des Lesens sowie den gesunden Menschenverstand nicht an der Schwelle zum Programmieren ablegen, sondern mitnehmen. Das wird alles weiterhin benötigt.

 

Gespeichert wird in die Tabelle tbl1Auftragsdaten, Feld Seriennummer.
Hast du die Tabellen- und Feldnamen angepasst? Wie sieht der Code bei dir aus?
Gibt es Fehlermeldungen?
maike