Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
Solved

VS 2008

Posted on 2014-10-02
1
91 Views
Last Modified: 2014-10-05
Hi Experts
I am using the following code bring VFP data into Sql Express.
my code
  Dim connVfp As String = "Provider=VFPOLEDB.1;Data Source=c:\mas_progs\ggarage_prog\data3\garage.dbc"
    Public conVfp As New OleDb.OleDbConnection(connVfp)
    Public dsVfp As New DataSet
    Public DTVfp As New DataTable
    Public daVfp As DataAdapter

    Dim connExp As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=C:\bill\Garage\GarageDatabase.mdf;Integrated Security=True;User Instance=True"
    Public conExp As New SqlConnection(connExp)
    Public dsExp As New DataSet
    Public DTexp As New DataTable
    Public daexp As DataAdapter
    Public ccodex As String
    Public ccodeexist = "Y"
   Dim davfp As New OleDbDataAdapter(" select * FROM Customer ", conVfp)
        Dim daExp As New SqlDataAdapter(" select * FROM Customer ", conExp)
    davfp.Fill(DTVfp)
        daExp.Fill(DTexp)
     DataGridView1.DataSource = DTVfp
        DataGridView2.DataSource = DTexp
it works fine upto here
when
     For Each rowa In DTVfp.Rows
            ccodeexist = "N"
            ccodex = rowa("ccode")
            If IsDBNull(rowa("ccode")) = False Then
                For Each rowb In DTexp.Rows
                    If IsDBNull(rowb("ccode")) = False Then
                        If rowb("ccode") = ccodex Then
                            ccodeexist = "Y"
                            Exit For
                        End If
                    End If
                Next
                If ccodeexist <> "Y" Then
                    Dim rown As DataRow = DTexp.NewRow()
                    rown("Ccode") = rowa("ccode")
                    rown("C_name") = rowa("c_name")
                    rown("title") = rowa("title")
                    DTexp.Rows.Add(rown)
                End If
            End If
next

This table has 20000 records and after a minute I get the following Error:

ContextSwitchDeadlock was detected
Message: The CLR has been unable to transition from COM context 0x4d3b900 to COM context 0x4d3ba70 for 60 seconds. The thread that owns the destination context/apartment is most likely either doing a non pumping wait or processing a very long running operation without pumping Windows messages. This situation generally has a negative performance impact and may even lead to the application becoming non responsive or memory usage accumulating continually over time. To avoid this problem, all single threaded apartment (STA) threads should use pumping wait primitives (such as CoWaitForMultipleHandles) and routinely pump messages during long running operations.
0
Comment
Question by:b001
1 Comment
 
LVL 22

Accepted Solution

by:
plusone3055 earned 500 total points
ID: 40358105
In visual studio

hit
CTRL + ALT + E

click managed debugging assistants
and UNCHECK
contextSwitchDeadlock

Save , rebuild and you should be good to go :) Screenshot

ContextSwitchDealdlock
0

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

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.

Question has a verified solution.

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

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…
Introduction As chip makers focus on adding processor cores over increasing clock speed, developers need to utilize the features of modern CPUs.  One of the ways we can do this is by implementing parallel algorithms in our software.   One recent…

791 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