title image


Smiley VB 2005: Datensatz in ADO.net hinzufügen
Hallo,

ich möchte einen Datensatz in meiner Access-Datenbank hinzufügen.

Ich erhalte aber bei der Erstellung des DATAROWs die Fehlermeldung:



System.NullReferenceException wurde nicht behandelt.

Message="Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt."



Habe schon new hinzugefügt, aber das wird abgelehnt.

Was mache ich denn falsch ?

Hinweis: Habe kein Control für DataSet auf der Form, ist also voll controlunabhängig gemacht.



mfg

Martin



'SQL-Anweisung festlegen

LStr_SQL_Text = "Select * from AKTIEN" ' where AKTIE='" + MStr_Aktiename_Kurse$ + "'"

'Connection erstellen

LStr_DatenbankName = GStr_Aktien_Pfad$ + GStr_Aktien_Datei$ & ".MDB"

Dim ConnString As String = "Provider=Microsoft.JET.OLEDB.4.0;data source=" + LStr_DatenbankName

Dim OleDbConn As OleDbConnection = New OleDbConnection(ConnString)

OleDbConn.Open()

Dim MyOledbCommand As OleDbCommand = New OleDbCommand()

' --- DataSet erzeugen

Dim objDataSet As New DataSet

Dim objDataAdapter As System.Data.OleDb.OleDbDataAdapter

objDataSet = New DataSet

' --- Adapter definieren

objDataAdapter = New OleDbDataAdapter(LStr_SQL_Text, ConnString)

' Füllen der Zeile

Dim Row As DataRow = objDataSet.Tables("AKTIEN").NewRow()

Row = objDataSet.Tables("AKTIEN").NewRow()

With Row

.Item("NR") = GT_AktienNamen_Daten.NR

.Item("AKTIE") = GT_AktienNamen_Daten.AKTIE

.Item("INFO") = GT_AktienNamen_Daten.INFO

'.... sind noch mehr Datenfelder (ca. 50 Sück)

End With

objDataSet.Tables("AKTIEN").Rows.Add(Row)

objDataAdapter.Update(objDataSet, "AKTIEN")
Mit freundlichen Grüßen Martin

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: