Solved

How to append another datatable to an existing dataset

Posted on 2008-10-23
3
742 Views
Last Modified: 2013-11-07
hi there,
I have an exisitng datatset with two datatables combined. Now the need to add another datatable makes me confuse on how to add it to the existing relationship. below is the code i have for the relacionship how can i add the Lawyer datatable to the dsaddresses dataset?

Thanks,
jsctehcy
Public Shared Function GetAddresses(ByVal Case_Number As String) As DataSet
 
            'datatables repository
            Dim dsAddresses As DataSet = New DataSet
            Dim Relation As DataRelation
 
            'Create the Address datatable
            dsAddresses.Tables.Add(GetAddress(Case_Number))
            dsAddresses.Tables(0).TableName = "Address"
 
            'Create Registered Agent Datatable
            dsAddresses.Tables.Add(GetRegisteredAgent(Case_Number))
            dsAddresses.Tables(1).TableName = "RegisterAgent"
 
            'Create Lawyer Datatable
            dsAddresses.Tables.Add(GetAttorney(Case_Number))
            dsAddresses.Tables(2).TableName = "Lawyer"
 
            'create relation betwen Address and Registered Agent tables
            Relation = New DataRelation("CASE_NUMBER", dsAddresses.Tables("Address").Columns("CASE_NUMBER"), dsAddresses.Tables("RegisterAgent").Columns("CASE_NUMBER"))
            dsAddresses.Relations.Add(Relation)
 
            'return the datatables repository
            Return dsAddresses
 
        End Function

Open in new window

0
Comment
Question by:jsctechy
  • 2
3 Comments
 
LVL 18

Expert Comment

by:UnifiedIS
ID: 22789226
It looks like you just need to create another relation to hook up the Lawyer table

Relation = New DataRelation("CASE_NUMBER_Lawyer", dsAddresses.Tables("Address").Columns("CASE_NUMBER"), dsAddresses.Tables("Lawyer").Columns("CASE_NUMBER"))

dsAddresses.Relations.Add(Relation)
0
 
LVL 1

Author Comment

by:jsctechy
ID: 22789416
ok you got me all confuse can you post the entire code?

why do i have relation twice that does not seems to be right?
0
 
LVL 18

Accepted Solution

by:
UnifiedIS earned 500 total points
ID: 22789478
You need 2 relations, one that connects address and registeredagent and a second one to connect Address to Lawyer


  'datatables repository
            Dim dsAddresses As DataSet = New DataSet
            Dim Relation As DataRelation
 
            'Create the Address datatable
            dsAddresses.Tables.Add(GetAddress(Case_Number))
            dsAddresses.Tables(0).TableName = "Address"
 
            'Create Registered Agent Datatable
            dsAddresses.Tables.Add(GetRegisteredAgent(Case_Number))
            dsAddresses.Tables(1).TableName = "RegisterAgent"
 
            'Create Lawyer Datatable
            dsAddresses.Tables.Add(GetAttorney(Case_Number))
            dsAddresses.Tables(2).TableName = "Lawyer"
 
            'create relation betwen Address and Registered Agent tables
            Relation = New DataRelation("CASE_NUMBER", dsAddresses.Tables("Address").Columns("CASE_NUMBER"), dsAddresses.Tables("RegisterAgent").Columns("CASE_NUMBER"))
            dsAddresses.Relations.Add(Relation)
 
'creates relation between address and lawyer tables 
Relation = New DataRelation("CASE_NUMBER_Lawyer", dsAddresses.Tables("Address").Columns("CASE_NUMBER"), dsAddresses.Tables("Lawyer").Columns("CASE_NUMBER"))
dsAddresses.Relations.Add(Relation)
 
            'return the datatables repository
            Return dsAddresses

Open in new window

0

Featured Post

DevOps Toolchain Recommendations

Read this Gartner Research Note and discover how your IT organization can automate and optimize DevOps processes using a toolchain architecture.

Question has a verified solution.

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

This document covers how to connect to SQL Server and browse its contents.  It is meant for those new to Visual Studio and/or working with Microsoft SQL Server.  It is not a guide to building SQL Server database connections in your code.  This is mo…
Many of us here at EE write code. Many of us write exceptional code; just as many of us write exception-prone code. As we all should know, exceptions are a mechanism for handling errors which are typically out of our control. From database errors, t…
This Micro Tutorial will teach you how to censor certain areas of your screen. The example in this video will show a little boy's face being blurred. This will be demonstrated using Adobe Premiere Pro CS6.
Email security requires an ever evolving service that stays up to date with counter-evolving threats. The Email Laundry perform Research and Development to ensure their email security service evolves faster than cyber criminals. We apply our Threat…

786 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