BindingSource

Hello,

I have two forms that access the same database, the second form adds new records to the table while the first form reads from it.

When I add a new record in the second form and I press OK, I am returned to the first form, my problem is that the first form does not show the newly added record, I have to close the entire program and re-load it in order to see the changes.

I'm wondering if there's a way once I add a new record to update the bindingsource in the first form to reflect the new changes.

the following is the code I use in the first form to read from the table

    
Dim prjData As ClientsAccess
Dim prjDataset As nclMisDataSet
Dim WithEvents prjBindingSource As BindingSource

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

        prjData = New ClientsAccess
        prjDataset = prjData.getPrjAccessDataSet
        prjBindingSource = New BindingSource

       With prjBindingSource
            .DataSource = prjDataset
            .DataMember = "projets"
        End With

Open in new window


Thank you,

Fred
FCapoAsked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

lojk.Net and Infrastructure ConsultantCommented:
This is all to do with the scope of your Dataset Variable - increase its scope by putting it in a module or Shared Class

Declare a Global Module

Public Module modGeneral

public prjData As new ClientsAccess()
public prjDataset As new nclMisDataSet()

End Module

and store your Dataset instance in there and then in your form(s)..


Dim WithEvents prjBindingSource As BindingSource

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

               prjBindingSource = New BindingSource

       With prjBindingSource
            .DataSource = modGeneral.prjDataset
            .DataMember = "projets"
        End With


Actually the operations you perform on that dataset should also go in the module/shared class rather than in the form.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
FCapoAuthor Commented:
You're saying I should add the module to the class "ClientsAccess" instead of directly on the form?

Then how I can access it from the forms?
0
lojk.Net and Infrastructure ConsultantCommented:
OK well it wasn't explained what ClientsAccess was but my comment still stands. If ClientsAccess is some kind of database access class then it very much makes sense to put the DS inside that and put an instance of the ClientsAccess in a global module.

You need to increase the scope of the dataset variable if you want to share it between 2 forms (you can do this , i have previously bound one dataset instance full of lookups that was loaded at application startup and stored in a Shared Class to 10s of forms in one application, it was actually pushed into each form but the principal is the same if you want to pull it like you are above). The benefit to this approach was that even if the lookups were changed by a database read/write somewhere else - EVERY form that was bound to the Lookup DS automatically updated itself.

Where you actually put it is up to you but by creating a fresh instance in every instance of the form they are obviously unrelated to each other.
0
FCapoAuthor Commented:
I'm having a tough time configuring it this way, I'm sorry for this inconvenience.

I have a public class I use to access my database :
Public Class ClientsAccess

    Private prjAccessTableAdapter As nclMisDataSetTableAdapters.projetsTableAdapter

    Private prjDataset As nclMisDataSet
    Private prjDataTable As DataTable

    Public Function getPrjAccessDataSet() As nclMisDataSet
        Try
            prjAccessTableAdapter = New nclMisDataSetTableAdapters.projetsTableAdapter
            prjDataset = New nclMisDataSet
            prjAccessTableAdapter.Fill(prjDataset.projets)
            Return prjDataset
        Catch ex As Exception
            Throw ex
        End Try
    End Function

End Class

Open in new window


And from my forms, I load the dataset in this way :
Dim prjData As ClientsAccess
Dim prjDataset As nclMisDataSet
Dim WithEvents prjBindingSource As BindingSource

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

        prjData = New ClientsAccess
        prjDataset = prjData.getPrjAccessDataSet
        prjBindingSource = New BindingSource

       With prjBindingSource
            .DataSource = prjDataset
            .DataMember = "projets"
        End With

Open in new window

Basically both forms have the above code, how exactly can I implement the modules in this situation without having to completely change the code. This method is very new to me and so I would appreciate as much detail as possible.

Thank you
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic.NET

From novice to tech pro — start learning today.