Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

DataView
Autor: wrkdonau
Datum: 23.07.04 09:50
Hallo liebe Leute - weiß nicht wieso das nicht funktioniert??? Vieleicht kann mir da jemand helfen - dank euch schön für eventuelle Vorschläge * grins* Dim adinsert As New OleDbDataAdapter("select Name,Klappe,Raum,n_FID,ab_FID from Anmelder", conn) Dim ds As New DataSet() adinsert.Fill(ds, "Anmelder") Dim row As DataRow Dim dv As DataView = New DataView(ds.Tables("Anmelder")) dv.RowStateFilter = DataViewRowState.Added row = ds.Tables("Anmelder").NewRow row("Name") = txbName.Text row("Klappe") = txbKlappe.Text row("Raum") = txbRaum.Text row("n_FID") = hilfe1 row("ab_FID") = hilfe2 ds.Tables("Anmelder").Rows.Add(row) Try Dim builder As New OleDbCommandBuilder(adinsert) adinsert.Update(ds.Tables("Anmelder")) Fehler.Visible = True Fehler.Text = "Neuer Datensatz erfolreich zusammengefügt" dg.DataSource = dv dg.DataMember = "Anmelder" dg.DataBind() Catch ex As Exception Fehler.Visible = True Fehler.Text = ex.Message If conn.State = ConnectionState.Open Then conn.Close() 'Falls Verbindung noch offen ist wird sie geschlossen End Try If conn.State = ConnectionState.Open Then conn.Close()

DataView	620	wrkdonau	23.07.04 09:50
Re: DataView	488	wrkdonau	23.07.04 09:52
Re: DataView	471	spike24	23.07.04 10:17
Re: DataView	366	DaveS	23.07.04 10:27

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