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

Leider keine Fehlermeldung... Ich muss doch nach db.Execute "LoeschenSerNr", 128 (wobei das bei der Lösung, dass die Seriennummer in die tbl1Auftragsdaten geschrieben wird hinfällig ist...) meine Variable iAnz bestimmen, bedeutet iAnz=tbl1Auftragsdaten.Anzahl
Wenn ich iAnz bestimmt habe (bspw 3 Stück) dann läuft der Code richtig durch, oder?....

*confused.gif* verzweifelt... *confused.gif*

 

Kannst du ja ganz einfach testen:
Code:

maike

 

...ich habe ja schon einen Vorschlag gemacht, aber anscheinend überließt du immer so einiges.
Code:

wenn da 0 herauskommt, ist ja klar, das nichts funktionieren kann.
Du füllst die Variable iAnz nicht einmal, wie schon lange markusxy bemerkt hat.
Man sollte eine Variable füllen bevor man sie verwenden möchte.
Oder, entferne das iAnz und ersetze es durch...
Code:

...und teste es mal mit dem Code den du hast.

 

Nein ich überlese es nicht, aber es hat mich nicht weiter gebracht...


OK, ich setze For i = 1 To 3 ein. Dann kommt die Fehlermeldung
Fehlendes Semikolon (*wink.gif* am Ende der SQL-Anweisung auf Höhe db. Execute sqlinsert, 128...
Wo zur Hölle soll das hin.

Code:

 

...möchte da an den Anfang erinnern *Smilie
Aber, egal ev.
Code:

wüsste aber nicht warum das unbedingt gebraucht wird.

PS: warum stellst nicht einfach eine BeispielDB ein, dann wäre das in Handumdrehen gelöst...
oder möchtest lernen, dann weiter so, ist auch ok.

 

Weil Access rumheult *wink.gif*
lustigerweise funktioniert es aber trotz "Endzeichen" nicht...

Der Debugger springt direkt in die Zeile db.Execute sqlinsert, 128 und markiert mir diese gelb...

 

...hätte mich auch gewundert, warum es das ; braucht.

Lasse mal values weg.

Schreib mal davor...
Code:

und zeig was dabei heraus kommt.

 

Code:

maike

 

ja ok, das sieht gut aus, habe es so noch nie so erstellt.
Wenns kein SELECT gibt, wird das anscheinend so eine gültige Form sein. *Smilie
PS: darum hat mich auch sein erster Code...
"insert into Seriennummer values(" & zielseriennummer &... so gewundert...

 

Code:

Das ist auch keine syntaktisch korrekte Anfügeabfrage. So sollte es aussehen;
Zeilen einfügen mit INSERT

Also entweder VALUES benutzen (wobei Werte von außen kommen, was man auch an der Einbindung in die Anweisung bemerken müsste) oder
SELECT benutzen, dann aber in einer Anfügeabfrage mit Nennung einer Tabelle in einem FROM-Teil, weil sonst der SQL-Interpreter nicht mitspielt.

Im Code in Beitrag #34 ist das Recordset (was übrigens nicht geschlossen wird) total unbenutzt und somit überflüssig.

Auch würde ich eine Inputbox nicht benutzen, sondern in Formulartextfeldern entsprechende Eingaben vornehmen lassen. Dort ist eine Überprüfung deutlich komfortabler, und wenn Nummern und Anzahlen nicht vom Himmel fallen, sondern i.d.R. berechenbar sind, könnte man als Bedienerunterstützung diese Werte gleich als Angebot vorbelegen.

Statt über eine Schleife würde ich fortlaufende Nummern über eine Zahlen-Hilfstabelle (die auch zu anderen Aufgaben vielfältig nutzbar ist) einsetzen.
So eine Zahlen-Hilfstabelle hat nur ein Feld mit fortlaufenden Nummern von 0 bis z.B. 999 (=> T999). Siehe dazu auch Grundlagen - SQL ist leicht (1) - Hilfstabellen
Die Abfrage würde dann etwa so lauten:
Code:

Die Bezeichnungen mit den eckigen Klammern sind die Parameterfelder, die passend bedient werden müssten.

 

\@Eberhard danke für die Erklärung,
aber, zum Thema ich bin immer noch der Meinung, dass er einfach keinen
Datensatz in seiner Abfrage bringt, der zum Erfolg führen würde.
Der Schlüssel ist eine einfache Abfrage, aber mM bei...
Code:

...kommt kein DS heraus... dieses Problem sollte man zuerst beheben und dann weiter.
PS: vermutlich wäre nicht viel, um nicht zusagen kein VBA, außer ein Aufruf einer Abfrage nötig *Smilie
Na ja, aber nicht sicher *biggrin.gif*

 

Wie gesagt: Da das Recordset eh nicht verwendet wird, kann es einfach und zusammen mit der dazugehörigen Abfrage eliminiert werden.
Momentan werden da maximal Fehler produziert, und die Übersicht für das wirklich Wesentliche geht verloren.

 

Guten Morgen,

ok ihr verwirrt mich gerade etwas.
Ich habe als Anhang mal die mini Datenbank hochgeladen. Nicht wundern, bei der Abfrage "1_Auftragsdaten" frage ich mit Hilfe der Tabelle "tbl_Auftragsdaten" (die der Mitarbeiter von Hand eingeben muss) die ganzen Eckdaten ab.
Dann stehen im Grunde alle wichtigen Daten in der tbl1Auftragsdaten!
Dann sollte per klick auf den Button "Start" der Code durchlaufen und mir "n" Datensätze erstellen, wobei "n = Anzahl" aus der tbl1Auftragsdaten ist und jeder Datensatz eine aufsteigende sechstellige Seriennummer hat. Bspw. Datensatz 1 = 100100; DS2= 100101, etc.

Das ist eigentlich alles was (bis jetzt) benötigt wird *cool.gif* *wink.gif* *tongue.gif*

 

Guten Morgen,

na da hast ja einige Fehler in deiner DB *Smilie

Aus den beiden tblAuftragsdaten und tblSeriennummern kannst jetzt eine Abfrage einrichten
mit einer verknüpfunf über die ID, dann hast den Auftrag und die Seriennummern beisammen
und musst sie nicht jedesmal löschen.

 

ohhh vielen Dank Kyron,

Das schaut sehr gut aus und funktioniert noch dazu, ich bin überwältigt *wink.gif*

jetzt muss ich die Felder noch in ein Formular einfügen, aber das schaffe ich *wink.gif*
Mal schauen ob sich noch Fragen auf tun, aber erstmal bin ich sehr glücklich!

Vielen vielen Dank an alle!!!