navigation dans deux tables connexes

Question

Bonjour tout le monde,
je débute en Vb et je suis entraint de programmer une application 
parent/ enfant.


En fait jŽai deux tables (region et office)
chacunes dans un datagrid.
seulement jŽai un souci:
lorsque je navigue sur la table region à lŽaide de deux boutons: suivant et précédent


je voudrais voir les enregistrements correspondant dans la table office.
voici le code:


Imports System.Windows.Forms

Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Ds._REGION.Clear()
REGIONTableAdapter.Fill(Ds._REGION)
OFFICETableAdapter.Fill(Ds.OFFICE)

End Sub

Private Sub btnNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles btnNext.Click

Me.BindingContext(Ds, "Region").Position = (Me.BindingContext(Ds, "Region").Position) + 1
PositionChanged()
End Sub
Private Sub btnPrev_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles btnPrev.Click

Me.BindingContext(Ds, "Region").Position = (Me.BindingContext(Ds, "Region").Position) - 1
PositionChanged()
End Sub

Sub PositionChanged()
lblPos.Text = (((Me.BindingContext(Ds, "Region").Position.ToString _
+ " / ") _
+ (Me.BindingContext(Ds, "Region").Count.ToString)))
End Sub

Public Sub Rel()
Dim parentColumn As DataColumn = _
Ds.Tables("Region").Columns("ID")

Dim childColumn As DataColumn = Ds.Tables( _
"Office").Columns("REGID")

'Verbindung erstellen

Dim relation As DataRelation
relation = New DataRelation("FK_OFFICE_REGID_ID ", parentColumn, childColumn)

'Verbindung zum Dataset einfügen
Ds.Relations.Add(relation)
End Sub

Private Sub lblPos_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblPos.Click
Dim SelectedID As String
SelectedID = lblPos.SelectedText

Dim drReg As DataRow
drReg = Ds._REGION.FindByID(SelectedID)

Dim drOff As DataRow
drOff = drReg.GetChildRows(relation)
End Sub
End Class

merci de me dire ce que jŽai oublié

Tupad · Answer

merci de me dire ce que j'ai oublié  
De poster dans la bonne partie?
On est en c# ici

Navigation dans deux tables connexes

1 réponse

Votre réponse

Discussions similaires