title image


Smiley INSERT in Access DB über ADO.NET
Ich habe ein Problem mit Einfügen von Daten über ADO.

Hier mal der Quelltext zum Einfügen.



Kann mir jemand sagen, wo der Fehler liegt?



Vielen Dank



---------------------------------------------------------------------------------



sSQL_Insert = "INSERT INTO [Tabelle] (Name,Strasse,PLZ,Ort) VALUES (@,@,@,@)"

objDBconn.Open()

DA.SelectCommand = New OleDbCommand(sSQL_Insert, objDBconn)

_DS = New DataSet

DA.Fill(_DS, [Tabelle]

objDBconn.Close()

Dim objTabelle As New DataTable

objTabelle = _DS.Tables([Tabelle])

Dim drRows As DataRowCollection

Dim objNewRow As DataRow

drRows = objTabelle.Rows

objNewRow = objTabelle.NewRow

objNewRow.BeginEdit()

objNewRow("Name") = txt_shop_name.Text

objNewRow("Strasse") = txt_shop_str.Text

objNewRow("PLZ") = txt_shop_plz.Text

objNewRow("Ort") = txt_shop_ort.Text

objNewRow.EndEdit()

drRows.Add(objNewRow)

'Speichern in der Datenbank

objInsertCommand.Connection = objDBconn

objInsertCommand.CommandText = sSQL_Insert

DA.InsertCommand = objInsertCommand

DA.Update(_DS)

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: