Improve company productivity with a Business Account.Sign Up

x
?
Solved

Copy One Column From One DataTable To Another DataTable

Posted on 2006-11-19
7
Medium Priority
?
642 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 1500 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
Get expert help—faster!

Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.

 
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

The 14th Annual Expert Award Winners

The results are in! Meet the top members of our 2017 Expert Awards. Congratulations to all who qualified!

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Well, all of us have seen the multiple EXCEL.EXE's in task manager that won't die even if you call the .close, .dispose methods. Try this method to kill any excels in memory. You can copy the kill function to create a check function and replace the …
If you're writing a .NET application to connect to an Access .mdb database and use pre-existing queries that require parameters, you've come to the right place! Let's say the pre-existing query(qryCust) in Access takes a Date as a parameter and l…
Free Data Recovery software is an advanced solution from Kernel Tools to recover data and files such as documents, emails, database, media and pictures, etc. It supports recovery from physical & logical drive after a hard disk crash, accidental/inte…
Through the video, you can check the migration process of Outlook PST file to PDF. Kernel for Outlook to PDF tool can convert Outlook emails with all attributes like Subject, To, From, Cc, Bcc and other folders such as Inbox, Outbox, Sent Items, Jun…

607 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