Est tablici v MS-SQL "Contacts","Addresses","Phones"
Contacts: bolee 120000 zapisey
Addresses: bolee 250000 zapisey, t.k. odin contact imeet bolee odnogo adressa
Phones: bolee 300000 zapisey, t.e. sotoviy, rabochiy, domashniy, i drugie.

v VB.NET sozdayu DataSet s tablicami, v DataSet dobavlyau svyazi mezhdu tablicami.

Na forme est textboxi svyazannie s tablicey "Contacts", 2 grida Addresa i Telefoni, i knopki navigacii.

Problema:
Vse rabotaet, no perekluchenie na sleduyushego Contacta rabotaet ochen medlenno. ya bi mog zagruzhat zapisi ispolzuya paging, no delo v tom chto useru dolzhno bit postoyanno dostupno sortirovka, poisk, filtr.

Primer Coda:
daContact.Fill(ds,"Contacts")
daAddress.Fill(ds,"Addresses")
daPhones.Fill(ds,"Phones")

Dim RelContact As DataRelation
RelContact = New DataRelation("RelAddr", ds.Tables("Contact").Columns("ContactID") _
, ds.Tables("Addresses").Columns("ContactID"))
ds.Relations.Add(RelContact)

RelContact = New DataRelation("RelPh", ds.Tables("Contact").Columns("ContactID") _
, ds.Tables("Phones").Columns("ContactID"))
ds.Relations.Add(RelContact)

Dim dvManager As New DataViewManager(ds)
Dim dvContact As New Dataview
dvContact = dvManager.CreateDataView(ds.Tables("Contact"))

txtFirstName.DataBindings.Add(New System.Windows.Forms.Binding("Text", dvContact, "FirstName"))_
txtMiddleName.DataBindings.Add(New System.Windows.Forms.Binding("Text", dvContact,"MiddleName"))
txtLastName.DataBindings.Add(New System.Windows.Forms.Binding("Text", dvContact, "LastName"))

GridAddresses.DataSource=dvContact
GridAddresses.DataMember="RelAddr"

GridPhones.DataSource=dvContact
GridPhones.DataMember="RelPh"

'Kod navigacii na NextRecord
Me.BindingContext(dvContact).Position = Me.BindingContext(dvContact).Position + 1

Tak vot, eta operaciya vipolnyaetsya okolo 20 sek
Eto konechno ne dopustimu.

Tak zhe est ktopki sortirovki, i Poiska. rabotayut normalno

Mozhet kto nit pomoch?