VBA - SQL in Visual Studio - Problem -> Befehl(e) werden zusammen nicht ausgeführt, getrennt schon

6
eingestellt am 13. Mai 2014
Hey Leute,

habe ein Problem. Und zwar wird bei folgendem Code nur einer der Befehle ausgegeben. Unabhängig voneinander funktioniert es, weshalb ich nicht von einem fehlerhaften Code ausgebe.. wo liegt das Problem?

Hier der Code:

Vorleser = Ausfuehrer.ExecuteReader()
Vorleser.Read()
Dim aktuelleID As String
'Dim IDRechnen As Integer
Dim IDRechnen = CInt(Vorleser(0))
aktuelleID = CStr(IDRechnen + 1)
KundenNr = aktuelleID
tb_Kundennummer.Text = CStr(aktuelleID)
Vorleser.Close()

Dim neuerKunde As New Kunde(KundenNr, Anrede, Nachname, Vorname, Strasse, Hausnummer, PLZ, Ort, Land, Telefon, Fax, Email, Kontoinhaber, IBAN, BIC, Bank)

strAnfuegezeile = "INSERT INTO tblNum(" & "M" & tb_Magazin.Text & ") VALUES ("
strAnfuegezeile = strAnfuegezeile & IDRechnen + 1 & "); "

strAnfuegezeile = "INSERT INTO tblKunde(KdNr, Anrede, Nachname, Vorname, Strasse, Hausnummer, PLZ, Ort, Land, Telefon, Fax, Email, Kontoinhaber, IBAN, BIC, Bank) VALUES ('"
strAnfuegezeile = strAnfuegezeile & neuerKunde.KundenNr & "', '"
strAnfuegezeile = strAnfuegezeile & neuerKunde.Anrede & "', '"
strAnfuegezeile = strAnfuegezeile & neuerKunde.Nachname & "', '"
strAnfuegezeile = strAnfuegezeile & neuerKunde.Vorname & "', '"


Danke!

  1. Diverses
Gruppen
  1. Diverses
6 Kommentare

Was sagt der Debugger? Welcher Fehler wird geworfen?

Steht am Ende in der Variablen strAnfuegezeile nicht ziemlicher Quatsch?

[...] VALUES('"INSERT INTO tblNum( [...]

Verfasser

Kein Fehler..

Was genau meinst?

Kannst du die Variable strAnfuegezeile mal zum Stand der letzten Codezeile ausgeben lassen? Würde mich interessieren, was da dann drin steht...

Also nach dem Code da oben, wird ja immer nur der letzte Insert Into Befehl in die DB geschrieben, da du die Variable strAnfuegezeile mit strAnfuegezeile = "INSERT INTO tblKunde überschreibst.

Entweder sendest du nach jedem Insert Into die Query in "strAnfuegezeile" ab oder du machst strAnfuegezeile = strAnfuegezeile & "INSERT INTO tblKunde(KdNr,...


Kleiner Tipp, führ dir mal die Funktion des &=-Operators zu Gemüte. Erhöht doch ziemlich die Übersichtlichkeit.

Verfasser

Cr4zyJ0k3r hat den entscheidenden Tipp gegeben. Danke euch allen!

Dein Kommentar
Avatar
@
    Text
    Top Diskussionen
    1. Lacoste Gutschein verfallen?33
    2. Amazon Echo Sieht keine Kontakte von Iphone11
    3. Gutscheine Eventim34
    4. Star Wars Battlefront 2 PC wo am günstigsten?810

    Weitere Diskussionen