Add New Record

[Evil03]

hi,

I have Created a vb.net Application with MS ACCESS DATABASE, everything is working fine, But, There is a small problem . Everytime i ADD a new record it saves succesfully
but i can only view that particular saved data only after restarting the application..Pls Help me

******************************************************

Imports System.Data

Public Class frmdetail
Inherits System.Windows.Forms.Form

Dim inc As Integer
Dim maxrows As Integer
Dim con As New OleDb.OleDbConnection
Dim ds As New DataSet
Dim da As OleDb.OleDbDataAdapter
Dim sql As String

Private Sub frmdetail_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

con.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source = C:\Documents and Settings\Acer\Desktop\CounsellingSystem\counselling.mdb"
con.Open()

sql = "select * from counselling"
da = New OleDb.OleDbDataAdapter(sql, con)
da.Fill(ds, "counselling")

con.Close()

maxrows = ds.Tables("counselling").Rows.Count
inc = -1

End Sub

Private Sub navigaterecords()

txtname.Text = ds.Tables("counselling").Rows(inc).Item(1)
txtcname.Text = ds.Tables("counselling").Rows(inc).Item(2)
txtnpos.Text = ds.Tables("counselling").Rows(inc).Item(3)

End Sub

Private Sub btncommit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncommit.Click
If inc <> -1 Then
Dim cb As New OleDb.OleDbCommandBuilder(da)
Dim dsnewrow As DataRow

dsnewrow = ds.Tables("counselling").NewRow()

dsnewrow.Item(1) = txtname.Text
dsnewrow.Item(2) = txtcname.Text
dsnewrow.Item(3) = txtnpos.Text

ds.Tables("counselling").Rows.Add(dsnewrow)
da.Update(ds, "counselling")
MsgBox("New Record Added!")
Endclass

End Class

***************************************************

[Alexpap]

yes this happens because the control you are using is not eligible to update its data everytime. So what do you need to do is to update the data that is shown every time that you add a row.

you can do this by executing the same code that you have written.

Happy X-mas & Coding! :D

[Evil03]

yes this happens because the control you are using is not eligible to update its data everytime. So what do you need to do is to update the data that is shown every time that you add a row.

you can do this by executing the same code that you have written.

Happy X-mas & Coding! :D

Hi ALex...

Execute Control!>.....could you pls give me an example ?

Merry X-Mas n Year 09 dude.

[Alexpap]

first you should tell me what control are u using so as to write the code for the specific control.... :)