Solved

Fill Dataset from another form

Posted on 2008-06-24
3
239 Views
Last Modified: 2008-06-25
Hi Experts,

VS 2008,SQL 2005.

I have a form with a split container. The first panel has a tree control.On the 2nd panel I fill with a form at run time , If the first node is  clicked I load a customer form in the panel. If the 2nd node is clicked I load a Job form.I also have it check to see if the form that is needed on the 2nd panel is already loaded,if so I want to just update the data. I am trying to refill the dataset on the form in the 2nd panel but the following code id not working.

frmSubCustomer.FillCustomerDetail(SelectedCustomerID)    This is a sub on the frmSubCustomer


this is the code:

    Private Sub FillsubCustomerForm()
        Dim SubFrm As New frmSubCustomer

        SelectedCustomerID = Me.TreeCustomer.SelectedNode.Tag

        If Me.SplitContainer1.Panel2.Controls.Count > 0 Then
            If Me.SplitContainer1.Panel2.Controls(0).Name = "frmSubCustomer" Then
                frmSubCustomer.FillCustomerDetail(SelectedCustomerID)


            Else

                Me.SplitContainer1.Panel2.Controls.Clear()
                With SubFrm

                    .CurrentCustomerID = SelectedCustomerID
                    .TopLevel = False
                    .Dock = DockStyle.Fill
                    .WindowState = FormWindowState.Maximized
                    .Parent = Me
                    Me.SplitContainer1.Panel2.Controls.Add(SubFrm)
                    .Show()

                End With

            End If


Any help would be great. If you can think of a better way of doing this I wold like to see it as I am just starting to develop this App

Thank You
John
0
Comment
Question by:DjJohnny
3 Comments
 
LVL 39

Accepted Solution

by:
appari earned 500 total points
ID: 21861960
try this

 Private Sub FillsubCustomerForm()
        Dim SubFrm As object

        SelectedCustomerID = Me.TreeCustomer.SelectedNode.Tag

        If Me.SplitContainer1.Panel2.Controls.Count > 0 Then
            If Me.SplitContainer1.Panel2.Controls(0).Name = "frmSubCustomer" Then
            SubFrm = Me.SplitContainer1.Panel2.Controls(0)
                ctype(SubFrm, frmSubCustomer).FillCustomerDetail(SelectedCustomerID)


            Else

                Me.SplitContainer1.Panel2.Controls.Clear()
                With SubFrm

                    .CurrentCustomerID = SelectedCustomerID
                    .TopLevel = False
                    .Dock = DockStyle.Fill
                    .WindowState = FormWindowState.Maximized
                    .Parent = Me
                    Me.SplitContainer1.Panel2.Controls.Add(SubFrm)
                    .Show()

                End With

            End If

0
 
LVL 18

Expert Comment

by:philipjonathan
ID: 21862235
How far have you got? Are you handling the Tree's clicked event? You can handle the Tree's clicked event. If a click is detected, check if it's the 1st node or the 2nd one. Then check if the associated form is already loaded. If so, just refresh the data
0
 

Author Comment

by:DjJohnny
ID: 21864100
Thank You  appari and philipjonathan,

appari code worked. I see now that I need to create an object that I set as the form in the panel2. I was just trying to get to it directly.

John
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
Parsing a CSV file is a task that we are confronted with regularly, and although there are a vast number of means to do this, as a newbie, the field can be confusing and the tools can seem complex. A simple solution to parsing a customized CSV fi…
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…

828 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question