Solved

Copy One Column From One DataTable To Another DataTable

Posted on 2006-11-19
7
587 Views
Last Modified: 2010-04-23
I have an application that needs to take column out of a DataTable and insert it into another DataTable.

I have tried:

dtAllTheData.Columns.Add(dtFirst.Columns(3))

but I get an error saying that that column is already part of a dataset.

How do I do this?  I need to create a Single Table that has columns from a series of other tables.

0
Comment
Question by:lgropper
  • 2
  • 2
  • 2
  • +1
7 Comments
 
LVL 10

Expert Comment

by:Kinger247
ID: 17976072
You could try cloning the column:

Dim DataColumn As DataColumn = dataset.Tables(0).Clone.Columns(0)
0
 

Author Comment

by:lgropper
ID: 17976285
That doesn't work, neither does


Dim MyCol as DataColumn = dataset.Tables(0).Copy.Columns(0)


gives the same Error saying that "" already belongs to dataset.Tables(0)


0
 
LVL 34

Accepted Solution

by:
Sancler earned 500 total points
ID: 17976383
You could overcome the "belongs to another table" problem on these lines

        Dim dc As DataColumn = dt1.Columns(0)
        dt1.Columns.Remove(dc)
        dt2.Columns.Add(dc)

but it won't produce what (I think) you want.  I imagine that what you actually want is not only the column, but also the data in it.  But the data belongs to a datatable's rows, not to its columns.  So all the above would do would be to put an empty column (with the same properties as the original one) in the second datatable - and, incidentally, get rid of the column and the data in each row for that column in the original datatable.

What you are going to have to do, I think, is create a new column in the second datatable and set its properties the same as those for the column you want to copy.  And then cycle through the rows in the original datatable, creating a new row for the second datatable, and setting the value for that as equal to the equivalent value from the original datatable.  On these lines

       Dim dt2 As New DataTable
       Dim dc As New DataColumn
       With dc
           .ColumnName = dt1.Columns(oldCol).ColumnName
           .DataType = dt1.Columns(oldCol).DataType
           'etcetera for each property you want transferred
       End With
       dt2.Columns.Add(dc)

       For Each dr As DataRow in dt1.Rows
           Dim ndr As DataRow = dt2.NewRow
           ndr(0) = dr(oldCol)
           dt2.Rows.Add(ndr)
       Next

Roger
0
Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
LVL 96

Expert Comment

by:Bob Learned
ID: 17978984
You could create a copy of the DataTable, using the Copy method, and then drop the columns that you don't need.

Bob
0
 
LVL 34

Expert Comment

by:Sancler
ID: 17979308
Bob

Agreed - for one column only.  But the question ends "I need to create a Single Table that has columns from a series of other tables" and I don't think you could do that from more than one table.

Roger
0
 
LVL 96

Expert Comment

by:Bob Learned
ID: 17986484
Thanks, Roger, I missed that one.

Bob
0
 

Author Comment

by:lgropper
ID: 18030881
whoops, that should have been Excellent!  thanks a lot!
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

Suggested Solutions

Title # Comments Views Activity
Get hold of longitude and latitude in iframe string 11 49
rebind a grid after user clicks on node in treeview 1 41
VB.NET 1 28
System.net.Sockets Error 5 28
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…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

831 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