Hi,
schön das es so ein Forum gibt. Ich bin neu hier und hoffe auf Hilfe eines kleinem Problems in Visual Basic. Nach einer Stunde suchen im Forum dachte ich es ist besser es direkt hier zu posten.
Folgender Hintergrund: Ich erzeuge mit Hilfe einer Schleife neue TextBoxen, Labels und Checkboxen Aufgaben, jede Aufgabe wird mit einer Nummer identifiziert. Die Anzahl ergibt sich aus der Access Datenbank und wird per Select ausgelesen. Das klappt soweit wunderbar. Mein Problem ist wie schaffe ich es das per Schleife alle Aufgaben mit Hilfe von Insert wieder in die Datenbank geschrieben werden.
Habe es folgenden Code probiert:
For i = 1 To anzahl
Try
con.Open()
cmd.CommandText = "INSERT INTO Abschluss (PruefungNummer, FrageNummer, C1, C2, C3, C4) VALUES ('" & TxtFreigabe1.Text & "', '" & FrageNummer.Text &
"', '" & C1.Text & "', '" & C2.Text & "', '" & C3.Text & "', '" & C4.Text & "') "
cmd.ExecuteNonQuery()
MessageBox.Show("Abgeschlossen")
Catch ex As Exception
MessageBox.Show(ex.Message)
con.Close()
End Try
Next
Die anzahl wird durch das select bekannt. Das Problem ist das hier nur die letzte Aufgabe wieder in die Access Datenbank geschrieben wird.
Primärschlüssel ist übrigens "FrageNummer". Kann mir jemand helfen oder einen Tipp geben?
Danke und Gruß
rawneblade
schön das es so ein Forum gibt. Ich bin neu hier und hoffe auf Hilfe eines kleinem Problems in Visual Basic. Nach einer Stunde suchen im Forum dachte ich es ist besser es direkt hier zu posten.
Folgender Hintergrund: Ich erzeuge mit Hilfe einer Schleife neue TextBoxen, Labels und Checkboxen Aufgaben, jede Aufgabe wird mit einer Nummer identifiziert. Die Anzahl ergibt sich aus der Access Datenbank und wird per Select ausgelesen. Das klappt soweit wunderbar. Mein Problem ist wie schaffe ich es das per Schleife alle Aufgaben mit Hilfe von Insert wieder in die Datenbank geschrieben werden.
Habe es folgenden Code probiert:
For i = 1 To anzahl
Try
con.Open()
cmd.CommandText = "INSERT INTO Abschluss (PruefungNummer, FrageNummer, C1, C2, C3, C4) VALUES ('" & TxtFreigabe1.Text & "', '" & FrageNummer.Text &
"', '" & C1.Text & "', '" & C2.Text & "', '" & C3.Text & "', '" & C4.Text & "') "
cmd.ExecuteNonQuery()
MessageBox.Show("Abgeschlossen")
Catch ex As Exception
MessageBox.Show(ex.Message)
con.Close()
End Try
Next
Die anzahl wird durch das select bekannt. Das Problem ist das hier nur die letzte Aufgabe wieder in die Access Datenbank geschrieben wird.
Primärschlüssel ist übrigens "FrageNummer". Kann mir jemand helfen oder einen Tipp geben?
Danke und Gruß
rawneblade