Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Datensatz in Datenbank einfügen
Autor: Chris1976
Datum: 14.10.08 19:48
Hallo, folgendes will ich machen: Ich habe eine Datenbank mit div. Tabellen. In diesen will ich Einträge einfügen: Private Sub cmdEinfügen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdEinfügen.Click Dim con As New OleDb.OleDbConnection Dim cmd As New OleDb.OleDbCommand Dim Anzahl As Integer con.ConnectionString = _ "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=D:\HR-easyStart\DBLinks\DBVerweise.mdb" If optAnlagen.Checked Then GoTo Anlagenbuchhaltung End If If optBank.Checked Then GoTo Bankprogramm End If If optCash.Checked Then GoTo Cashmanagement End If If optDoku.Checked Then GoTo Dokus End If If optProg.Checked Then GoTo Programme End If If optSonst.Checked Then GoTo Sonstiges End If If optVZ.Checked Then GoTo Verzeichnisse End If GoTo Fehler Anlagenbuchhaltung: lblAuswahl.Text = "Es wird die Auswahl >Anlagenbuchhaltung< ergänzt:" 'Dateneingabe prüfen If txtAufrufname.Text = "" Then MsgBox("Bitte einen Aufrufnamen eingeben!") Exit Sub End If If txtProgrammaufruf.Text = "" Then MsgBox("Bitte einen Programmaufruf eingeben!") Exit Sub End If 'Einträge einfügen Try con.Open() 'cmd.CommandText = _ '"insert into Anlagenbuchhaltung " & _ '"(AufrufnameAB, ProgrammaufrufAB) " & _ '"values ('" & _ 'txtAufrufname.Text & " ', " & _ 'txtProgrammaufruf.Text & ")" cmd.CommandText = "INSERT INTO Anlagenbuchhaltung (AufrufnameAB, ProgrammaufrufAB)" & _ "VALUES (@Aufrufname, @Programmaufruf)" cmd.Parameters.AddWithValue("@Aufrufname", txtAufrufname.Text) cmd.Parameters.AddWithValue("@Programmaufruf", txtProgrammaufruf.Text) 'Eintrag bestätigen Anzahl = cmd.ExecuteNonQuery() If Anzahl > 0 Then MsgBox("Es wurde ein Eintrag ergänzt") End If Catch ex As Exception MsgBox(ex.Message) End Try con.Close() GoTo Ende Bankprogramm: usw. In der Form selber hab ich mehrere Optionsfelder, über die ich die Tabelle auswählen möchte. Über Buttons 'Anzeigen', 'Einfügen', 'Ändern' und 'Löschen' möchte ich die entsprechenden Aktionen ausführen. Das mit dem Auslesen hat noch bestens funktioniert und ich war total stolz auf mich... ... irgendwie zu früh: beim Einfügen hört es jetzt schon wieder auf und die Datensätze wollen einfach nicht in die Tabelle 'Anlagenbuchhaltung'. Hat jemand einen guten Tipp für mich, warum nicht? Wahrscheinlich ist es wieder ganz einfach... Gruß Chris

Datensatz in Datenbank einfügen	1.032	Chris1976	14.10.08 19:48
Re: Datensatz in Datenbank einfügen	526	Chris1976	14.10.08 22:35
Re: Datensatz in Datenbank einfügen	524	FZelle	15.10.08 09:46

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übersicht

Suchen